inputbox
发布日期:2019-04-21 12:07:00编辑:音乐人
知识点:《inputbox》 收集:友桓蹬 编辑:荷花仙子
本知识点包括:1、vb inputbox 函数怎么用??? 2、举个例子来表示 inputbox函数的所有参数 3、VB中inputbox的功能和使用方法,要详细的解释哦! 4、inputbox函数到底怎么用啊? 5、vbs中inputbox的用法? 。
《inputbox》相关知识
Private Sub Form_Click()
Dim a As Single, b As Single, c As Single, z As Single
a = InputBox("输入a的值", "")
b = InputBox("输入b的值", "")
c = InputBox("输入c的值", "")
If a < b Then z = a: b = a: b = z '先把这个较小值给z,把a的值给b,然后把较小值z传递给b,保证a最后存储大的数,b存储较小数
If a < c Then z = a: c = a: c = z '同理,先把这个较小值给z,把c的值给b,然后把较小值z传递给c,保证a最后存储大的数,z存储较小数
If b < c Then z = b: b = c: c = z '再处理b和c,保证b存较大数,c存较小数
Print a; b; c '最后a,b,c就是从大到小排列
End Sub
猜你喜欢:
1:vb inputbox 函数怎么用???
提示:Private Sub Command1_Click() a: Text1 = Trim(InputBox("请输入姓名", "姓名")) If Text1 = "" Then MsgBox "未输入完整,请重新输入" GoTo a End If b: Text2 = Trim(InputBox("请输入班级", "班级")) If Text2 = "" Then MsgBox "未输入完整,...
2:举个例子来表示 inputbox函数的所有参数
提示:l1=InputBox("请输入一个数字", "数学练习", 10, 100, 200, "使用帮助", 2) l2= InputBox("美丽七夕", "爱情絮语", 1314, 100, 800, "永恒的心", 8) 前3项容易明白,第4,第5个参数决定对话框出现的位置;第6项是帮助文件的名字,最后一项是相关...
3:VB中inputbox的功能和使用方法,要详细的解释哦!
提示:一对话框来中显示提示,等待用户输入正文或按下按钮,并返回包含文本框内容的 String。 语法 InputBox(prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context]) InputBox 函数的语法具有以下几个命名参数: 部分 描述 Prompt 必...
4:inputbox函数到底怎么用啊?
提示:Private Sub Command1_Click() a: Text1 = Trim(InputBox("请输入姓名", "姓名")) If Text1 = "" Then MsgBox "未输入完整,请重新输入" GoTo a End If b: Text2 = Trim(InputBox("请输入班级", "班级")) If Text2 = "" Then MsgBox "未输入完整,...
5:vbs中inputbox的用法?
提示:给你举个例子:st=inputbox("显示内容","标题","文本框的默认值,可以省略",8000,8000)msgbox st其中st表示你输入的内容~~