第五章 数据的输入输出

第五章 数据的输入输出

6.1数据的输出

根据历届考试的真题分析，本知识点分值分配： 3-6分 一： print方法

表6-1 print 的语法说明1 部分 Object 描述 可选的。对象名称。可以是窗体（Form）、图片框（PictureBox）、立即窗口（Debug）等对象或是打印机（printer）。如果省略，则在当前窗体输出 要打印的表达式或表达式的列表。如果省略，则打印一空白行 描述 可选的。为使信息按指定格式输出，Visual Basic提供的与Print配合使用的函数。如Tab、Spc、Space$、Format$ 等 可选的。要打印的文本字符串和数值表达式 可选的。指定下个字符的插入点。使用逗号则将其后的输出位置定位于下一输出区段。使用分号则将其后的输出位置定位于上一个被显示的字符之后。如果省略charpos，则在下一行打印下一字符 Outputlist 部分 Function Expression Charpos 表6-2 print 方法的语法说明2 分 类 精 解 例6-1

以下语句在立即窗口中的输出结果是（ ） a＝“Beijing” b＝“Shanghai” Print a；b

A）Beijing□Shanghai B）□Beijing□Shanghai C）BeijingShanghai D）□Beijing□Shanghai 例6-2

以下语句的输出结果为（ ） a＝Sqr（3） b＝Sqr（2） c＝a>b Print c

A）-1 B）0 C）False D）True

举 一 反 三 1．下面程序段的输出结果为（ ） Print “10+20＝”； Print 10+20

Print “20+20＝”； Print 20+20

A）10+20＝30 B）10+20＝ 20+20＝40 30

20+20＝ 40

C）10+20 D)10+20＝30 20+20 20+20＝ 40

2.在立即窗口中执行以下操作： intTmp1＝5 intTmp2＝3

Print intTmp1

3．在Print方法中，若用分号分隔，则按（ ）格式输出各表达式的值，若用逗号分隔，则按（ ）格式输出各表达式的值。

4．要在当前窗口和立即窗口输出字符串“Hello World”使用的Print方法分别是（ ）和（ ）。

二：与Print方法有关的函数 1．Tab函数

语法：Tab[（n）]

该函数与Print#语句或Print方法一起使用，对输出进行定位。用来将输出位置定位在绝对列号上。

2．Spc函数 语法：Spc（n）

该函数与Print#语句或Print方法一起使用，插入空格对输出进行定位。必选参数n是在显示或打印的当前位置插入的空格数。

3．Space函数

语法：Space（number）

该函数返回特定数目的空格。必要的number参数为字符串中想要的空格数。

分 类 精 解 例6-3

在窗体中添加一个名称为Commandl的命名按钮，然后编定如下程序： Private Sub Commandl＿Click（） Print Tab（1）；“第一”， Print Tab（6）；“第二”， End Sub

程序运行后，如果单击命令按钮，在窗体上显示的内容是（ ）。（□表示空格） Ａ）第一□□第二 Ｂ）第一第二□□ Ｃ）第一□□ Ｄ）第一□□ 第二 第二

举 一 反 三 １．在窗体中画一个命令按钮，然后编写以下事件过程： Private Sub Command1＿Click（） For j＝1 To 3

Print Tab（3 * j）;11 * (2 *j - 1); Next j Print End Sub

程序的执行结果为（ ）

Ａ）１１ Ｂ）３３

Ｃ）１１ Ｄ）１１ ３３ ５５ ３３

２．在窗体上画一个名称为Commandl的命令按钮，编写如下事件过程 Private Sub Command1＿Click（） Dim a As String a＝（ ）

For I ＝ 1 To 5 Print Space（6-i）；Mid$（a，6-i，2*i-1） Next i End Sub

程序运行后，单击命令按钮，要求窗体上显示的输出结果为 ５ ４５６ ３４５６７ ２３４５６７８ １２３４５６７８９ 请填空

３．设窗体中输出行的宽度为100，当使用Tab函数与Print方法一起输出时，若Tab函数中的参数n>100，则输出位置是（ ）。在Pint方法中使用Spc函数时，若Spc函数中的参数n>80,则输出位置是（ ）。

三：格式输出

表6-3 Format的语法说明 部分 Exprexxion Format 说明 必选参数。数值、日期、时间、字符串等有效的待格式化表达式 可选参数。含格式化字符的自定义格式表达式。如果在格式化数字时没有指定Format，Format会提供与Str函数类似的功能，以Format作用在正数上不会保留正负号空间，而以的话则会 分 类 精 解 例6-4

执行如下两条语名后，窗体上显示的是（ ）。 a＝9.8596

Print Format$ （a，“$0，000.00”）

A）0，009..86 B)$9.86 C)9..86 D)$0,009.86

举 一 反 三 1.Formats函数中,格式说明符的使用规则正确的是( )。 A）格式符“#”与“0”的作用完全相同

