
图片真没办法看清楚,好像和帖子文本物核的不同,不是所有IF都判断一个变量,那还只有用IF判断,最后要检测所有的IF都没有满足,需要增加一个变量,按照帖子代码的框架这么写:
dim passed as boolean '定义变量
passed = false'初始化
if t1.text =xx then
t2.text=号码1
t3.text=号码2
passed = true '设置标记
end if
if t1.text =yy then
t2.text=号码3
t3.text=号码4
passed = true '设置标记
end if
'最后判旁蚂让断
if not passed then msgbox "全部都不满足"
直接用下面代码就可实现sub main
msgbox “helloworld!”
end sub
关于Msgbox
MsgBox是Visual Basic和VBS中的一个函数,功能是d出一个对话框,等和桐待用户单击按钮,并返回一个Integer值表示用户单击了哪一个按钮。
语法:MsgBox (Prompt [,Buttons] [,Title] [,Helpfile,Context])
MsgBox函数参数说明:
Prompt :必选。字符串表达式,显示在对话框中的消息。Prompt的最大长度大唤塌坦约为
1024个字符,由所用字符的字节大小决定。如果Prompt的内容超过一行,则可以在每一行之间用回车符(Chr(13))、换行符(Chr(10))或是回车与换行符的组合(Chr(13) &Chr(10),即vbCrLf)将各行分隔开来。
Buttons:可选。数值表达式,衫颂是一些数值的总和,指定所显示的按钮的数目及形式、使用的图标样式(及声音),缺省按钮以及消息框的强制性等。如果省略,则其缺省值为0。具体数值见“参数设置值”表格。
Title:可选。字符串表达式,在对话框标题栏中显示的内容。如果省略Title,则将应用程序标题(App.Title)放在标题栏中。
Helpfile:可选。字符串表达式,用来向对话框提供上下文相关帮助的帮助文件。如果提供了Helpfile,则也必须提供Context。
Context:可选。数值表达式,由帮助文件的作者指定给适当的帮助主题的帮助上下文编号。如果提供了Context,则也必须提供Helpfile。
可以通过MsgBox函数调用提示框。轮巧野msgbox函数有两种格式,一种带返回值,一种不带返回值
代码如下:
MsgBox "提示内容" , , “提示框标题”腊喊 ‘不带返回值
D=Msgbox (“提示内容”, , “提示内容”) ’D为宽败返回值,可以知道用户按下哪个按钮。
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)