例3-1编一程序,当用户单击图中的 Command1按钮时程序弹 出输入框,要求用户输入信息;当用户输入信息并确定后,接 着弹出含有“是”和“否”按钮的消息框(标题为默认内容)。 若用户单击“是”按钮则程序继续运行;若单击“否”按钮 则程序退出 InputBox与 MsgBox使用例x 程序如下: Private Sub Command1 Click X= InputBox("请输入信息") y= MsgBox(, vb YesNo) fy=7Then'如果用户单击“否”按钮,那么 End'结束程序 vb3_1 AAA End if 是 否(N End sub 当用户在前一个输入框中输入“AAA时,弹出的消息 框
例3-1 编一程序，当用户单击图中的Command1按钮时程序弹 出输入框，要求用户输入信息；当用户输入信息并确定后,接 着弹出含有“是”和“否”按钮的消息框(标题为默认内容)。 若用户单击“是”按钮则程序继续运行；若单击“否”按钮 则程序退出。 程序如下： Private Sub Command1_Click() x = InputBox("请输入信息") y = MsgBox(x, vbYesNo) If y = 7 Then '如果用户单击“否”按钮，那么 End '结束程序 End If End Sub 当用户在前一个输入框中输入“AAA”时，弹出的消息 框
313Prin方法 Print方法的作用是在一些对象上输出信息,其一般使用格式如下: 「对象 Print spc(m)|Tabm)表达式列表结束符l 其中 对象:可选参数。可以是窗体、图片框名称或打印机对象 Spc(mn):可选参数。等效于 Space(n),表示输出n个空格字符 Tab(n):可选参数;用来将插入点定位在绝对列号n上; Tab表示下一个打印区 表达式列表:可选参数;是要打印的数值或字符串表达式 结束符:可选参数(有,;);指定下一个字符的插入点位置
3.1.3 Print方法 Print方法的作用是在一些对象上输出信息,其一般使用格式如下： [对象].Print [Spc(n) | Tab(n)] [表达式列表] [结束符] 其中： 对象：可选参数。可以是窗体、图片框名称或打印机对象。 Spc(n)：可选参数。等效于Space(n)，表示输出n个空格字符。 Tab(n)：可选参数；用来将插入点定位在绝对列号n上； Tab表示下一个打印区。 表达式列表：可选参数；是要打印的数值或字符串表达式。 结束符：可选参数（有，；）；指定下一个字符的插入点位置
例3-2_ Print方法的使用例。本程序执行后,输出的 结果将如图所示。 a Form1 Private Sub Form Click( ABC1■■■口 ABC2 X=50:y="库存书 Print"ABCI":"■■■■■" 1234567890 111存书=50本 Print"ABC2","□口口口口" 222存书=50本 Picture 1. Print Picture l Print 1234567890 Picture1Print Tab(3):"111;;"=,X; "4 Picture1 Print Spc(3);222, y: =,x; "4 End Sub
例3-2 Print方法的使用例。本程序执行后，输出的 结果将如图所示。 Private Sub Form_Click() x = 50 : y = "库存书" Print "ABC1"; "■■■■■" Print "ABC2", "□□□□□" Picture1.Print Picture1.Print "1234567890" Picture1.Print Tab(3); "111"; y; "="; x; "本" Picture1.Print Spc(3); "222"; y; "="; x; "本" End Sub
3.14格式输出 输出数据的格式由 Format函数确定, Format的一般格式如下 Format(表达式,格式字符串) 其中: 表达式:是要格式化的数值、日期或字符串类型表达式。 格式字符串:是一个加双引号的字符串,它说明前面的表达式 按什么格式输出。格式字符串有三类:数值格式、日期格式和 字符串格式。分别参见表3-3、表3-4和表3-5
3.1.4 格式输出 输出数据的格式由Format函数确定,Format的一般格式如下： Format（表达式,格式字符串） 其中： 表达式：是要格式化的数值、日期或字符串类型表达式。 格式字符串：是一个加双引号的字符串，它说明前面的表达式 按什么格式输出。格式字符串有三类：数值格式、日期格式和 字符串格式。分别参见表3-3、表3-4和表3-5
表3-3常用数值格式字符串及其含义 符号 作用 数值表达式 格式字符串 显示结果 0实际数字小于符号位数,数字前后加0:大于按实123456 "000 012345670 际数值显示或小数按四舍五入 1234567 "00000" 123457 #实际数字小于符号位数,数字前后不加0:大于按124567 1234567 实际数值显示或小数按四舍五入 1234567 "辦翔辨 123457 加小数点 1234 "000000 123400 千分位 1234567 绷0 1,2345670 %数值乘以100,加百分号 1234567 辨% 123456.7% $在数字前强加 1234567 "$胼 123457 +在数字前强加+ -124.567 +辨瓣 +12457 在数字前强加 1234567 辨辨 -123457 E+用指数表示 0.1234 000E+00 123E01 E与E+类似 1234567 0E0T" 12E4