淘宝直通车类目:关于vb的问题

来源：百度文库编辑：查人人中国名人网时间：2024/04/29 04:47:13

Private Sub MSFlexGrid1_Click()
If Picture1(1).Visible = True Then
Text1(4) = Trim(MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, 0))
End Sub

Private Sub MSFlexGrid1_Click()
If Picture1(1).Visible = True Then
Text1(4) = Trim(MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, 0))
end if'缺少这个以补上了!!
End Sub
trim是删除字符串前后的空格的!1

少End If，我相信VB会报出这个错误的，请你留意。经常迷之后，就会提高自己调试的能力。

对IF语句来讲，如用多行方式，则一定要有END IF语句，如用单行方式可以省略END IF语句

少 End if
加在 end sub之前

同意楼上

关于VB的问题关于VB的问题关于VB的问题???? 关于VB的问题？关于VB的问题! 关于VB的问题关于VB的问题关于vb的问题关于VB的问题!!! 关于vb的问题