vb 数据的输入输出

《vb 数据的输入输出》由会员分享，可在线阅读，更多相关《vb 数据的输入输出（26页珍藏版）》请在金锄头文库上搜索。

1、数据的输入输出 数据输出-print方法 print 方法 可以在窗体上显示文本字符串和表达式的值，并可在其他 图形对象上或打印机上输出信息。格式： 对象名称.print表达式,|; 说明： 1、对象名称可以是窗体、图片框或打印机，也可以是立即窗口。如 果省略对象名称则在当前窗体上输出。 2、表达式可以是一个或多个表达式，可以是数值表达式或字符串。 3、当输出多个表达式或字符串时个表达式用分隔符（逗号，分号或 空格）隔开。 4、print 具有计算和输出双重功能，对于表达式先计算后输出。 5、一般情况下每执行一次print方法都要自动换行。若需要在同一行 上输出，可以在末尾加上一个分号或逗号。

2、 数据输出-与print 有关的函数 1、tab函数 把光标移到参数n指定的位置，从这个位置开始输出信息，要输 出的内容放在tab函数的后面，并用分号隔开。 例如：print tab(25);800 将在第25个位置输出数值800 注意： 1、参数N为数值表达式，他是下一个输出位置的序号，表示在输出前把光 标移到该列，通常最左边为第一列，如果当前显示位置已经超过N值则自动 下移一行。 2、当在一个print方法中有多个tab函数时，每个tab函数对应一个输出项， 个输出项之间用分号隔开 做例子 SPC函数 语法格式：spc(n) 在print输出中，可以跳过n个空格 注意： 1、n的取值范围：

3、032767，是一个整数。 2、spc函数与输出项之间用分号隔开。 3、spc函数与tab函数可以互相代替。 空格函数 语法格式：space(n) 返回n个空格 格式输出 输出函数：format可以使数值或日期按指定格式输出。语法格式： Format（数值表达式，格式字符串） 注意： 1、如果省略格式字符串，则format函数与str函数基本相同，两者之 间按的差别在于当把正数转换成字符串时str函数在字符串前留一 个空格，而format函数不留空格。 2、格式字符串是一个字符串常量或变量，它由专门的格式说明字符 组成，由这些字符决定数据项的显示格式，并指定显示区段的长 度。当格式字符串为常量

4、时，必须放在双引号中。 格式说明字符表 格式说明字符 字符作用 #数字，不在前面或后面补0 0数字，在前面或后面补0 .小数点 ,千分位分隔符 %百分比符号 $美元符号 -、+负号、正号 E+、E-指数符号 格式说明字符 1、# 表示一个数字位，#的个数决定了显示的长度 例子，在立即窗口输出 Print format(12345,”#”) Print format(12345,” #”) 2、0 与#功能相同，只是多余的位以0补齐 例子： Print format(12345,”0000000”) Print format(12345,” 000”) 3、. 显示小数点 小数点与#或0结合使用

