总复习(VB).ppt
文本预览下载声明
4.2.1 用InputBox函数输入数据 1. InputBox函数的格式 InputBox(提示信息[,标题][,默认值]) 2. 功能 提示一对话框,等待用户输入正文或按下按钮,并返回包含文本框内容的字符串。 3. 说明 提示信息: 字符串表达式。 可用Chr(13)回车符、Chr(10)换行符、 Chr(13) Chr(10)、vbCrLf换行。 标题: 字符串表达式,缺省为当前工程名 默认值: 字符串表达式,省略时默认为空 返回值: 字符串 例: r = Val(InputBox(请输入半径)) h = Val(InputBox(请输入高)) 或: r = Val(InputBox(请输入半径, 计算底面积、 侧面积、体积, 1)) h = Val(InputBox(请输入高, 计算底面积、侧面积、体积, 1)) 5. Tab键序 指按Tab键时光标在各个控件之间移动的顺序。 每个窗体都有自己的Tab键序。 默认键序与控件的建立次序一致。 TabIndex属性 决定Tab键序,改变该属性可以改变Tab键序 。 TabStop属性 决定是否能够使用 Tab 键将焦点移动到当前对象。 用文本框输出数据时,也就是将数据赋给文本框的Text属性。 例:用文本框Text1输出一个字符串 Text1.Text = hello 文本框的Text属性是字符串类型,因此如果用文本框输出数值型数据,需要首先将该数据转换成字符串类型。 例:用文本框Text1输出一个数值型数据 X = 3 : Y=5 Text1.Text = Str(X) Text2.Text=Format(X/Y,0.000) 4.3.1 用TextBox控件输出数据 如果需要用一个文本框输出多个数据,需要将这些数据连接成一个字符串后再对文本框赋值。 例:用文本框Text1输出两个数据 X = 3 ^ 5 Y = 7 ^ 4 Text1.Text = Str(X) Str(Y) 或: Text1.Text = Str(X) vbCrLf Str(Y) 回车换行 MsgBox函数用于产生一个消息框。消息框常用于在屏幕上显示一个对话框,给出一些提示或警告信息,并允许用户进行选择。程序可根据该选择确定进一步的操作。 4.3.3 用MsgBox函数输出数据 例如: 例: “提示信息” Private Sub Command1_Click() MsgBox 提示信息 End Sub 例: “提示信息”换行 Private Sub Command1_Click() MsgBox 第一行 Chr(13) 第二行 End Sub 4.3.4 用Print方法输出数据 1. Print方法 格式: [对象名.] Print [表达式表] [ { ; | , } ] 对象名: 窗体, 如 Form1.Print Hello 图片框,如 Picture1.Print Hello 打印机, 如 Printer.Print Hello 立即窗口,如 Debug .Print Hello 省略: 默认为当前窗体。 表达式表: 多个表达式使用逗号或分号隔开。最后也可以加逗号或分号。 输出格式: 表达式表用逗号分隔: 以14个字符为单位把一个输出行分成若干区段。 表达式表用分号分隔: 后一项紧跟前一项输出。 数值型数据前有一个符号位(正号不显),后面留一个空格位。 字符串原样输出,前后无空格。 注意结尾处逗号,分号和无字符的区别 例: Private Sub Form_Activate() Print 12345678901234567890 Print 2+4=;2 + 4, Print 2-4=; Print 2 - 4 End Sub 例: Private Sub Form_Activate() Print 12345678901234567890 Print 2+4=; 2 + 4 Print 2-4=, 2 - 4 End
显示全部