各位大神,新人求助啊,一个很小的问题
时间:2011-08-18
来源:互联网
Private Sub Command1_Click()
Dim doWhile As Integer, doUntil As Integer
doWhile = 1
doUntil = 1
Do While (doWhile < 10)
doWhile = doWhile + 1
Loop
MsgBox.Show (doWhile)
Do Until (doUntil < 10)
doUntil = doUntil + 1
boop
megbox.Show (doUntil)
End Sub
一个新建exe, 就这点代码,想看Do While 和 Do Until 的区别,但老是报错
Dim doWhile As Integer, doUntil As Integer
doWhile = 1
doUntil = 1
Do While (doWhile < 10)
doWhile = doWhile + 1
Loop
MsgBox.Show (doWhile)
Do Until (doUntil < 10)
doUntil = doUntil + 1
boop
megbox.Show (doUntil)
End Sub
一个新建exe, 就这点代码,想看Do While 和 Do Until 的区别,但老是报错
作者: Stubborn_Cow 发布时间: 2011-08-18
MsgBox.Show (doWhile) -> msgbox doWhile
megbox.Show (doUntil) -> msgbox doUntil
megbox.Show (doUntil) -> msgbox doUntil
作者: Leftie 发布时间: 2011-08-18
VB code
Private Sub Command1_Click() Dim doWhile As Integer, doUntil As Integer doWhile = 1 doUntil = 1 Do While (doWhile < 10) doWhile = doWhile + 1 Loop MsgBox (doWhile) Do Until (doUntil < 10) doUntil = doUntil + 1 Loop MsgBox (doUntil) End Sub
作者: zdingyun 发布时间: 2011-08-18
写代码认真点,vb内存语句函数如果你写的对都会自动格式化成大写开头的样式,如果你写错则它不会自动格式化,这样就很简单的能判断你的语句或函数是否写对了。
另外建议你找本vb的书看看或看看msdn,不要自己闷头瞎琢磨。
另外建议你找本vb的书看看或看看msdn,不要自己闷头瞎琢磨。
作者: chinaboyzyq 发布时间: 2011-08-18
相关阅读 更多
热门阅读
-
office 2019专业增强版最新2021版激活秘钥/序列号/激活码推荐 附激活工具
阅读:74
-
如何安装mysql8.0
阅读:31
-
Word快速设置标题样式步骤详解
阅读:28
-
20+道必知必会的Vue面试题(附答案解析)
阅读:37
-
HTML如何制作表单
阅读:22
-
百词斩可以改天数吗?当然可以,4个步骤轻松修改天数!
阅读:31
-
ET文件格式和XLS格式文件之间如何转化?
阅读:24
-
react和vue的区别及优缺点是什么
阅读:121
-
支付宝人脸识别如何关闭?
阅读:21
-
腾讯微云怎么修改照片或视频备份路径?
阅读:28