第5章数据输入输出

1、第第5章数据输入输出章数据输入输出5.1 5.1 数据输出数据输出- Print- Print方法方法1. Print1. Print方法方法 功能：在窗体/立即窗口/图片框/打印机上输出信息格式：对象名称对象名称. Print 表达式表表达式表 , | ; 对象缺省为当前窗体缺省为当前窗体，输出项缺省则打印一空白行缺省则打印一空白行输出项之间可用分号或逗号分隔：使用分号分号，其后的输出项紧接紧接着前一个输出项输出；使用逗号逗号，其后的输出项在下一个输出区下一个输出区输出。两个输出区默认相隔14列。Print 方法具有计算和输出双重功能,但无赋值功能。每执行一次print方法要自动换行。为了仍

2、在同一行显示，可在行尾加上一个分号或逗号。例， Private Sub Form_Click() Print Print Tab(15); * Print Tab(13); *; Spc(1); *; Spc(1); *“ End Sub 5.1 5.1 数据输出数据输出- Print- Print方法方法2 2 与与PrintPrint方法有关的函数方法有关的函数1）Tab函数格式：TabTab（n n）参数n为数值表达式，是下一个输出位置的列号，最左边为1；若n比行宽，显示位置为n mod 行宽。若小于1，则输出位置移到第一列。当在一个print方法里面有多个TAB函数时，各输出项间用分号

3、分号分隔。逗号和分号作用同print5.1 5.1 数据输出数据输出- Print- Print方法方法2）Spc函数格式：Spc（n）3）空格函数格式：Space（n）4）cls方法格式：对象.Cls 5）Move方法格式： 对象.Move 左边距离，上边距离，宽度，高度5.1 5.1 数据输出数据输出- Print- Print方法方法5.1 5.1 数据输出数据输出- Print- Print方法方法3. 格式输出 功能：使数值、日期或字符串按指定的格式输出 格式：Format$(表达式表达式 , 格式字符串格式字符串) 5.1 5.1 数据输出数据输出- Print- Print方法方

4、法5.2 5.2 数据的输入输出数据的输入输出数据输入数据输入 功能：生成输入对话框 ， 常用格式：InputBox(InputBox(prompt, title , default , xpos , ypos.helpfile,context) promptprompt字符串，指定输入框中显示的信息提示用户信提示用户信息，输入什么信息息，输入什么信息TitleTitle指定输入框的标题，缺省值为工程名输入框作用输入框作用DefaultDefault字符串，指定文本框中的初始内容，缺省为空xposxpos和和yposypos数值表达式，成对出现成对出现或者成对缺省， 指定输入框左上角相对于屏幕

5、屏幕的位置。 helpfile,context 显示对话框的有关帮助信息InputBox函数一次只能输入一个值,返回字符串返回字符串 例子例子5.3 5.3 数据输出数据输出- - MsgBoxMsgBox函数函数MsgBox函数 功能：创建预定义的消息对话框常用格式：MsgBox(prompt, buttons ,title.helpfile,context) prompt字符串，指定消息框中显示的信息 Buttons指定消息框中显示的按钮数目及形式、图标样式等，缺省值为0，常用的设置值见教材表5.3 Title指定消息框的标题，缺省值为工程名 用户所选按钮的返回值为整数返回值为整数(见教材

6、表5.5)可作为继续执行程序的依据。 说明： 如果消息框中显示的信息过长，可使用回车符Chr(13) 和换行符Chr(10) 如果不需要返回值不需要返回值，可使用没有括号的MsgBox语句语句： MsgBox prompt, buttons , title MsgBox prompt, buttons , title 例：Msg = 非法的数据输入! & Chr(13) & Chr(10) & 请重新输入Title = 出错提示MsgBox Msg, vbCritical, Title5.3 5.3 数据输出数据输出- - MsgBoxMsgBox函数函数例子例子字体类型字体类型一般格式：一般

7、格式： . FontName =. FontName =“字体类型字体类型“ 该属性可以字符串形式返回返回当前对象的字体类型。在程序中，也可以使用赋值赋值语句，用字体类型名(字符串)设置该属性。示例示例5.4 5.4 字形字形 2. 字体大小字体大小一般格式：一般格式： . FontSize = . FontSize = 该属性可以数值形式返回当前对象显示字体大小。也可以用数值表达式表示的“点数”向 Fontsize 属性赋值,改变对象显示字体的大小。示例示例3. 3. 其他属性其他属性 除字体类型和大小外，VB还提供了其它一些属性。以下各属性以布尔类型值返回或设置字体风格布尔类型值返回或设置

8、字体风格。1) 1) 粗体字粗体字 . FontBold = True | False . FontBold = True | False 返回或设置是否“粗体”。FontBold 为 True时，表示粗体，否则文本按正常字输出。2 2) 斜体字斜体字 . FontItalic = True | False . FontItalic = True | False 当FontItalic设置为True时，文本以斜体输出。1.1.直接输出直接输出一般格式：一般格式：Printer.Print Printer.Print 表达式表表达式表 该属性可以数值形式返回当前对象显示字体大小。该属性可以数值形式返回当前对象显示字体大小。也可以用数值表达式表示的也可以用数值表达式表示的“点数点数”向向 Fontsize Fontsize 属性赋属性赋值值, ,改变对象显示字体的大小。改变对象显示字体的大小。属性和方法：属性和方法：1 1）PagePage属性属性2 2）NewPageNewPage