VB编程序判断坐标象限
我的一个简单的VB判断象限的问题 怎么会在VB环境下运行出错了？
高手们帮我看一下！！！
If...Then...Else... 的选择结构
平面直角坐标系中，不同象限内点的情况
Private Sub Command1_Click()
x=Val(Text1.Text)
y=Val(Text2.Text)
If x=0 Or y=0 Then Print "该点不在象限内"：Exit Sub
If x>0 Then If y>0 Then print "在第一象限" Else Print "在第四象限"
Else If y>0 Then Print "在第二象限" Else print "在第三象限"
End Sub
第二个Else 也就是x<0的情况 说没有对应的If，这到底是个什么原因？
谢啦！！！
相关问答：
想在warcraft3里进行写屏操作【如对战平台中的胜负提示信息】，效果就像游戏平台中一样，我试过在一窗口中写入文字，然后一直让窗口强制最前，虽然能实现文字显示，但是文字会不断闪烁，而且有不确定BUG，通过论坛搜 ......
在下是vb的新手，想写段程序，在vb中，使用wscript调用一些外部的命令，但是程序执行一直有错误，请各位高手帮忙解答下，谢谢。
代码如下：
VB code:
Private Function getFile_CMD(filename, filepath) As Bo ......
为什么工具栏按扭的宽度改变不了,在属性里改了又变成原来的数值了
大胡子真厉害，回答基本都是爆料级的
大胡子升级真快啊，这才几天就5条短裤外加月排名第一了
想想我这5个短裤混了差不多8年才得到的。
回复 ......
VB怎样获得鼠标处的超级连接呢？
在WebBrowser控件中有这样一个事件:StatusTextChange(index As Integer, ByVal Text As String)
它的Text参数正是鼠标处的超级连接,但问题是如果我的浏览器正� ......
我想把word另存为xml之后，用vb读取这个xml的内容，请问如何实现？
dim f as integer
dim b() as byte
dim s as string
dim L as long
f=freefile()
open "abc.xml" for binary access read as #f
......
