Question

请高手指点下VB 的程序报错以及如何让VB界面text在打开界面的时候显示一个数值

就是 程序编好以后 运行程序的时候 界面上的text里面不是空白的 而是显示一个数值 比如 0
另外 就是 运行程序的时候 如果text里面填写的数据为0或者没有填写的时候 如何编写系统提示 如 提示“请输入一个数值”

Answer 1

1、在form_load 里面写 text1="0" 或者 在编译状态下直接给text1赋值 0
2、If text1=Empty or text1=“0” then text1=inputbox ("请输入数字：")

追问

我的界面上有好多text 比如 text1,text2,text3,text4等等 我想知道这个If text1=Empty or text1=“0” then text1=inputbox ("请输入数字：") 写在哪里
比如private sub
If text1=Empty or text1=“0” then
text1=inputbox ("请输入数字：")
end sub
这样写吗

追答

可以啊，看你的功能了，也可以用timer来循环判断嘛！

Answer 2

问题1：form_load事件中输入 text1.text=0
问题2：在合适的位置输入
If Trim(Text1.Text) = "" Or Val(Trim(Text1.Text)) = 0 Then
MsgBox "请输入一个数字"
End If

Answer 3

双击窗体输入Text1.text=0在双击Text1控件输入If text1.text="" then msgbox ("请先输入数值",16,"错误")就Ok了！