bug?很短的一段代码，问题出在哪? - 编程论坛

#2

高三党2014-06-14 11:27

[quote]以下是引用高三党在2014-6-14 11:26:04的发言：

Dim a, b As String

Private Sub Command1_Click()

b = "单击输入"
Picture1.Print Tab(6); Spc(25); " @"
a = InputBox("请输入第一个数", "请输入您要查询的号码", b)////{@@@@@@@标记行}

Picture1.Print "" & a

End Sub

之后出现：
？？？？？？？？？？？发帖不能贴图？？？？

#3

高三党2014-06-14 11:32

回复 2 楼高三党

算了文字描述。。。。。
运行后，本应显示“单击输入”的地方出现乱码。
理由是什么？
还有，当我把inputbox函数属性全填完了之后：

程序代码：

Dim a, b As String

Private Sub Command1_Click()

b = "单击输入"
Picture1.Print Tab(6); Spc(25); " @"
a = [color=#0000FF]InputBox("请输入第一个数", "请输入您要查询的号码", b, 8000, 4000)/////{@@@@@@标记行}

Picture1.Print "" & a

End Sub

应该显示“单击输入”的地方又变正常了,理由是什么？

[ 本帖最后由高三党于 2014-6-14 11:34 编辑 ]

#4

xzlxzlxzl2014-06-14 16:00

没有什么，应该是vb ide环境下的bug，编译后运行显示就正常了。其实在vb ide环境下查找中文字符串时也会出现乱码的。