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，这到底是个什么原因？
谢啦！！！
相关问答：
Private Sub btnPrint_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnPrint.Click
MouseWait()
Dim ClearTempTabelSQL As String
'If Not ......
我想把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
......
把已有数据（数据大于20行）的RS(recordset)的第10行数据与第11行数据做加法后，删除第11行的数据，然后把后面的数据向前移。
RS的话修改数据是会更新数据库，现在的问题是RS里的已有数据是用SQL语句分类统计出来的 ......
vb中 现在我要把数据库里存储的一个附件的内容替换了，怎么做，只是替换我指定的位置，不是全部替换
请将问题说明白，存储字段格式，如果是Binary格式的比较麻烦，如果是字串，直接替换。最好不要进行指定位置替换� ......
问题：
现在Access数据库中有两张表TableA和TableB
TableA中有记录如下:
字段1(Name) 字段2(Num)
A 3
A 4
B 6
... ......