5、，可以放在显示区段的任何 位置，根据字符串的位置，小数部分多余的数字按照四舍五入处理 。 Print format(12345,”#.#”) Print format(12.345,” 000.00”) 格式说明字符 4 ，逗号 在格式字符串中起到分位的作用，即从小数点左边第一位 开始，每3位用一个逗号隔开。逗号可以放在小数点的任何位置。 （小数点不要放在头部也不要放在仅靠小数点） 例子： Print format(12345.67,”#,#.#”) 5 % 百分号 通常放在格式字符串的尾部，用来输出百分号 例子 print (1.234,”00.00%”) 6 $ 美元符号 通常放在格式字符

6、串的起始位置，在所显示的数值前加 上一个“$”符号。 例子：print (123.45,”$#0.00”) 7 + 正号 使显示的正数数据带上符号“+”，通常放在格式字符串的头 部 例子： print (123.45,”+#0.00”) 格式字符串 8 负号 用来显示负数 例子 print (123.45,”-#0.00”) 9 E+、E- 用指数形式显示数值 例子：print (123456.78,”0.00E+00”) 其他方法与属性 1、cls方法 语法格式：对象名.cls 清除print方法显示的文本或在图文框中显示的图形，并把光标移到对 象的左上角（0,0)，如果省略对象则清除当前窗

7、体内的显示内容。 2、move方法 语法格式：对象名.move 左边距离 ,上边距离,宽度,高度 用move方法来移动窗体和控件，并改变其大小。如果省略对象则表 示移动的是窗体。 例子：在窗体放置一个文本框，编写程序改变其大小与位置。代码： Private sub form_click() Move 800,800,3990,2660 Text1.move 200,200,1500,1200 End sub 其他方法与属性 Textheight与textwidth方法 语法格式：对象.textheight 返回字符串的高度 对象.textwidth 返回字符串的宽度 分析：根据在vb中的默认字

8、体大小，求出”microsoft”高度，并乘以6 作为下一个print位置的纵坐标，把横坐标设置为0，因此字符串 microsoft visual basic 6在第七行第一列显示，接下来显示字符串 的高度与宽度。 注意:在字符串中含有回车（asc码13）、换行（asc码10）字符时， 字符串的高度随之增加，回车换行如下所示： Chr(13)+chr(10) 字符串有几个回车换行其高度增加几倍。 例子：使输出字符串居中显示 数据输入inputbox函数 Inputbox函数可以产生一个对话框作为用户输入界面，等待用户输入 。 语法格式： Inputbox(prompt ,title,defau

9、lt,xpos,ypos,helpfile,context) 参数解释： 1、prompt 是一个字符串，长度不得超过1024，显示内容可以自动 换行，如果想按照自己的要求换行则需插入回车换行操作，即 chr(13)+chr(10) 或vbcrlf 2、title 字符串 对话框的标题 3、default字符串 用来显示输入缓冲区的默认信息。 4、 xpos,ypos两个整数，用来确定对话框与屏幕做左边的距离和上 边的距离，这两个参数必须成对使用。 5、 helpfile 是一个字符串变量或表达式，用来表示帮助文件的名字 context 是一个数值变量或表达式，用来表示帮助主题的目录号 Inp

10、utbox函数例子 例子：要求单击窗体时弹出输入框，提示输入客户名字，并将输入内 容输出到屏幕上。如下图： 注意事项 1、执行inputbox函数产生一个输入对话框，如果有default参数则在 输入框显示该参数的值。 2、默认inputbox函数返回的是一个字符串，当需要输入数值并参与运 算时必须在进行运算前用VAL函数转换成相应的数值类型。 3、在inputbox函数对话框中有2个命令按键，一个是确认，一个是取 消。单击确认键返回输入区的数值，单击取消返回一个空值。 4、没执行一次inputbox函数只能输入一个数值，需要输入多个数值时 必须多次调用inpputbox函数，输入的数据在按确

11、认键后对话框消 失，输入的数据必须作为函数的返回值付给一体个变量，否则输入 的数据不能保存。 MSGBOX函数 函数格式如下： msgbox(msg,type,title,helpfile,context) 该函数有5个参数，出第一个参数必需外，其余参数是可选的。 参数介绍： 1、msg 是一个字符串，其长度不能超过1024个，如果超过其余则截 掉。可以用chr(13)+chr(10)强制换行。 2、type 是一个整数值或符号常量，用来控制在对话框内显示的按钮 、图标的种类与数量。该参数值由4类数值相加产生，这4类数值或 符号常量分别表示按钮的类型、显示图标的种类、活动按钮的位置 及强制返回

12、。见下表 3、title 是一个字符串，用来显示对话框的标题 4、help,context 同inputbox函数 TYPE参数的取值 符号常量值值作用 Vbokonly0只显示“确定”按钮 Vbokcancel1显示“确定”及“取消”按钮 vbabortretryingnore2显示终止、重试及忽略按钮 Vbyesnocancel3显示是、否及取消按钮 Vbyesno4显示是、否按钮 Vbretrycancel5显示重试及取消按钮 Vbcirtical16 显示cietical message图标 Vbquedtion32 显示warning query图标 Vbexclaation48 显

13、示warning message图标 Vbinformation64 显示information message图标 Vbdefaultbutton10第一个按钮是默认值 Vbdefaultbutton2256 第二个按钮是默认值 Vbdefaultbutton1512 第三个按钮是默认值 Vbdefaultbutton1768 第四个按钮是默认值 Vbapplicationmodal0应用程序强制返回，应用程序一直被挂起，直到用户对 消息框作出 相应才继续 工作。 Vbsystemmodal4096应用程序强制返回，全部应用程序被挂起，直到用户对 消息框作出 相应才继续 工作。 Type参数

14、值介绍 1、数值05 对话框内按钮的种类和数量，按钮共有7种，即确认、 取消、终止、重试、忽略、是、否，每个数值表示一种组合。 2、数值16、32、48、64 指定对话框所显示的图标，共有4种，16指 定暂停，32表示疑问，48通常用于警告，64用于忽略。 3、数值0、256、512、768 指定默认活动按钮。活动按钮中文子的 周围有虚线，按回车键可执行该按钮的操作。 4、数值0、4096 分别用于应用程序和系统强制返回 Type参数由上面4类数值组成，其组成原则：从每一类数值中选择一 个值，把这几个值加在一起就是type参数的值（大多数应用程序中 ，通常只使用前3类数值）。 注意：在msgb

15、ox函数的5个参数中，只有第一个参数msg是必须的， 其他的可以省略。 Msgbox函数返回值解析 返回值值操作符号常量 1选“确定”按钮Vbok 2选“取消”按钮Vbcancel 3选终止按钮Vbabort 4选重试按钮Vbretry 5选忽略按钮Vbignore 6选是按钮Vbyes 7选否按钮vbno 例子：将msgbox函数返回值输出到屏幕上 Private Sub Form_Click() Dim a, msg1, msg2 As String msg1 = “确认继续吗？“ msg2 = “操作对话框“ a = MsgBox(msg1, 34, msg2) Print a End

16、Sub 注意：34=2+32+0 Msgbox函数说明 1、msgbox函数的第二个参数的第三类数值用来确定默认活动按钮。 2、msgbox函数的显示信息最多不超过1024个字符，所显示的信息 自动换行，并能自动调整大小。如果由于格式要求换行则必须加 回车换行符。 3、在应用程中，msgbox函数的返回值通常用来作为继续执行程序的 依据，根据返回值决定后面的操作。 Msgbox语句 语句格式：msgbox msg,type%,title,help,context 各参数的含义及作用与msgbox函数相同，不过msgbox语句没有返回 值，因此用于较简单的信息显示。 模态窗口：在信息窗口中必须单击框中的某个按钮或按回车键，否则 不能执行其他操作，这样的窗口称为模态窗口。 非模态窗口：允许对屏幕上的其它窗口进行操作，即可一激活其它窗 口。 字形 1、字体类型 通过fontname属性设置一般格式为： 窗体.控件.|printer.fontna