VB_第四章_数据的输入与输出
VB第4章
数据输入输出
例1：MsgBox "请确认交易金额",33,"交易 确认"
例2：MsgBox "请确认交易金额",52,"交易 确认"
MsgBox按钮设置
分组
内部常数 VBOkOnly VBOkCancel VBAboutRetryIgnore VBYesNoCancel VBYesNo VBRetryCancel VBCritical
数据输入输出
1、标签和文本框 说明：标签利用它的Caption属性；文本框利 用它的Text属性。 例如： a%=Val（Text1） ’完成数据输入 c！=5/9*（a-32） Text2=c ’完成数据输出 Label1.Caption=3.14*r*r
数据输入输出
2、输入对话框InputBox函数 功能:打开一个对话框，等待用户输入，返回 字符串类型的输入值。 例: InputBox("请输入数值")
If 条件语句
2、双分支结构
形式： （1）If <表达式> Then <语句块1> Else <语句块2> End if
（2）If <表达式> Then
T 表达式 F
语句块 1
语句块 2
<语句1>
Else
<语句 2>
例：下列哪一段代码是正确的？
1) if a>1 then k=0 else k=1 2) if a>1 then k=0 end if 错误 3) if a>1 then k=0 else k=1
Visual Basic 程序设计教程
第四章 VB控制结构
vb备考课件 精品难点第三章 第四章_OK
执行过程：先求表达式的值，然后将值赋值给左边的变量。 如： x = x + 1
注意：虽然赋值号与关系运算符等于号都用“=”表示，
VB系统会根据所处的位置自动判断是何种意义的符号
2021/8/22
3
赋值符号“=” 右边可以是变量、常量、函数调用等特殊的表达式。
左边一定只能是变量名或对象的属性引用。 下面的赋值语句都是错的： 5=X
1)
循环执行次数 Int(1332 1) 4
输出为:2 5 8 11 I=14
程序：
Private Sub Form_Click()
For i = 1 To 5
Print Tab(i); String(6 - I, "▼");
Print Spc(6); String(I, "▲")
Next i
2021/8/22
n=0 n=1 n=2 n=3 n=4
2021/8/22
16
函数计算
Select Case n
Case 0
p=1
Case 1
p=x
Case 2
p = (3 * x * x - 1) / 2
Case 3
p = (5 * x * x - 3) * x / 2
Case 5
p = ((35 * x * x - 30) * x * x + 3) / 8
End Select
2021/8/22
<表达式列表>： 与<变量或表达式>同
类型的下面四种形式之 一：
• 表达式 如： “A”
• 一组枚举表达式(用
逗号分隔) 如：2,4,6
• 表达式1 To 表达式2
VB-第4章-VB语言基础
注意:为了与字符串型常量相区分，所以用＃将日期常量括起来
VB语言基础
13
业，精于勤，荒于嬉
业，精于勤，荒于嬉
（5）符号常量
常量在程序中也可以用符号表示 目的是为了…… 代表常量的符号称为“常量名” 常量名的命名规则是： 1、不超过255个字符 2、只能由字母、数字和下划线组成并且首字符必须是字母的字符串 3、常量中字母大小通杀（不区分大小写）。 比如： Const PI As single=3.14159 ‘声明了常量PI，代表3.14159，单精度型 Const MAX As Integer=&O144 ‘声明了常量MAX，代表八进制数144，整型 Const COUNT#=45.67 '声明了常量COUNT，代表45.67，双精度型
业，精于勤，荒于嬉
4、可以用（Const ）语句来定义符号常量。 5、可以在常量的后面加上类型说明符以显示常量 的类型，可以用（ $ ）表示字符串型常量。 6、下列是合法的VB变量名的是（A） A：a2 B：2a C：int sum D：2*a 7、下列各项不是VB基本数据类型的是（A） A：Char B:String C:Integer D:Double
Private Sub Command1_Click() Dim liming As string End Sub Private Sub Command2_Click() Dim liming As string End Sub
VB语言基础
19
业，精于勤，荒于嬉
窗体/模块级变量
业，精于勤，荒于嬉
VB语言基础
10
业，精于勤，荒于嬉
业，精于勤，荒于嬉
3）理解数值的范围
VB程序设计 习题及答案第4章 选择结构程序设计
第4章选择结构程序设计4．1 写出数学式|x|<2.5×10-2对应的Visual Basic表达式。
【答案】x<2.5e-2 and x>-2.5e-24．2 逻辑运算符And、Or和Not的优先级最高的是哪一个。
【答案】Not4．3 已知 W=10 X=9 Y=8 Z=7 ，求下列表达式的结果。
(1) W>X And Y<=Z OR X>Y(2) X>Z Or W=Y AND Y<X(3) Not (W>Y And X=Z)(4) Not (Y<>X Or W*3>Z)【答案】(1) True(2) True(3) True(4) False4．4 写出下列十进制整数逻辑运算的结果：(1) X = 23 And 14(2) X = 23 Or 14(3) X = -1 And 19(4) X = -1 Or 10(5) X = Not -1【答案】(1) 6(2) 31(3) 19(4) -1(5) 04．5 已知变量X和Y的值分别为5、6，编写程序，交换变量X和Y的值。
【参考答案】程序代码设计Private Sub Form_Click()x = 5: y = 6t = x: x = y: y = tForm1.Print "x="; x, "y="; yEnd SubPrivate Sub Form_Load()Form1.AutoRedraw = TrueForm1.Print "x = 5", "y = 6"Form1.Print "单击窗体交换x,y的值"图4-1 程序运行结果End Sub程序运行结果如图4-1所示：4．6 从键盘输入一个学生的三科成绩，计算总分，并找出最高分。
【参考答案】（1）用户界面设计（2）控件属性设置（略）（3）程序代码设计Private Sub Command1_Click()g1 = Val(Text1.Text)g2 = Val(Text2.Text)g3 = Val(Text3.Text)Var = (g1 + g2 + g3) / 3g = g1If g < g2 Then g = g2If g < g3 Then g = g3Text4.Text = VarText5.Text = gEnd Sub图4-2 程序运行结果程序运行结果如图4-2所示。
第四章vb计算机
①
当表达式值的精度与变量的精度不一致时，强制转换成左边 的精度，如m% = 10/3 ，则m中的结果为3 当表达式是数字字符串，左边变量是数值类型，自动转换为 数值类型再赋值，但表达式有非数字字符时，则出错。
②
例如： n%=“123”
2013年7月17日星期三
n%=“12a3”
Visual Basic程序设计
符号 0 作 用 用0填充不足的位置 表达式 1234.567 格式字符串 "00000.0000" 显示结果 01234.5670
#
， %
位置不足时不填充0
千分位 数值乘以100，加百分号
1234.567
1234.567 1234.567
"#####.####"
"##,##0.000" "####.##%"
2013年7月17日星期三
Visual Basic程序设计
3. If…Then…ElseIf语句(多分支结构) 形式： If <表达式1> Then <语句块1> ElseIf <表达式2>Then <语句块2> … [Else 语句块 n+1 ] End If 注意: 1) 此处Else和If之间不能有空格，否则程序出错。 2)“表达式1-n”都是逻辑表达式。 3)不管有几个分支,程序执行了满足条件的一个分支后,其余分支不再执行。 4) 一个多分支结构中只有一个End If语句。 5)当多分支中有多个表达式同时满足时，只执行第一个与之匹配的语句块。 注意多分支中表达式的书写顺序。 6) 块结构的条件语句可以嵌套 。
4) Xpos，Ypos：是两个整数值，确定对话框在屏幕上的位置；如 果省略，则对话框显示在屏幕中心线向下约1/3处。
VB课件(新)第四章数组
语法说明： 1、不能在显式赋初值时，定义数组每个维度的大小 2、数据类型1 与 数据类型2 必须兼容 3、表达式： 可以是常量、变量 4、数组的大小由初值的个数决定
数组的初始化
2、显式初始化: 即声明数组的同时，为数组元素赋初值
一维数组声明并初始化语法格式： Dim 数组名 ( ) As 数据类型 = New 数据类型 (数组大小 ) { [表达式1， 表达式2，…, 表达式n ] } 二维数组声明并初始化语法格式： Dim 数组名 ( , ) As 数据类型 = New 数据类型 ( , ) {
定长数组的声明举例
Dim A(9) AS Integer Dim B(0 to 9) as single Dim c% (0 to 3) Dim d(100), f% (0, 30) Dim g (0 to 4, 0 to 5), h(11) as double
数组的初始化
1、隐式初始化：
数值型：0 字符型：空串（"”） 日期型：01/01/0001 00:00:00 对象型：Nothing
mark(0, 4) mark(1, 4) mark(2, 4) mark(3, 4) mark(4, 4)
mark(0, 5) mark(1, 5) mark(2, 5) mark(3, 5) mark(4, 5)
声明了一个整型的二维数组 mark；共占据5×6个整型变量 的内存空间 。二维数组内存分配以行为单位连续分配
Char1 = UCase(Chr(Int(Rnd() * 128))) If Char1 = "A" Then a += 1 If Char1 = "B" Then b += 1 If Char1 = "C" Then b += 1 …… If Char1 = "Y" Then y += 1 If Char1 = "Z" Then z += 1 Next MsgBox("各个字母（不区分大小写）的出现频率:A 是" & a & "，B是" & b & "，C是" & c & "，”……”)
VB分值分布
2010年全国计算机等级考试二级VB考试,辅导用书《全国计算机等级考试二级教程:Visual Basic语言程序设计(2010年版) 》(高等教育出版社),本书共十五章:
第1章 Visual Basic程序开发环境（2分左右，以识记为主）
第2章对象及其操作(一般在机试题里考核)
第3章简单程序设计(笔试2分左右)
第4章 VB程序设计基础（笔试6分左右，一般结合其他章节知识点一起考核）
第5章数据的输入与输出(本章内容通常与其他章节知识点结合起来考，机试题中出现在简单应用题和综合应用题中。
纯本章知识点在笔试中仅占2~4分左右)
第6章常用标准控件(考试重点，笔试8~12分左右、机试的三种题型都考到标准控件)
第7章VB控制结构(考试重点，笔试20分左右，一般和其他章节知识点结合考核、机试题中出现在简单应用题和综合应用题)
第8章数组(考试重点：笔试6~10分左右、机试题中一般出现在综合应用题)
第9章过程(考试重点：笔试6~10分左右、机试题中一般出现在综合应用题)
第10章键盘与鼠标事件过程（笔试4分左右、机试一般出现在简单应用题）
第11章菜单程序设计（笔试2~4分左右、机试出现机率不高）
第12章对话框程序设计（笔试2分左右、机试出现机率不高）
第13章多重窗体程序设计与环境应用( 机试题中偶尔出现在综合应用题,一般考标准模块内容) 第14章数据文件(考试重点：笔试8~10分左右、机试题中出现在综合应用题)
第15章上机指导
二、考试题型题量。
第四章输入输出特性曲线分析
图c
详细解析输入特性曲线和输出特性曲线的机理：
图d
图d为输出特性曲线 iC=f(vCE) iB= 常数 放大区，不同的iB对应不同的iC， iC=βiB，以某个iB 为例。 ① VCE很小（为0）时，JC无反偏，也就没有iC； ② VCE开始逐渐增加，此时基区堆积已经有固定数 量的电子，所以随着Jc开始反偏， iC也开始增加； ③ VCE继续增加，同样因为iB是固定的，堆积的电子数 也是固定的，因此，当VCE增加到一定数值后，原 来堆积的电子（注意是单位时间内堆积的）就已全 部被拉到C区了，此时即使再增加电压VCE也不会使 iC增加了； ④ 而对于不同的iB（其实也就是不同的VBE），当VCE 很小（为0）时堆积在B区的电子数是不一样的， iB 越大堆得越多，也就需要更大的VCE才能将堆积的 电子全部拉走，即这时VCE增加 iC也继续增加，然 后才会在某一电压下转折； ⑤ 放大区，曲线的间距相等是因为满足： iC=βiB
详细解析输入特性曲线和输出特性曲线的机理：
图d为输出特性曲线 ① 截止区讨论： 若iB很小（其实也就是对应的VBE很小），即基区没 有从发射区来的多余电子，则VCE再大也只是本身 的少子漂移， 形成的iC电流很小很小（几乎为0）， 称为截止区； ② 饱和区讨论：（VCE很小的那个区域） 由于有一定的VBE，所以大量电子积压在基区，而且 VBE不同积压的数量也不同，但即使将VBE（ iB）增 加很多，但由于此时没有VCE，即JC没有收集电子到 集电区的能力，所以iC几乎不增加。这种情况当VCE 很小的时候也是这样。因此叫饱和区（再怎么增加iB iC也几乎不增加，就像一个小水杯倒满了水，再倒里 面的水也不会再增加的现象一样，即“饱和”）； 所以： 电子能否通过Jc取决于VCE， 而当VCE足够大后， iC的大小就要取决于 iB了
vb练习题,电子版第四章数据类型
第四章数据类型、运算符与表达式教学要求：了解Visual Basic语言的基本数据类型，了解各基本数据类型的数值范围；掌握Visual Basic常量与变量的概念，重点掌握字符串型、数值型数据的常量表示方法、类型分类、变量定义语法、变量赋初值语法等内容，理解变体类型变量的概念及定义语法，了解用户自定义数据类型和枚举类型的使用；了解变量的作用域；掌握常用内部函数的功能和用法。
掌握Visual Basic语言运算符和表达式的概念，掌握算术运算符、关系运算符和逻辑运算符的作用、语法、优先级规则；熟悉表达式的执行顺序。
知识点：Visual Basic语言运算符和表达式；基本数据类型内容（常量形式、定义语法、赋初值语法、内存形式）；运算符内容（作用、优先级、结合性）；表达式内容（语法、应用规则）；混合运算的规律。
内容导航：一、数据类型（一）基本数据类型Visual Basic提供的基本数据类型主要有字符串型和数值型，此外还提供了字节、货币、对象、日期、布尔和变体数据类型。
（二）用户定义的数据类型用户可以利用Type语句定义自己的数据类型，其格式如下：Type 数据类型名数据类型元素名As 类型名数据类型元素名As 类型名……End Type二、常量和变量（一）常量Visual Basic中的常量分为两种，一种是文字常量，一种是符号常量。
（二）变量1．命名规则变量是一个名字，给变量命名时应遵循以下规则：（1）名字只能由字母、数字和下划线组成；（2）名字的第一个字符必须是英文字母，最后一个字符可以是类型说明符；（3）名字的有效字符为255个；（4）不能用Visual Basic的保留字作变量名，但可以把保留字嵌入变量名中；同时，变量名也不能是末尾带有类型说明符的保留字。
2．变量的类型和定义任何变量都属于一定的数据类型，包括基本数据类型和用户定义的数据类型。
在Visual Basic中，可以用下面几种方式来规定一个变量的类型：（1）用类型说明符来标识。
计算机二级VB(2)
T
上机真题
【例】捷成31-5 窗体上有两个标签L1和L2，标题分别为“口令”和“允许 次数”；一个命令按钮C1，标题为“确定”；两个文本框 名称分别为Text1和 Text2。 其中 Text1用来输入口令（输 入时，显示“*”），无初始内容； Text2的初始内容为3。 程序运行时，在 Text1中输入口令后，单击“确定”，如果 输入的是“123456”则在 Text1中显示“口令正确”；如果 输入其他内容，单击“确定”后，弹出如图所示的错误提 示对话框，并且Text2中的数字减1。最多可输入3次口令， 若3次都输入错误，则禁止再次输入。
考点4 MsgBox函数和MsgBox语句
MsgBox函数 1. 格式
MsgBox(msg,[, type][, title][, helpfile,context])
2. 返回值 对话框标题显 对话框中显示的 对话框类型，确定对话框 MsgBox 函数的返回值是一个整数，这个整数 提示信息，为一示的信息，为 的图标和按钮，为一个整 与所选择的按钮有关。 一字符串
Str1
Visual Basic 6.0
Num
2
变量/属性名＝表达式/属性值
将“=”右边的值赋 值给左边的变量或 对象的属性 1.赋值号左边只能是变量，不能是常量、常数符号或表达式
赋值语句
sin(x) = x + y 5 = sqr(s) + x + y x + y = 3
2.不能在一句赋值语句中给多个变量赋值
第六章 VB控制结构
1 2 3
顺序结构
选择结构
循环结构
顺序结构
顺序结构：无控制结构，程序按语句出现先后顺序 依次执行 语句 VB中默认一行为一条语句 多条语句写一行之间用冒号“ : ”分隔。 一条语句在多行显示，使用续行符“ _”。
VB数据的输入与输出练习题
一、数据的输出：1、Print Format(1234.56,”###.#”)语句的输出结果是A）123.4B）1234.6C）1234.5D)1234.562、以下不能用Print方法输出数据的对象或窗口是A）窗体B）立即窗口C）图片框D)代码窗口3、语句Print Format$(23846.5,”000,000.00”)的输出结果是A）23846.5B）23，846.5C）23，846.50D)023，846.504、假定Picture1和Text1分别为图框和文本框的名称，则下列错误的语句是A）Print25B）Picture1.Print25C）Text1.Print25D)Debug.Print25二、InputBox函数：5、执行下列语句strInput=InputBox(“请修正稿字符串”，”字符串对话框”，”字符串”),则变量strInput 的内容是：A）“请输入字符串”B）”字符串对话框”C）”字符串”D)空字符串6、有下面的程序段：x=InputBox(“字符串”,”请输入”)print xA）“字符串”B）”输入”C）”请输入”D)空白（即未输出任何内容）三、MsgBox函数7、下列叙述中正确的是A）MsgBox语句的返回值是一个整数B）执行MsgBox语句并出现信息框后，不用关闭信息框即可执行其它操作C）MsgBox语句的第一个参数不能省略D）如果省略MsgBox语句的第三个参数，则信息框的标题为空8、假定有如下语句：x=MsgBox(“string1”,,”string2”,”String3”,2)执行语句后，显示一个信息框，单击“确定”按钮，则x的值为A）string1B）string2C）string3D)19、设程序中有以下语句：MsgBox“Visual”,,”Basic”,”等级考试”,2，执行语句后，以下关于信息框叙述中正确的是A）提示信息是Visual B）提示信息是BasicC）标题栏显示为Visual D)标题栏显示为“等级考试”10、窗体上有一个名称为Command1的命令按钮，其事件过程如下：Private Sub Command1_Click()x=”VisualBasicProgramming”a=right(x,11)b=Mid(x,7,5)c=MsgBox(a,,b)End Sub运行程序后单击命令按钮。
如何使用VB
如何使用VBVisual Basic（VB）是一种基于对象的程序设计语言，广泛应用于软件开发领域。
本文将介绍如何使用VB进行软件开发，并按以下章节进行详细讨论。
第一章：VB概述在本章中，我们将简要介绍VB的历史和特点。
VB是一种很受欢迎的编程语言，它结合了面向对象编程和事件驱动编程的优势。
VB具有简单易学的语法，可以用于开发各种类型的应用程序，包括桌面应用程序、Web应用程序和移动应用程序等。
第二章：安装和配置VB开发环境本章将介绍如何安装和配置VB开发环境。
VB可以与Microsoft Visual Studio集成使用，因此首先需要安装Visual Studio。
安装完成后，我们需要配置开发环境，包括选择适当的工具和设置。
第三章：VB基本语法在本章中，我们将深入研究VB的基本语法。
VB使用一套简单易懂的关键字和符号，可以实现变量声明、条件语句、循环语句和函数定义等功能。
我们还将介绍如何使用VB编写函数和子程序，并展示一些常用的编码技巧。
第四章：VB界面设计本章将重点介绍如何使用VB进行界面设计。
VB提供了丰富的界面组件，例如按钮、文本框、标签和列表框等。
我们将学习如何在界面上布置这些组件，并配置其属性和事件。
此外，我们还将研究如何使用VB的绘图工具和图像处理功能进行界面美化。
第五章：VB数据库操作在本章中，我们将学习如何使用VB进行数据库操作。
VB提供了内置的数据库连接库，可以方便地连接和操作各种类型的数据库，如Microsoft Access、SQL Server和MySQL等。
我们将研究如何创建数据库连接、执行SQL查询和更新数据等操作。
第六章：VB网络编程本章将介绍如何使用VB进行网络编程。
VB提供了丰富的网络编程库，可以轻松实现网络通信和数据传输。
我们将学习如何创建网络连接、发送和接收数据，并展示一些常见的网络编程应用场景，如FTP文件传输和Socket通信等。
第七章：VB调试和错误处理在本章中，我们将深入研究如何使用VB进行调试和错误处理。
VB-第4章
27
2. 字符串运算符
字符串运算符有两个：“&”、“+”，是将两个字 符 串连接起来，合并成一个新的字符串。 注意: “&”和“+”这两个运算符的区别：“+”运算符两边 的操作数应均为字符串。如果都为数值型，则进行 算术运算；如果有一个为字符串，另一个为数值型， 则出错。“&’’运算符两边的操作数不论是数值型 的还是字符串型的，都进行字符串的连接运算，系 统先将数值型操作数转换为字符串，然后再进行连 28 28 接运算。
例： "100" + 123 "100" + "123" " Abc" + 123 " 100" & 123 100 & 123 " Abc" & "123" " Abc" & 123
29
29
3.关系运算符
关系运算符都是双目运算，是用来比较两个运算量之 间的关系，关系表达式的运算结果为逻辑量。若关系 成立，结果为True，若关系不成立，结果为False。
当两个操作数均为真时,结果才为真 (3>8) And (5<6) 当两个操作数均为假时,结果才为假 (3>8) Or (5<6) 当两个操作数不等价时,结果为真 (3>8) Xor (5<6) (3>8) Eqr (5<6) (3>8) Imp (5<6)
同或
蕴含
当两个操作数值等价时,结果为真
如果A则B
运算符 < <= > >= 含义 小于 小于或等于 大于 大于或等于 优先级 所有关系运算 优先级相同。 低于算术运算 的加“+”，减 “-”运算，高 于逻辑非 “Not”运算。 实例 15+10<20 10<=20 10>20 "This">= "That" 结果 False True False True
vb4
第四章 基本控制语句
第四章 基本控制语句
程序设计语言的三种结构： 顺序 选择 循环
4.1 顺序结构
例: n%=“123” n%=“a123” n%=true a$=1234 a$=1234a s=s+1 x=y=z=1 ‘转换为 整数 出错 n为-1 a为“1234” 出错 x=((y=z)=1)
4.3 选择结构
4.3.3 条件函数 1. IIf函数 IIF(条件表达式，值1，值2） 条件表达式值为真时为值1，否则为值2 如：IIF(x>y,x,y) 2. Choose函数 Choose(整数表达式，选项列表） 整数表达式为1，列表第1项，... ... ... op=Choose(nop,”+”,”-”,”×”,”÷”)
常用算法（ 4.5 常用算法（一）
1. 累加 1～100的5或7的倍数的和 Sum = 0 For i = 1 To 100 If i Mod 5 = 0 Or i Mod 7 = 0 Then Sum = Sum + i End If Next i Print Sum 连乘 3～10的乘积 t=1 For i =3 To 10 t=t*i Next i Print t
4.3 选择结构
闰年 否则 不是闰年 如果结束
判断闰年
如果 年份除以400整除 或者 (除以100不整除 并且 除以4整除) 那么
If y Mod 400 = 0 Or (y Mod 100 <> 0 And y Mod 4 = 0) Then Print y & "是闰年" Else Print y & "不是闰年" End If
国家二级VB机试(数据的输入与输出、多重窗体与环境应用)模拟试
国家二级VB机试（数据的输入与输出、多重窗体与环境应用）模拟试卷1(题后含答案及解析)题型有：1. 选择题选择题1．PrintFormat(1234.56,”###.#”)语句的输出结果是A．123.4B．1234.6C．1234.5D．1234.56正确答案：B解析：Format函数可以使参数按照指定的格式输出，其格式为：Format$(数值表达式,格式字符串)，该函数的功能是按“格式字符串”指定的格式输出“数值表达式”的值。
其中#代表任意数值，小数部分多余的将进行四舍五入处理。
知识模块：数据的输入与输出2．以下不能用Print方法输出数据的对象或窗口是A．窗体B．立即窗口C．图片框D．代码窗口正确答案：D解析：Print方法可以在窗体上显示文本字符串和表达式的值，并且可以在图片框、立即窗口或打印机上输出这些信息。
知识模块：数据的输入与输出3．下列程序段的输出结果是x=5 Print x+1;x+1A．6 6B．5 5C．6 7D．5 6正确答案：A解析：Print方法可以在窗体上显示文本字符串和表达式的值，本题中两次输出x+1的值，但是x没有任何变化，因此两次均输出6。
知识模块：数据的输入与输出4．语句PrintFormat$(23846.5,”000,000.00”)的输出结果是A．23846.5B．23,846.5C．23,846.50D．023,846.50正确答案：D解析：Format函数可以使参数按照指定的格式输出，其格式为：Format$(数值表达式,格式字符串)，该函数的功能是按“格式字符串”指定的格式输出“数值表达式”的值。
其中#代表任意数值，小数部分多余的将进行四舍五入处理，左边不够的位数补0。
知识模块：数据的输入与输出5．假定Picture1和Text1分别为图片框和文本框的名称，则下列错误的语句是A．Print25B．Picture1.Print25C．Text1.Print25D．Debug.Print25正确答案：C解析：Print方法可以在窗体上显示文本字符串和表达式的值，并且可以在图片框、立即窗口或打印机上输出这些信息，但是不能在文本框中输出。
VB 第四章 数组习题word版本
第一章数组一、选择题1．在窗体上画一个命令按钮，然后编写如下程序：Option Base 1Private Sub Command1_Click(Index As Integer)Dim Arr1(12) As Integer, Arr2(3) As IntegerDim Sum As IntegerSum = 2For i = 1 To 12Arr1(i) = iNext iFor i = 1 To 3Arr2(i) = Arr1(i * i)Next iFor i = 1 To 3Sum = Sum + Arr2(i)Next iPrint SumEnd Sub程序运行后，单击命令按钮，在窗体上的输出结果是A．16B．24 C．32 D．36 2．在窗体上画一个文本框，然后编写如下代码：Option Base 1Private Sub Form_Click()Dim arrDim Start As Integer, Finish As IntegerDim Sum As Integerarr = Array(12, 4, 8, 16)Start = LBound(arr)Finish = UBound(arr)Sum = 0For i = Start To FinishSum = Sum + arr(i)Next ic = Sum / FinishText1.Text = cEnd Sub程序运行后，单击窗体，则在文本框中显示的内容是A．40 B．10C．12 D．16 3．阅读程序：Option Base 1Private Sub Form_Click()Dim Arr(4, 4) As IntegerFor i = 1 To 4For j = 1 To 4Arr(i, j) = (i - 1) * 2 + jNext jNext iFor i = 3 To 4For j = 3 To 4Print Arr(j, i);Next jPrintNext iEnd Sub程序运行后，单击窗体，输出结果是A．5 7 B．6 8 C．7 9D．8 106 87 98 108 11 4．用下面的语句所定义的数组的元素个数是Dim A(-3 To 5) As IntegerA．6 B．7 C．8 D．9 5．用下面的语句所定义的数组的元素个数是Dim arr(3 To 5, -2 To 2)A．20 B．12 C．15D．246．在窗体上画一个命令按钮（其Name属性为Command1），然后编写如下代码：Private Sub Command1_Click()Dim Arr1(10), Arr2(10) As Integern = 3For i = 1 To 5Arr1(i) = iArr2(n) = 2 * n + iNext iPrint Arr2(n); Arr1(n)End Sub程序运行后，单击命令按钮，输出结果是A．11 3B．3 11 C．13 3 D．3 13 7．在窗体上画一个命令按钮（其Name属性为Command1），然后编写如下代码：Option Base 1Private Sub Command1_Click()Dim a(10), p(3) As Integerk = 5For i = 1 To 10a(i) = iNext iFor i = 1 To 3p(i) = a(i * i)Next iFor i = 1 To 3k = k + p(i) * 2Next iPrint kEnd Sub程序运行后，单击命令按钮，输出结果是A．35 B．28 C．33D．378．在窗体上画一个命令按钮（其Name属性为Command1），然后编写如下代码：Option Base 1Private Sub Command1_Click()Dim aa = Array(1, 2, 3, 4)j = 1For i = 4 To 1 Step -1s = s + a(i) * jj = j * 10Next iPrint sEnd Sub程序运行后，单击命令按钮，输出结果是A．4321 B．12 C．34 D．12349．在窗体上画一个命令按钮（其Name属性为Command1），然后编写如下代码：Option Base 1Private Sub Command1_Click()Dim Arr(3) As IntegerFor i = 1 To 3For j = 1 To 3Arr(j) = Arr(i) + 1Next jNext iPrint Arr(3)End Sub程序运行后，单击命令按钮，输出结果是A．7 B．6 C．5D．4 10．在窗体上画一个名称为List1的列表框，一个名称为Label1的标签框。
《VB程序设计》第四章第四节 参数的传递
《VB程序设计》第四章第四节参数的传递最后修改: 2010-6-2 23:16:59第四节参数的传递参数是在本过程有效的局部变量，用于传递信息。
在调用一个有参数的过程时，首先进行的是“形参和实参结合”，实现调用过程的实参与被调过程的形参之间的数据传递，数据传递有两种方式：按值传递和按地址传递。
例如，下面实例由于传递的参数个数不匹配而出错。
Private Function Divisor(ByVal x As String，ByVal y As Integer) ′ 函数Divisor计算最大公约数…End FunctionDivisor有两个参数，而调用语句中形参个数只有一个，代码如下：Private Sub Form_Click()Dim m As Integer, n As Integer, E As IntegerN=InputBox("请输入N" )M=InputBox("请输入M" )g=Divisor(n) ′未提供m参数Print n；"和"；m；"的最大公约数是：" ；gEnd Sub单击窗体运行程序时，则会显示出错信息，如图4-4-1所示。
图 4-4-1一、形参和实参1.形参在被调用过程中的形参，出现在Sub过程和Function过程中。
在过程被调用之前，形参并未被分配内存，只是说明形参的类型和在过程中的作用。
形参列表中的各参数之间用逗号(，)分隔，形参可以是变量名和数组名，定长字符串变量除外。
2.实参实参是在主调过程中的参数，在过程调用时实参将数据传递给形参。
形参列表和实参列表中的对应变量名可以不同，但实参和形参的个数、顺序以及数据类型必须相同。
因为“形实结合”是按照位置结合，即第一个实参与第一个形参结合，第二个实参与第二个形参结合，依此类推。
例如，在求最大公约数的[例Ex_Divisor1] 中被调用函数和调用过程如下：Private Function Divisor(ByVal x As Integer,ByVal y As Integer)End SubPrivate Sub Form_Click()G=Divisor(n，m)End Sub当运行单击窗体事件调用Divisor过程时，首先进行“形实结合”。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
计算机应用基础
27
Visual Basic 6.0 程序设计
TextHeight和TextWidth方法
如果语法格式中的“字符串”含有嵌 入的回车换行符，TextWidth将返回 最长行的宽度。使用TextWidth可以 确定文本显示需要的水平空间宽度， 从而可用于确定字符串的宽度是否 比窗体、图片框或Printer对象的宽 度更大。
计算机应用基础
4
Visual Basic 6.0 程序设计
4.1 输出方法
为了在窗体或图片框等对象上 显示文本，应使用Print方法， 将该窗体或图片框等对象的名 称加在它的前面即可。
计算机应用基础
5
Visual Basic 6.0 程序设计
输出方法
4.1.1 Print方法 4.1.2 与Print方法有关的函数 4.1.3 输出相关方法和属性
计算机应用基础
28
Visual Basic 6.0 程序设计
TextHeight和TextWidth方法
属性ScaleWidth和ScaleHeight 分别用来表示对象的宽度和高 度值，将它们与方法 TextWidth和TextHeight结合 使用，可以使字符串居中显示。
计算机应用基础
29
Visual Basic 6.0 程序设计
Visual Basic 6.0 程序设计
VB 基础篇
第四章 数据的输入与输出
计算机应用基础
1
Visual Basic 6.0 程序设计
第四章 数据的输入与输出
所谓的输入，就是指程序从外部环境 获得信息，它包括通过键盘、鼠标 等外设进行输入；
计算机应用基础
2
Visual Basic 6.0 程序设计
True
背景将透过前 景的图形及文 本显示出来
False
背景将被前 景的图形或 文本覆盖
计算机应用基础
42
Visual Basic 6.0 程序设计
计算机应用基础
43
Visual Basic 6.0 程序设计
4.3 与用户交互函数
VB提供了与用户交互的函数:一种是显 示提示信息的对话框,让用户进行选 择;另一种是输入信息的对话框，用 户可以在其中输入信息。
计算机应用基础
30
Visual Basic 6.0 程序设计
4.2 字 形
Visual Basic可以输出各种英文字 体和汉字字体，并可通过设置字 形的属性来改变字体的风格，如 大小、粗细、显示方向、加删除 线、下划线、重叠等。
计算机应用基础
31
Visual Basic 6.0 程序设计
字形
4.2.1 字体类型和大小 4.2.2 其他特征
计算机应用基础
34
Visual Basic 6.0 程序设计
2. 字体大小
[对象]. FontSize [= 磅值]
该属性以磅为单位来指定字体的大 小（在打印时每英寸72磅）。若 省略“= 磅值”，则返回当前字 体大小。在默认情况下，系统使 用最小字号，为9磅。
计算机应用基础
35
Visual Basic 6.0 程序设计
ScaleMode属性
因为文本的高度是用磅来度量的，有 时需要把窗体、图片框和 Printer对 象的ScaleMode属性从缇改为磅。
计算机应用基础
22
Visual Basic 6.0 程序设计
3. TextHeight和TextWidth方法
语法格式：
[对象.]TextHeight(字符串) [对象.]TextWidth(字符串)
输入对话框例
FileName$=InputBox(“请输入文件名”， “对话输入框”，"File1")
计算机应用基础
47
Visual Basic 6.0 程序设计
vb例2
计算机应用基础
48
Visual Basic 6.0 程序设计
4.4 打 印 机 输 出
前面介绍的VB输出操作是在窗体 上输出信息，也就是以窗体作 为输出对象。
计算机应用基础
9
Visual Basic 6.0 程序设计
Print方法
逗号“,”:将光标定位在下一个输 出分区（以14个字符宽度为一个 输出分区单位）的开始位置处。
末尾使用逗号分隔符，则下一个 Print输出的内容将在当前Print所 输出信息的下一个输出分区显示
计算机应用基础
10
Visual Basic 6.0 程序设计
Print方法
末尾使用分号分隔符，则下一个 Print输出的内容将从当前Print 输出信息的最后一个字符后开 始显示。 行末尾没有逗号和分号，则执 行完该Print方法要自动换行。
计算机应用基础
11
Visual Basic 6.0 程序设计
Print方法
注：Print方法在Form_Load事 件过程中不起作用。
计算机应用基础
44
Visual Basic 6.0 程序设计
4.3.1 MsgBox函数或语句
VB提供的MsgBox函数，在执行时， 屏幕上会出现一个消息框其格式如下:
变量名= MsgBox(“提示信息”<=1024,
“按钮的类型值+显示图标的种类值+
哪一个按钮是缺省的“活动按钮”
值,
“标题信息”, )
计算机应用基础
23
Visual Basic 6.0 程序设计
TextHeight和TextWidth方法
在使用Print方法之前，可使用 TextHeight和TextWidth方法 确定CurrentX和CurrentY属性 所指定的位置。
计算机应用基础
24
Visual Basic 6.0 程序设计
如果“字符串”参数包含嵌入的回 车换行符 （Chr$(13)+Chr$(10)），则文 本对应于多行，TextHeight属性 将返回字符串中所有行的文本的 高度
计算机应用基础
26
Visual Basic 6.0 程序设计
TextHeight和TextWidth方法
TextHeight 的使用方法是，把 CurrentY属性设置到特定的行。 例如，下述语句将绘图坐标设 置到第n行的开始：
计算机应用基础
12
Visual Basic 6.0 程序设计
4.1.2 与Print方法有关的函数
为了使信息按指定的格式输出， VB 提 供 了 几 个 与 Print 配 合 使 用的函数: 1. Spc、Tab、Space函数 2. 格式输出函数Format
计算机应用基础
13
Visual Basic 6.0 程序设计
该属性的默认值为False。
计算机应用基础
38
Visual Basic 6.0 程序设计
斜体字
FontItalic
True： 斜体字 False：正常字
该属性的默认值为False
计算机应用基础
39
Visual Basic 6.0 程序设计
加删除线
FontStrikethru
True: 加与文本长 度相同删除线
19
Visual Basic 6.0 程序设计
4.1.3 输出相关方法和属性
1. Cls方法 语法格式：[对象.]Cls 1) 清除用Print和图形方法创建出的
所有文本和图形
2) 把绘图坐标恢复到原点（0, 0） 3) 缺省对象则指当前窗体
计算机应用基础
20
Visual Basic 6.0 程序设计
2. 格式输出函数Format
格式输出函数Format可以使数值、 日期或字符型数据按指定的格式 输出，其主要功能有三种：
计算机应用基础
16
Visual Basic 6.0 程序设计
格式输出函数Format
●将数值类型量按指定格式转换为字 符类型量。 ●将时间序数值转换为指定格式的日 期或时间。 ●将字符串按指定的格式进行显示。
False: 正常字
该属性的默认值为False。
计算机应用基础
40
Visual Basic 6.0 程序设计
加下划线
FontUnderline
True: 加下划线 False: 正常字
该属性的默认值为False。
计算机应用基础
41
Visual Basic 6.0 程序设计
2. 透明显示
FontTransparent
4.1.1 Print方法
[对象.]Print [表达式列表][; | , ] “对象”:窗体（Form）
图形框（PictureBox） 打印机（Printer） 省略对象则在窗体上输出
计算机应用基础
8
Visual Basic 6.0 程序设计
Print方法
“表达式列表”:用逗号或分号分隔 的多个表达式，先计算表达式的 值然后输出 分号“;”:将光标定位在上一个输 出字符后，
计算机应用基础
36
Visual Basic 6.0 程序设计
4.2.2 其他特征
1. 粗体字、斜体字、加删除线、加 下划线
2. 透明显示
计算机应用基础
37
Visual Basic 6.0 程序设计
1. 粗体字、斜体字、加删 除线、加下划线
粗体字属性 FontBold
True： 粗体字 False： 正常字
TextHeight和TextWidth方法
TextHeight方法返回一个文本字 符串的高度值
TextWidth 方 法 则 返 回 一 个 文 本 字符串的宽度值，它们的单位 均为twip。