B）格式符“.”与“”或“0”结合使用，用于确定输出数据的小数点位置

C）若Formats函数中使用“%”或“$”格式符，则在所显示的数值后加上一个“%”号或一个“$”号。

D）格式符“+”或格式符“-”表示若输入正数，则仅在数值前加上一个正号；若输出负数，则在数值前加上一个负号。 2.以下语句的输出结果是（ ）。

Print Format$（1234 .567，“000，00 .00”）

A）1234.567 B）12，34.567 C）01，234.57 D）1234.57 3．在窗体上画一个命令按钮，其名称为Commandl，然后编写如下事件过程： Private Sub Commandl＿Ckucj（） a＝12345

Print Format$ （a，“000.00”） End Sub

程序运行后，单击命令按钮，窗体上显示的是（ ）。

A）123.45 B）12345.00 C）12345 D）00123.45

4．当在Print方法中使用Format函数时，格式字符串中的“#”号表示一个数字位，它的个数决定（ ）的长度，若要显示的数据位数大于这个长度，则显示时数据按（ ）显示。

5．在Format函数的格式字符串中使用“%”号，表示输出时按（ ）形式输出；若使用“e+”或“e-”表示输出时按（ ）形式输出。

四：其他方法和属性 1． Cls方法

格式：[对象.]Cls

Cls清除由Print方法显示的文本或在图片框中显示的图形，并把光标移到对象的左上角（0，0）。 2． Move方法

格式：[对象.]Move左边距离[，上边距离[，宽度[，高度]]] Move方法用来移运窗体和控件，并可以改变其大小。 3． TextHeight和TextWidth方法 格式：[对象.]TextHeight（字符串） [对象.]TestWidth（字符串）

分 类 精 解 例6-5

在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程； Private Sub Commandl＿Click（） Move 500，500 End Sub

程序运行后，单击命令按钮，执行的操作为（ ）。 A） 命令按钮移动到距窗体左边界、上边界各500的位置 B） 窗体移动到距屏幕左边界、上边界各500的位置 C） 命令按钮向左、上方向各移动500 D） 窗体向左、上方向各移动500

举 一 反 三 1．运行以下程序后，输出结果为（ ）。 For I＝1 To 3 Cls

Print “I＝”，I； Next

2.清除Print方法显示的文本或在图片框中显示的图形是使用（ ）方法。 A）Cls B)Move C)Print D)Del

3.把当前窗体移动屏幕左上角使用的方法为（ ）；把窗体Forml移到（150，150）处，并把Forml的宽度和高度分别改为以前的一半使用的方法为（ ）。

6．2 lnputbox函数

根据历届考试的真题分析，本知识点分值分配：2分

表6-4 lnputBox函数的语法说明 部分 Prompt 描述 必选参数。在对话框内显示提晃信息的字符串。它的最大长度是1024个字符，如果Prompt包含多个行，则可在各行之间用回车符（Chr（13））、换行符（Chr（10））、回车换行符的组合（Chr（13）&Chr（10））或VisualBasic常数（vbCrLf）来分隔 可选参数。在对话框标题栏中显示的字符串。如果省略Title，则标题栏显示应用程序名 可选参数。在对话框中的用户输入区显示显示的字符串。如果省略Default，则输入区为空 可选参数。数值表达式，必须Ypos与成对出现，指定对话框的左边界与屏幕左边界的水平距离。如果省略Xpos，则Ypos也必须省略，此时对话框水平方向居中 可选参数。数值表达式，必须与Xpos成对出现，指定对话框的上边界与屏幕上边界的距离。如果省略Ypos，则也必须省略，此时对话框被放置在屏幕垂直方向距下边大约三分之一的位置 可选参数。字符串表达式，识别用来向对话框提供上下文相关帮助的帮助文件。如果提供了Helpfile，则也必须提供Context 可选参数。数值表达式，由帮助文件的作者指定给适当的帮助主题的帮助上下文编号。如果提供了Context，则也必须提供Helpfile Title Default Xpos Ypos Helpfile Comtext 分 类 精 解 例6-6 （2003年4月VisualBasic笔试真题） 执行如下语句： a＝InputBox（“Today”，“Tomorrow”，“Yesterday”，，，“Day before yesterday”，5） 将显示一个输入对话框，在对话框的输入区中显示的信息是（ ）。 A)Today B)Tomorrow

C)Yesterday D)Day before yesterday 例6-7

标准模块和窗体模块的功能是计算和打印两个复数之和，在括号里上填上适当内容。 标准模块 Type comp

re As Single im As Single End Type

Public c As comp 窗体模块

Private Sub Commandl＿Click（） Dim a As comp，b As comp a． re＝InputBox（“输入a的实部”） b． im＝InputBox（“输入a的虚部”）

本文来源：https://www.bwwdw.com/article/rdth.html