数据输出与输入
程序运行时,常常需要与外界交换信息,如从键盘、磁盘等外部设备向计算机输入信息,将计算机中的信息显示到屏幕上或从打印机打印出来,这就是数据的输入与输出,是程序设计最基本的两个功能。VB提供了丰富的输入/输出形式,与控件结合实现的输入/输出操作更加灵活、形象、直观。
1. Print方法
Print方法是最常用的输出方法,它可以实现在窗体、图片框、打印机或立即窗口中输出数据。
格式:[对象名.]Print [表达式列表]
功能:在指定对象中输出表达式的值
说明:
(1)“对象名”可以是窗体、图片框、打印机或立即窗口。例如,
Form1.Print "中国" '在窗体Form1中输出字符串"中国"
Picture1.Print "中国" '在图片框Picture1中输出字符串"中国"
Printer.Print "中国" '在打印机中输出字符串"中国"
Debug.Print "中国" '在立即窗口中输出字符串"中国"
如果省略“对象名”,则默认对象为当前窗体。例如,
Print "中国" '在当前窗体中输出字符串"中国"
(2)“表达式列表”可以是一个或多个表达式。如果是数值表达式,则输出数值表达式运算后的结果,输出数值的前面有一个符号位,后面有一个空格;如果是字符串表达式,则原样输出,输出字符串的前后都没有空格;如果省略“表达式列表”,则输出一个空行。
(3)一般情况下,执行Print方法后会自动换行,即下一个Print语句的输出内容会在新的一行显示。如果要下一个Print语句的输出内容也在同一行上显示,可以在当前Print语句的末尾加上一个分号或逗号。其中,分号表示紧凑格式,逗号表示标准格式。
(4)可以用“?”代替关键字Print,VB会自动将它转换成Print。
2. Cls方法
格式:[对象名.]Cls
功能:清除程序运行时指定对象上产生的文本和图形。“对象名”可以是窗体或图片框,如果省略“对象名”,则默认对象为当前窗体。例如,
Form1.Cls
Picture1.Cls
Cls
设计时窗体或图片框中使用Picture属性设置的背景位图和放置的控件不受Cls方法的影响。
3.数据输入InputBox函数
VB 提供了InputBox函数,用于输入数据。
格式:InputBox(提示信息[,标题][,缺省值][,x坐标][,y坐标])
功能:产生一个输入框,等待用户输入信息后,将输入信息作为字符串返回。
说明:
(1)各参数功能如下。
①“提示信息”是一个长度不超过1024个字符的字符串,用于提示用户输入。“提示信息”的长度超过一行时可以自动换行,若要强制换行可以使用回车符Chr(13)、换行符Chr(10)或回车换行符Chr(13)&Chr(10)。
② “标题”是一个字符串,如果省略,则默认标题为工程的名称。
③ “缺省值”是一个字符串,表示默认的输入值。
4.消息框MsgBox函数
消息框用于向用户显示消息,等待用户作出选择,将用户的选择作为程序继续运行的依据。消息框有函数和语句两种形式。
格式:MsgBox(提示信息 [,按钮类型][,标题])
功能:产生一个消息框,等待用户作出选择,根据用户的选择,返回一个整数。
说明:
(1)“提示信息”是一个长度不超过1024个字符的字符串,用于向用户显示消息。“提示信息”的长度超过一行时可以自动换行,若要强制换行可以使用回车符Chr(13)、换行符Chr(10)或回车换行符Chr(13)&Chr(10)。
(2)“标题”是一个字符串,如果省略,则默认标题为工程的名称。
(3)“按钮类型”用来指定消息框中显示按钮的个数、使用图标的样式、缺省按钮的位置以及消息框的强制回应等。每项内容的详细取值参见扩展学习。
例如,
x=MsgBox("this is a msgbox!",1,"MsgBox Dexmo")
显示消息框如图7所示。
x=MsgBox("Demo ",," 工程1")
按钮类型可以由值或符号常量组成,组成方法为:每一类选择一个值或符号常量,把它们加起来即可,一般只用前3类。例如,
x=MsgBox("demo ", 0+16+0," 工程1")
x= MsgBox ("demo", vbYesNoCancel+ vbInformation +vbDefaultButton2,"工程1")
(4)MsgBox函数的返回值是由用户在消息框中选择的按钮决定的。每个按钮对应的返回值参见扩展学习。
5. MsgBox语句
格式:MsgBox 消息 [,按钮类型][,标题]
其功能与MsgBox函数类似,但MsgBox语句没有返回值,所以常用于简单信息的提示。其参数的含义与MsgBox函数相同。例如,
MsgBox "下载完毕"
=======================================================================================
扩展学习:扩展学习2.5.doc(下载附件 230 KB)-Print有关函数详解+Msgbox参数详解
案例:案例2.5.doc(下载附件 32 KB)-Print用法详解
======================================================================================

