退出
第 5章 数据的输出与输入
退出
第 2页
5.1 数据的输出
5.2 数据输入函数 InputBox
5.3 消息框 MsgBox
5.4 字形
5.5 打印机输出
退出
第 3页
5.1 数据的输出
?Print方法
?与 Print方法有关的函数
?Cls方法
退出
第 4页
Print方法
格式,[对象名,]Print [表达式列表 ]
功能,在指定对象中输出表达式的值 。
说明：
⑴ 对象可以是窗体, 立即窗口, 图片框和打印机等 。
例如：
Form1.Print "中国 "
Picture1.Print "中国 "
Printer.Print "中国 "
Debug.Print "中国 "
Print "china"
退出
第 5页
⑵,表达式列表, 是输出的内容, 如果 Print后面没有表达式,
则输出一个空行 。
输出内容多个表达式之间用分号, 逗号或空格隔开 。
⑶ Print方法执行后会自动换行 。
如果要下一个 Print语句输出的信息也在同一行上显示, 可
以在语句末尾加上一个逗号或分号 。 其中, 分号表示紧凑
模式, 逗号表示标准模式 。
⑷ Print关键字可以用,？, 代替, VB会自动将它翻译成
Print。
退出
第 6页
与 Print方法有关的函数
1.Tab( ) 函数
格式,Print Tab(n);输出内容
功能,与 Print方法结合使用, 从指定位置 n开始输出信息, n为数值表达式,
其值为整数, 表示输出位置的列号 。
2,Spc( ) 函数
格式,Print Spc(n);输出内容
功能,与 Print方法结合使用, 输出内容从当前位置跳过 n列, 即 n个空格 。
3.Space( )函数
格式,Space(n)
功能,返回 n个空格 。
4.Format( )函数
格式,Print Format(数值表达式 [,格式说明串 ])
功能,与 Print方法结合使用，将数值表达式按指定的格式输出。
退出
第 7页
Format( )函数的, 格式说明串, 包括以下几种符号：
# 表示一个数字位, 用于控制输出内容的长度 。
0 与 #基本相同, 区别是当输出内容长度小于给定的 #个数时, 多余位以
0补齐 。
,显示小数点, 与 #,0结合使用 。 小数部分多余的数字将被四舍五入 。
,千位分隔符, 即从小数点左边第 1位开始, 每 3位用一个逗号隔开 。
％ 将数值以百分数的形式输出, 百分号放在格式说明串的末尾 。
$ 美元符号, 放在格式说明字符串的开始 。
+,- 正, 负号, 可将数值带上符号 。
E+,E- 将数值转换为指数形式显示 。
【例 5.1】 验证格式输出结果。
退出
第 8页
Cls方法
格式,[对象名,]Cls
功能,清除程序运行时窗体或图片框所生成的图形和文本 。
对象可以是窗体或图片框，缺省时表示清除当前窗体中
的显示内容。例如：
Form1.Cls
Picture1.Cls
Cls
退出
第 9页
5.2 数据输入函数 InputBox
格式,InputBox(提示信息 [,标题 ][,缺省值 ][,x坐标 ][,y坐标 ])
功能,InputBox函数能产生输入框, 并有提示信息, 等待用
户输入信息后, 将输入信息作为字符串返回 。
说明,其中主要参数的含义如教材图 5.2所示 。
输入区
【例 5.2】 利用 InputBox函数输入学生的一组信息。
退出
第 10页
5.3 消息框 MsgBox
消息框用于向用户显示消息，等待用户做出必要的响
应，并返回一个整型数值，作为程序继续运行的依据。消
息框有函数形式和语句形式。
退出
第 11页
MsgBox函数
格式,MsgBox(提示信息 [,按钮类型 ][,标题 ])
例如,x=MsgBox("this is a msgbox!",1,"MsgBox Dexmo")
【例 5.3】 测试消息框及返回值 。
说明：
1．“按钮类型”用来指定显示按钮的个数、使用的图标样
式、缺省按钮（即活动状态按钮）的位置以及消息框的强制
回应等。每项内容详细取值见表 5.1。
2,MsgBox函数的返回值是由用户选择的按钮决定的, 每个
按钮都有一个特定的返回值,
退出
第 12页
MsgBox语句
消息框的语句形式
其作用与 MsgBox函数类似 。
格式, MsgBox 消息 [,按钮类型 ][,标题 ]
例如：
MsgBox "下载完毕 "
退出
第 13页
5.4 字形
1,字体类型 FontName属性
格式,对象,FontName [="字体类型 "]
FontName = "system"
FontName = "黑体 "
2,字体大小 FontSize属性, 设置字体的大小 。
格式, FontSize[=点数 ]
FontSize = 20
FontSize = 24
Visual Basic 中的字体最大点数为 2106点 。
退出
第 14页
3．其它属性
粗体字 FontBold
斜体字 FontItalic
加删除线 FontStrikethru
加下划线 FontUnderline
这些属性的值都是 Boolean类型，即只有 True和 False两个值
5.4 字形
退出
第 15页
格式,Printer.Print[打印内容 ]
在打印结束时，调用 EndDoc方法表示结束打印。例如：
Private Sub Command1_Click()
Printer.Print "打印机测试 "
Printer.Print "This is the first page!"
Printer.EndDoc
End Sub
5.5 打印机输出
退出
第 16页
5.5 打印机输出
Visual Basic 还提供了一些控制打印的方法和属性：
1.多页打印
实现强制换页打印 。
格式,Printer.NewPage
格式,Printer.Page
使用此语句可以在打印的时候同时打印出页号 。
2.结束打印
格式,Printer,EndDoc
3.取消打印
格式,Printer.KillDoc
退出
第 17页
窗体输出
格式,[窗体,]PrintForm
例如：
Print "********"
PrintForm
如果窗体中有图形，则需将 AutoRedraw属性设置为 True，
才能将图形打印出来。
打印结束后,PrintForm调用 EndDoc方法清空打印机。
第 5章 数据的输出与输入
退出
第 2页
5.1 数据的输出
5.2 数据输入函数 InputBox
5.3 消息框 MsgBox
5.4 字形
5.5 打印机输出
退出
第 3页
5.1 数据的输出
?Print方法
?与 Print方法有关的函数
?Cls方法
退出
第 4页
Print方法
格式,[对象名,]Print [表达式列表 ]
功能,在指定对象中输出表达式的值 。
说明：
⑴ 对象可以是窗体, 立即窗口, 图片框和打印机等 。
例如：
Form1.Print "中国 "
Picture1.Print "中国 "
Printer.Print "中国 "
Debug.Print "中国 "
Print "china"
退出
第 5页
⑵,表达式列表, 是输出的内容, 如果 Print后面没有表达式,
则输出一个空行 。
输出内容多个表达式之间用分号, 逗号或空格隔开 。
⑶ Print方法执行后会自动换行 。
如果要下一个 Print语句输出的信息也在同一行上显示, 可
以在语句末尾加上一个逗号或分号 。 其中, 分号表示紧凑
模式, 逗号表示标准模式 。
⑷ Print关键字可以用,？, 代替, VB会自动将它翻译成
Print。
退出
第 6页
与 Print方法有关的函数
1.Tab( ) 函数
格式,Print Tab(n);输出内容
功能,与 Print方法结合使用, 从指定位置 n开始输出信息, n为数值表达式,
其值为整数, 表示输出位置的列号 。
2,Spc( ) 函数
格式,Print Spc(n);输出内容
功能,与 Print方法结合使用, 输出内容从当前位置跳过 n列, 即 n个空格 。
3.Space( )函数
格式,Space(n)
功能,返回 n个空格 。
4.Format( )函数
格式,Print Format(数值表达式 [,格式说明串 ])
功能,与 Print方法结合使用，将数值表达式按指定的格式输出。
退出
第 7页
Format( )函数的, 格式说明串, 包括以下几种符号：
# 表示一个数字位, 用于控制输出内容的长度 。
0 与 #基本相同, 区别是当输出内容长度小于给定的 #个数时, 多余位以
0补齐 。
,显示小数点, 与 #,0结合使用 。 小数部分多余的数字将被四舍五入 。
,千位分隔符, 即从小数点左边第 1位开始, 每 3位用一个逗号隔开 。
％ 将数值以百分数的形式输出, 百分号放在格式说明串的末尾 。
$ 美元符号, 放在格式说明字符串的开始 。
+,- 正, 负号, 可将数值带上符号 。
E+,E- 将数值转换为指数形式显示 。
【例 5.1】 验证格式输出结果。
退出
第 8页
Cls方法
格式,[对象名,]Cls
功能,清除程序运行时窗体或图片框所生成的图形和文本 。
对象可以是窗体或图片框，缺省时表示清除当前窗体中
的显示内容。例如：
Form1.Cls
Picture1.Cls
Cls
退出
第 9页
5.2 数据输入函数 InputBox
格式,InputBox(提示信息 [,标题 ][,缺省值 ][,x坐标 ][,y坐标 ])
功能,InputBox函数能产生输入框, 并有提示信息, 等待用
户输入信息后, 将输入信息作为字符串返回 。
说明,其中主要参数的含义如教材图 5.2所示 。
输入区
【例 5.2】 利用 InputBox函数输入学生的一组信息。
退出
第 10页
5.3 消息框 MsgBox
消息框用于向用户显示消息，等待用户做出必要的响
应，并返回一个整型数值，作为程序继续运行的依据。消
息框有函数形式和语句形式。
退出
第 11页
MsgBox函数
格式,MsgBox(提示信息 [,按钮类型 ][,标题 ])
例如,x=MsgBox("this is a msgbox!",1,"MsgBox Dexmo")
【例 5.3】 测试消息框及返回值 。
说明：
1．“按钮类型”用来指定显示按钮的个数、使用的图标样
式、缺省按钮（即活动状态按钮）的位置以及消息框的强制
回应等。每项内容详细取值见表 5.1。
2,MsgBox函数的返回值是由用户选择的按钮决定的, 每个
按钮都有一个特定的返回值,
退出
第 12页
MsgBox语句
消息框的语句形式
其作用与 MsgBox函数类似 。
格式, MsgBox 消息 [,按钮类型 ][,标题 ]
例如：
MsgBox "下载完毕 "
退出
第 13页
5.4 字形
1,字体类型 FontName属性
格式,对象,FontName [="字体类型 "]
FontName = "system"
FontName = "黑体 "
2,字体大小 FontSize属性, 设置字体的大小 。
格式, FontSize[=点数 ]
FontSize = 20
FontSize = 24
Visual Basic 中的字体最大点数为 2106点 。
退出
第 14页
3．其它属性
粗体字 FontBold
斜体字 FontItalic
加删除线 FontStrikethru
加下划线 FontUnderline
这些属性的值都是 Boolean类型，即只有 True和 False两个值
5.4 字形
退出
第 15页
格式,Printer.Print[打印内容 ]
在打印结束时，调用 EndDoc方法表示结束打印。例如：
Private Sub Command1_Click()
Printer.Print "打印机测试 "
Printer.Print "This is the first page!"
Printer.EndDoc
End Sub
5.5 打印机输出
退出
第 16页
5.5 打印机输出
Visual Basic 还提供了一些控制打印的方法和属性：
1.多页打印
实现强制换页打印 。
格式,Printer.NewPage
格式,Printer.Page
使用此语句可以在打印的时候同时打印出页号 。
2.结束打印
格式,Printer,EndDoc
3.取消打印
格式,Printer.KillDoc
退出
第 17页
窗体输出
格式,[窗体,]PrintForm
例如：
Print "********"
PrintForm
如果窗体中有图形，则需将 AutoRedraw属性设置为 True，
才能将图形打印出来。
打印结束后,PrintForm调用 EndDoc方法清空打印机。
