VB中InputBox函数和MsgBox语句的使用实例
漳州师范学院
实验报告
课程vb程序设计实验室多媒体技术实验室
班级学号姓名
实验日期2012.03.05成绩教师审阅签字
实验题目：表达式、InputBox函数和MsgBox语句
1、实验目的
1．掌握表达式的构成和如何求表达式的值。
2．掌握赋值语句的使用。
3．掌握InputBox函数的使用。
4．掌握MsgBox语句的使用。
5.掌握数据声明，编码规则
2、实验要求
1上机实验之前，应认真预习有关实验内容及相应教材。
实验过程中应记录实验中的有关数据（包括出错信息等），以便课后进行分析。
2所有实验都应具备下列条件：
①硬件：IBM PC及其兼容机，要求CPU为Pentium166以上，内存在32MB以上，硬盘有200MB以上的自由空间。
②软件：Windows xp,开发环境为Visual Basic6.0中文企业版。
3上机时要遵守实验室的规章制度，爱护实验设备。
3实验内容与要求
1．启动和退出VB
2．开发简单程序。
3．将Visual Basic工程编译生成可执行文件。
4.立即窗口的使用
程序要求：
1.利用InputBox函数和MsgBox语句求圆的周长。
程序设计如图：
结果显示1：
结果显示2：
2.利用InputBox函数输入一元二次方程的系数a,b,c,计算方程的根并显示在窗体上。
程序设计如图：
此题有三种情况：第一种情况
第二种情况：
第三种情况：
3.分别用两种方法编写计算学生平均成绩的功能
a.单击“输入成绩、输出平均分”命令按钮，一次弹出3个输入框，分别提示用户输入英语、计算机、数学成绩，单击最后一个输入框的确定按钮后，窗体输出平均成绩
程序设计如图：
执行过程和结果：
b.用户在3个文本框中分别输入英语、计算机、数学成绩，单击命令按钮后，平均成绩显示在标签控件上。
程序设计如图：
计算：
结果：
【思考题】
1.表达式的正确书写。
2.inputbox和msgbox的正确应用
7建议和意见。
上机心得；学会本实验的操作方法，熟悉了元件的用法。
改进意见；还需通过不断练习提高。
inputbox和msgbox
Buttons参数值= 1 或 vbOKCancel
Visual Basic 程序设计
Buttons参数的设置
2.图标的样式
Buttons的和=按钮设置值+图标设置值+缺省按钮值
对应值 16 32 48 64
符号常量
出现的图标
vbCritical -------------------vbQuestion -------------------vbExclamation -------------vbInformation ---------------
InputBox函数---输入框
作用：
• 打开一个对话框,等待用户输入内容。 • 单击确定，返回输入值（字符型数据）
格式：
变量名 = InputBox ( 提示[,标题][,默认值][,X][,Y])
例：设置一个输入框：
提示用户输入查询学号。
提示： • 若提示内容中需要换行显示： 在换行处加chr(13)和chr(10) 或VBCRLF • 各项参数位置必须一一对应
VbDefaultButton1
VbDefaultButton2 VbDefaultButton3
Buttons参数值=65 ( 1+64+0) 或 vbOKCancel+ vbInformation+VbDefaultButton1 Visual Basic 程序设计
练习使用信息框
设计一个如下所示的提示框：
练习
Visual Basic 程序设计
练习
编制一个帐号与密码的检验程序： 要求：① 帐号不超过6个数字，密码4个字符， 密码框中不显示实际输入字符
② 帐号不正确时，提示有关信息，
05 一起学VB教程——对话框InputBox和MsgBox
对话框InputBox和MsgBox“大家好，从本节课程开始，我们一起来学习VB中各种对话框的使用。
”本节课程呢，我们一起来学习InputBox和MsgBox对话框。
这两个对话框在VB中非常的重要，使用频次很高，熟练的掌握它们，可以为编程带来更高的效率。
01—输入对话框InputBoxInputBox 函数作用:在一对话框来中显示提示，等待用户输入正文或按下按钮，并返回包含文本框内容的String。
语法:InputBox(prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context])参数:参数中，我们一般只需要使用前面三个Prompt、Title、Default。
Prompt表示对话框中的提示文本，用来提示用户需要输入什么。
Title是对话框的标题Default是对话框中的默认值。
举例1：运行效果如下：以上例子，虽然正确的使用了InputBox，但是并没有接收用户输入的数据。
因此实际上这样的用法通常是没有意义的。
举例2：运行效果如下：这个例子中，我用了一个变量age来接收InputBox函数的返回值，获得了用户输入的数据。
细心的读者可能会发现，例1和例2中，InputBox函数的用法有一点区别。
例子中InputBox中的参数，并没有用括号，而例2中却使用了括号。
其实，这是因为例1中没有使用变量接收InputBox函数的返回值，所以不需要使用括号，这一点我们在函数Function课程中已经讲过了。
相反例2使用了变量接收函数返回值，因此需要括号将参数给括起来。
另一点，需要注意的是，InputBox函数的返回值的数据类型是String字符串类型。
因此，如果需要使用其进行计算，则一定要记得用val来转换数据类型为数值型。
如果用户单击了“取消”按钮，则会返回一个长度为0的空字符串""。
InputBox举例错误案例：运行程序，分别输入1和2，发现输出的结果是12，如下图所示：这个例子中，1+2=12，很明显是不正确的，其错误的原因就是数据类型不正确。
使用对话框 2
一、 输入对话框
VB预定义的输入对话框，通过InputBox函 数来实现。 功 能： 用于产生一个能接收用户输入的对话框 语法格式：
变量= InputBox（提示内容 [，标题 ][，默认值 ][，横坐标 ][，纵坐标 ]）
变 量= InputBox（提示内容 [，标题 ][，默认值 ][，横坐标 ][，纵坐标 ]）
例：
4+48+0
a a
= MsgBox("输入文件名是否正确", 52, "请确认")
= MsgBox("输入文件名是否正确", vbYesNo+vbExclamation+vbDefaultButton1, "请确认")
小
结
1、掌握inputbox()函数 2、掌握msgbox()函数 作业：P71 第5题
当有某些项省略时： Private Sub Form_Click() Dim a As String a = InputBox("请输入名称", , "vbfile", 3000, 4000) End Sub
中间项有省略时，逗号不能省略。 后面四项都省略只剩第一项时： a = InputBox("请输入名称")
例：通过InputBox函数输入一个华氏温度，然后将 其转换为摄氏温度输出，保留两位小数。 转换公式为： 5
C
9
( F 32 )
用标签Label1显示 华氏温度值
用标签Label2显 示摄氏温度值
通过InputBox函数 输入一个华氏温度
Private Sub Form_Load() InputBox函数返回值为 Dim f As Single 字符串类型，通过Val函 Dim c As Single 数将其转换为数值型 f = Val(InputBox("输入华氏温度")) c = (f - 32) * 5 / 9 Label1.Caption = "输入华氏温度为：" & Format(f, "00.00") Label2.Caption = "输出摄氏温度为：" & Format(c, "00.00") 格式输出函数，指定f、c End Sub 的输出格式为00.00
VB常用函数介绍
VB常用函数介绍在VB (Visual Basic) 中，有许多常用函数可以帮助我们处理数据、操作字符串、进行数学计算等。
下面是一些VB常用函数的介绍：1. MsgBox函数：MsgBox函数用于显示一个消息框，通常用于向用户显示一些信息或提示。
它接受一个字符串参数作为要显示的消息文本。
例如：MsgBox("Hello World!")2. InputBox函数：InputBox函数用于显示一个输入框，允许用户输入一个值。
它接受一个字符串参数作为提示文本，并返回用户输入的值。
例如：Dim name as Stringname = InputBox("请输入您的姓名：")MsgBox("您的姓名是：" & name)3. Len函数：Len函数用于返回一个字符串的长度。
它接受一个字符串参数，并返回该字符串的字符数。
例如：Dim str as Stringstr = "Hello World!"MsgBox("该字符串的长度为：" & Len(str))4. Left函数和Right函数：Left函数和Right函数用于返回一个字符串的左侧或右侧指定数量的字符。
它们接受两个参数：一个是要截取的字符串，另一个是要截取的字符数。
例如：Dim str as Stringstr = "Hello World!"MsgBox("左侧的3个字符为：" & Left(str, 3))MsgBox("右侧的5个字符为：" & Right(str, 5))5. Mid函数：Mid函数用于返回一个字符串的中间一部分字符。
它接受三个参数：一个是要截取的字符串，另一个是要截取的起始位置，最后一个是要截取的字符数。
例如：Dim str as Stringstr = "Hello World!"MsgBox("中间的5个字符为：" & Mid(str, 7, 5))6. InStr函数：InStr函数用于在一个字符串中查找指定的子字符串，并返回第一次出现的位置。
实验三_vb表达式,InputBox函数和MsgBox语句
实验三表达式、InputBox函数和MsgBox语句
一实验目的
1．掌握表达式的构成和如何求表达式的值。
2．掌握赋值语句的使用。
3．掌握InputBox函数的使用。
4．掌握MsgBox语句的使用。
二实验内容
利用InputBox函数和MsgBox语句求圆的周长。
三实验步骤与指导
1．设计界面
在窗体上添加一个命令按钮。
初始界面如图3.1所示。
图3.1 初始界面
2．设置属性
如表3.1所示
设置属性后的界面如图3.2所示
图3.2
3．编写程序代码
4．运行程序
单击工具栏上的“启动”按钮，进入运行模式。
单击“计算圆的周长”命令按钮，在输入
框中输入圆的半径（例如，输入“2”），在消息框中输出半径和计算出来的圆的周长，如图3.3所示。
(a)单击“计算圆的周长”命令按钮
（b）输入圆的半径
(c) 输出圆的半径和周长
图3.3 计算圆的周长。
VB消息框(MsgBox)和输入对话框(InputBox)
[教案]（八）对话框授课方式：讲授法授课学时：2学时教学目的：通过本次课的学习，学生应该掌握能灵活使用消息框（MsgBox）和输入对话框（InputBox）和通用对话框，体现用户界面更具有交互性。
能灵活使用控件数组，并能编写出响应事件的代码。
教学重点和难点：1．消息框（MsgBox）和输入对话框（InputBox）的语法格式；2．各种属性的灵活使用。
教学过程：消息框（MsgBox）和输入对话框（InputBox）和通用对话框一、消息框（MsgBox）和输入对话框1．了解其在VB中的用途。
2．掌握基语法格式3．实际中的应用二、通用对话框1．用途介绍其在VB中的用途。
2．主要属性3．在实际中应用实例《Visual Basic程序设计语言》授课教案[讲稿]（八）对话框一、消息框（MsgBox）和输入对话框我们已学习了两个函数的语法格式，下面通过例子来说明其在实际的用法。
1 InputBox示例：设计一个程序，将输入的时、分和秒的和转换成秒数。
要求从输入对话框输入时、分和秒数。
事件过程与代码：Private Sub Command1_Click()Dim h As Integer, m As Integer, s As IntegerDim x As Longh = Val(Text1.Text)m = Val(Text2.Text)s = Val(Text3.Text)x = h * 3600 + m * 60 + sLabel1.Caption = "共计" & Str(x) & "秒"End SubPrivate Sub Command2_Click()Text1.Text = ""Text2.Text = ""Text3.Text = ""End SubPrivate Sub Command3_Click()Text1.Text = InputBox("时间中的小时数", "请输入", 0)End SubPrivate Sub Command4_Click()Text2.Text = InputBox("时间中的分钟数", "请输入", 0)End SubPrivate Sub Command5_Click()Text3.Text = InputBox("时间中的秒数", "请输入", 0)End Sub2、MsgBox函数例题：•将文本框中的英文字母进行大小写切换。
VB选择结构
注意:
If a>b Then
max=a
Else
max=b
End If
IIF函数的使用：
变量=IIF(条件表达式,表达式1,表达式2)
max=IIF(a>b,a,b)
3、多分支结构
（1）在Else子句之后嵌套
（2）在If子句之后嵌套
If 条件表达式1 Then
If 条件表达式2 Then
语句块1
Else
语句块2
End If
Else
语句块3
End If
If 条件表达式1 Then
语句块1
ElseIf 条件表达式2 Then
语句块2
ElseIf 条件表达式3 Then
语句块3
.......
Else
语句块n
End If
Dim i As Integer
i = MsgBox("你真的要退出吗?", vbOKCancel + vbQuestion, "退出提示框")
If i = vbOK Then
cancel=false '退出系统
else
cancel=true '不退出系统
注意：
（1）Select Case之后的表达式可以是任意表达式;
（2）Case后面的值可以采用以下形式：
a、可以是用逗号隔开的各个表达式的值
case 2,4,6,8
b、表达式值1 TO 表达式值2
case 100 to 200
case 80 to 89
Text2.Text="良好"
输入框、消息框的使用
VB实训五输入框、消息框的使用【任务提出】1、了解输入框产生的方法，掌握Inputbox函数的参数设置及在程序中正确使用输入框2、了解消息框产生的方法，掌握Msgbox函数的参数设置及在程序中正确使用输入框【分析任务】一、输入框的使用输入框由Inputbox函数来产生。
InputBox函数用来产生要求输入数据的输入框；在输入框中显示提示文本、文本框和按钮。
用户可在文本区输入数据，然后单击“确定”按钮,函数返回值是用户在文本区输入的数据，其类型为字符型。
如果单击“取消”按钮，则函数返回值是空字符串。
当用户单击“确定”或“取消”按钮后，输入框即从屏幕上消失。
每执行一次Inputbox函数，用户只能输入一个数据，另外输入框的样式是固定的，用户不能改变。
Inputbox函数的一般格式为：InputBox 提示 [，标题][，输入文本框中的显示的默认值][,x坐标，y坐标]其中“提示”是必须项，字符串表达式，在对话框中作为提示信息，若要在多行显示提示信息，则可以在各行之间用vbnewline来分隔，它是代表换行的常量，需字符串连接符连接，例如：inputbox “第一行” & vbnewline & “第一行”；“标题”。
字符串表达式，若省略，则标题为应用程序程序名“x坐标，y坐标”：对话框左上角在屏幕上的位置，屏幕左上角为坐标原点，单位Twip 二、MsgBbox函数消息框用来显示简短的消息，并要求用户作出一定得响应。
它由MsgBox函数产生。
创建消息框的格式如下：MsgBox （提示[，按钮数值、图标数值及默认按钮][，标题[，helpfile,context]）其中prompt：它是必需的，显示在对话框中的消息。
Botton：指定显示按钮的数目及形式、使用的图标样式按钮的数目的数值含义：0 在对话框中只显示“确定”按钮；1 在对话框中显示“确定”和“取消”两个按钮2 在对话框中显示“终止（A）”、“重试（R）”、“忽略（I）”3个按钮3 在对话框中显示“是（Y）”、“否（N）”、“取消”3个按钮4 在对话框中显示“是（Y）”、“否（N）”两个按钮5 在对话框中显示“重试（R）”、“取消”两个按钮图标的数目的数值的含义：16在对话框中显示“X”图标32 在对话框中显示“？”图标48 在对话框中显示“！”图标64 在对话框中显示“I”图标【实施任务】1、用InputBox函数对程序加密2、书本P57例5.33、书本P61例5.44、书本P61例5.55、编写一个程序，要求：1）运行后首先弹出下面上图，文本区中的默认值为20；2）在文本区中输入一个数字（假如：10）后，单击“确定”按钮后弹出另一个界面，文本框中有垂直滚动条；3）当在文本框中输入字符时，窗体上同步显示出文本框中的字符，当文本框字符数超过输入框中的数字减去5时，会弹出一个消息框，提示出文本框中的字符数；4）当文本框中字符输入结束敲击回车键时，在窗体上显示出“输入结束。
VB实验指导四(inputbox,msgbox,简单if语句)
VB实验指导四（inputbox，msgbox，简单if语句）
实验目的：
1、掌握inputbox函数的使用
2、掌握msgbox函数和过程的使用
3、掌握简单if语句的使用
实验内容：
1、利用输入对话框输入一个学生的姓名和电话，然后以消息框的形式给出提示，最后显示在窗体上的两个标签上显示。
（Inputbox和msgbox的练习）
2、输入两个数，求它们中的最大数。
请先自己看着给你的运行效果图，完成程序，然后再对比老师给你的程序。
3、输入一个年份，判断该年是否为闰年。
实验分析：
（1）判断条件为：
–年份(y)能被4整除，但不能被100整除；
–年份(y)能被400整除。
–只要满足其中一个条件，该年份即为闰年。
（2）表示这个条件的逻辑表达式为：
(y Mod 4=0 And y Mod 100<>0) Or (y Mod 400=0)
4、当点击窗体空白处后，实现图1所示的消息对话框，显示“终止”、“重试”和“忽略”按钮，图标样式为，默认按钮为重试按钮，标题为“错误提示”。
当在消息框中单击某个按钮后，在窗体上输出用户的按键信息。
关于InputBox和Msgbox函数的用法介绍
关于InputBox和Msgbox函数的用法介绍—关键词：Msgbox Inputbox 用法InputBox 函数在一对话框来中显示提示，等待用户输入正文或按下按钮，并返回包含文本框内容的String。
语法InputBox(prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context])InputBox 函数的语法具有以下几个命名参数的部分描述Prompt 必需的。
作为对话框消息出现的字符串表达式。
prompt 的最大长度大约是1024 个字符，由所用字符的宽度决定。
如果prompt 包含多个行，则可在各行之间用回车符(Chr(13))、换行符(Chr(10)) 或回车换行符的组合(Chr(13) & Chr(10)) 来分隔。
Title 可选的。
显示对话框标题栏中的字符串表达式。
如果省略title，则把应用程序名放入标题栏中。
Default 可选的。
显示文本框中的字符串表达式，在没有其它输入时作为缺省值。
如果省略default，则文本框为空。
Xpos 可选的。
数值表达式，成对出现，指定对话框的左边与屏幕左边的水平距离。
如果省略xpos，则对话框会在水平方向居中。
Ypos 可选的。
数值表达式，成对出现，指定对话框的上边与屏幕上边的距离。
如果省略ypos，则对话框被放置在屏幕垂直方向距下边大约三分之一的位置。
Helpfile 可选的。
字符串表达式，识别帮助文件，用该文件为对话框提供上下文相关的帮助。
如果已提供helpfile，则也必须提供context。
Context 可选的。
数值表达式，由帮助文件的作者指定给某个帮助主题的帮助上下文编号。
如果已提供c ontext，则也必须要提供helpfile。
举例本示例说明使用InputBox 函数来显示用户输入数据的不同用法。
如果省略x 及y 坐标值，则会自动将对话框放置在两个坐标的正中。