《Visual_Basic程序设计》试题及其答案
一、填空题（每题1分，共10分）1.把数学式子： 25sin 21π+写成VB 的数值表达式为（ Sqr(1+3.14159/2*Sin(25*3.14159/180)) ）。
2．设A=5，B=6，C=7，D=8，表达式3>2*B OR A=C AND B<>C OR C>D 的值是（ True ）。
3．若Case 子句中的表达式表列具有形式：<表达式1> To <表达式2>，则它的含义是：当测试表达式的值等于（ 指定范围内的值 ）时，执行该Case 子句相应的语句块。
4．执行下面的程序段后，x 的值为（ 12 ）。
x=0For i=1 To 8 Step 3x=x+iNext i5．在图片框上放置的控件称为图片框的（ 子 ）对象，而窗体是图片框的（ 父 ）对象。
6．将命令按钮Command1的Caption 属性值赋给文本框Text1的Text 属性使用的语句为( Text1.Text=Command1.Caption )7．复选框的Value 属性为（ 1 ）时，表示复选框被选中。
8. 使用滚动条可以获取某一范围内的数值输入。
为使垂直滚动条的Value 属性值从下往上递增变化，应设置滚动条Min 属性值大于( Max )属性值。
9．语句：Dim A(-3 to 4) as Integer 定义的一维数组A 的元素个数是（ 8 ）。
10．给定如下子过程：Function fun(ByVal num As Long) As LongDim k As Long,i As Integerk=1For i=1 To numk=k*iNext iEnd Function执行语句Print fun(5) 后在窗体上显示的结果为（ 0 ）。
二、单项选择题（每题1.5分，共30分）1.装载窗体是窗体的（ C ）。
A) 对象 B) 属性 C) 事件 D) 方法2.设a="Visual Basic"，下面使b 的值为"Basic"的赋值语句正确的是( B )。
A) b=Left(a,8,12) B) b=Mid(a,8,5)C) b=Right(a,5,5) D) b=Left(a,8,5)3．设X 为整型变量,不能正确表达1< X < 5的逻辑表达式是( A )。
A) 1< X <5 B) X=2 or X=3 or X=4C) 1<X And X <5 D) Not (X<=1) And Not (X>=5)4．InputBox 函数返回值的类型为( B )。
A) 数值型 B) 字符串型 C) 逻辑型 D) 货币型5．执行语句：Print 4+5\6*8/8 Mod 9 输出的值是( A )。
A) 4 B) 5 C) 6 D) 76.下列循环语句能正常结束循环的是（ C）。
A)i=5 B) i=1Do Doi=i+1 i=i+2Loop Until i< 0 Loop Until i=10C)i=10 D) i=6Do Doi=i+1 i=i-2Loop Until i> 0 Loop Until i=17．以下叙述中正确的是（ A ）。
A) 窗体的Name属性指定窗体的名称，用来标识一个窗体B) 窗体的Name属性的值是显示在窗体标题栏中的文本C) 可以在运行期间改变窗体的Name属性的值D) 窗体的Name属性值可以为空8．VB为命令按钮提供的Cancel属性（ A ）。
A) 用来指定命令按钮是否为窗体的“取消”按钮B) 用来指定命令按钮的功能是停止一个程序的运行C) 用来指定命令按钮的功能是关闭一个运行程序D) 用来指定命令按钮的功能是中断一个程序的运行9．若使命令按钮失效，要对（ A ）属性设置为False。
A) Enabled B) Visible C) BackColor D)Caption10．在窗体中添加两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（Name 属性为Command1），然后编写如下两个事件过程：Private Sub Command1_Click()a = UCase(Text1.Text) + Left(Text2.Text, 3)Print aEnd SubPrivate Sub Form_Load()Text1.Text = "abcDEF"Text2.Text = "123456"End Sub程序启动后，单击命令按钮，输出结果为（C）A）abcDEF123456 B）abcDEF123C）ABCDEF123 D）ab12345611．在运行程序时，要使文本框获得焦点，则需使用（B）方法。
A) Change B) SetFocus C) GotFocus D) Move12．下列语句中不能把图片框Picture1中的图形清除的是（ A ）。
A) Picture1.Del B) Picture1. Picture=LoadPicture("")C) Picture1. Picture= LoadPicture( ) D) Picture1. Picture=Nothing 13．要删除列表框中的某一个项目，需要使用（ D ）方法。
A) Clear B) ReMove C) Move D) ReMoveItem14．在组合框中选择某一项目内容，在程序中可以通过（D）属性获得。
A) List B) ListIndex C) ListCount D) Text15．若有数组说明语句：Dim a()AS Integer，则a被定义为（B）。
A) 定长数组 B) 可调数组 C) 静态数组 D) 可变类型数组16．有如下语句：Type StudentName As StringAge As IntegerSex As StringEnd TypeDim Stu As StudentWith Stu.Name = "李强".Age = 21.Sex = "男"End With执行语句Print Stu.Age后在窗体上显示的结果是（ B ）。
A)李强 B)21 C)“男” D)Age17.要使子过程f1调用后能用形式参数返回两个结果，下面子过程定义正确的是( C )。
A）Sub f1(ByVal n%,ByVal m%) B）Sub f1(n%,ByVal m%)<子过程体> <子过程体>End Sub End SubC）Sub f1(n%,m%) D）Sub f1(ByVal n%,m%)<子过程体> <子过程体>End Sub End Sub18.以下叙述中错误的是( D )。
A) 一个工程中可以包含多个窗体文件B) 在一个窗体文件中用Private定义的子过程或函数过程不能被其他窗体文件调用C) 在设计VB程序时，窗体模块和标准模块需要分别保存为不同类型的文件D) 全局变量必须在标准模块中定义19．从磁盘上打开顺序文件"c:\t1.txt"为读入数据做好准备，如下语句（A）是正确的。
A） F="c:\t1.txt" B）F="c:\t1.txt"Open F For Input As #1 Open "F" For Input As #2 C）Open "c:\t1.txt" For Output As #1 D）Open c:\t1.txt For Input As #220.以下叙述中正确的是( B )。
A) 一个记录中所包含的各个元素的数据类型必须相同B) 随机文件中每个记录的长度是固定的C) Open命令的作用是打开一个已经存在的文件D) 使用Input#语句可以从随机文件中读取数据三、程序阅读题(第1题3分，第2题5分，其余题各4分，共24分)1．当x的输入值分别为4、8和12时，写出执行下列事件过程的输出结果。
Private Sub Command1_Click()Dim x%, y%x = InputBox("请输入x的值：")Select Case xCase 1, 3, 5 ,7y = x + 10Case 8 To 10y = x + 2Case 2, 4, 6y = 5 * xCase Is > 10y = x * x + 1End SelectPrint "x="; x, "y="; yEnd Subx=4 y=20x=8 y=10x=12 y=1452. 写出执行下列事件过程的输出结果。
Private Sub Command1_Click()Const n = 3Dim i As Integer, k As IntegerFor i = 1 To nPrint Tab((n - i) * 2 + 1);For k = 1 To iPrint Str(k);Next kFor k = i - 1 To 1 Step -1Print Str(k);Next kPrintNext iEnd Sub11 2 11 2 3 2 13.设在一个窗体（如图所示）中已设置了一个组合框Combo1和文本框Text 1，且有下列程序，试写出事件过程Combo1_Click的功能。
Dim str As StringPrivate Sub Form_Load()str = " "Combo1.AddItem "北京"Combo1.AddItem "天津"Combo1.AddItem "西安"Combo1.AddItem "上海"Combo1.AddItem "武汉"Combo1.AddItem "广州"Combo1.AddItem "海口"Combo1.Text = "北京"End SubPrivate Sub Combo1_Click()str = str & Combo1.Text & "，"Text1.Text = strEnd Sub在文本框中显示单击组合框列表项目时该项目的内容，而且以后来添加的方式在文本框中显示所有选择项目的内容。
《Visual BASIC程序设计》期末考试选择题复习(180题)
1. Visual Basic集成开发环境中不包括下列哪些窗口( )。
A、工具箱窗口B、工程资源管理器窗口C、属性窗口D、命令窗口参考答案是：D2. 在设计应用程序时，通过( )窗口可以查看到应用程序工程中的所有组成部分。
A、代码窗口B、窗体设计窗口C、属性窗口D、工程资源管理器窗口参考答案是：D3. 在正常安装Visual Basic6.0后，可以通过多种方式启动Visual Basic。
以下方式中不能启动Visual Basic的是：( )。
A、通过“开始”菜单中的“程序”命令B、通过“我的电脑”找到vb6.exe，双击该文件名C、通过“开始”菜单中的“运行”命令D、进入DOS方式，执行vb6.exe文件参考答案是：D4. Visual Basic 6.0工程文件的扩展名是( )。
A、.vbpB、.frmC、.basD、.cls参考答案是：A5. Visual Basic6.0是面向( )的程序设计语言。
A、过程B、工程C、事件D、对象参考答案是：D6. 下列关于Visual Basic编程特点的叙述中，错误的是( )。
A、Visual Basic 是采用事件驱动编程机制的语言B、构成Visual Basic 程序的多个过程没有固定的执行顺序C、Visual Basic 程序既可以编译运行，也可以解释运行D、Visual Basic 程序不是结构化程序，不具备结构化程序的3 种基本结构参考答案是：D7. Visual Basic 6.0集成开发环境有三种工作状态，不属于三种工作状态之一的是( )。
A、设计状态B、编写代码状态C、运行状态D、中断状态参考答案是：B8. 在Visual Basic 6.0中要获取上下文相关帮助，只需将光标定位在相应位置，再按( )A、F1B、F2C、F3D、F4参考答案是：A9. Visual Basic 6.0集成开发环境的主窗口中不包括( )。
A、标题栏B、菜单栏C、状态栏D、工具栏参考答案是：C10. 下列可以激活属性窗口的操作是( )。
Visual Basic程序设计综合练习题一及答案
Visual Basic程序设计综合练习题一及答案一、单项选择题（每题3分，共45分）1．无论何种控件，共同具有的属性是（）。
A．Text 属性B．Caption属性C．Name属性D．Autosize属性2．当需要上下文帮助时，选择要帮助的内容，希望出现MSDN窗口及显示所需的帮助信息，应按的键是（）。
A．Help B．F10 C．F1 D．Esc3．为了保存一个Visual Basic应用程序，下列说法正确的是（）。
A．只保存窗体文件（.frm）B．只保存工程文件（.vbp）C．分别保存工程文件和标准模块文件(.bas)D．分别保存工程文件、窗体文件和标准模块文件4．在Visual Basic中，变量的默认类型是（）。
A．Integer B．VariantC．Double D．Currency5．Timer控件可用于后台进程中，可在Timer事件内编程，要停止触发Timer事件，需要设置的属性是（）。
A．Interval=0或Enabled=False B．Interval=0或Visible=False C．Enabled=False 或Enabled=0 D．Interval=0且Enabled=False6．要使窗体在运行时不可改变窗体的大小和没有最大化和最小化按钮，只要对下列（）属性设置就有效。
A．MaxButton B．BorderSyleC．Width D．MinButton7．有程序代码如下：Text1.Text = "Visual Basic"，则Text1，Text ，和"Visual Basic"分别代表（）。
A．对象，值，属性B．对象，方法，属性C．对象，属性，值D．属性，对象，值8．要设置命令按钮的背景图形，必须设置的两个属性是（）。
A．Value和Icon B．Style和IconC．Caption和Picture D．Style和Picture9．在VB中，下列合法的变量名是（）。
《Visual Basic程序设计》考试试卷和答案
《Visual Basic程序设计》考试试卷一适用班级：计算机系网络04401班答题时间：100分钟班级学号姓名一、选择题（1分/题，共6分）（1）以下不能在"工程资源管理器"窗口中列出的文件类型是A）.bas B）.res C）.frm D）.ocx（2）下列可作为Visual Basic变量名的是A）A#A B）4A C）?xy D）constA(3) 在窗体上画一个名称为List1的列表框，一个名称为Label1的标签。
列表框中显示若干城市的名称。
当单击列表框中的某个城市名时，在标签中显示选中城市的名称。
下列能正确实现上述功能的程序是A）Private Sub List1_Click() B）Private Sub List1_Click()Label1.Caption = List1.ListIndex Label1. Name = List1. ListIndexEnd Sub End SubC）Private Sub List1_Click() D）Private Sub List1_Click() = List1.Text Label1.Caption = List1.TextEnd Sub End Sub(4) 在窗体上画三个单选按钮，组成一个名为chkOption的控件数组。
用于标识各个控件数组元素的参数是A）Tag B）Index C）ListIndex D）Name(5) 在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：Option Base 0Private Sub Command1_Click()Dim city As Variantcity = Array("北京", "上海", "天津", "重庆")Print city(1)End Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是A）空白B）错误提示C）北京D）上海（6）设有语句Open "c:\Test.Dat" For Output As #1则以下错误的叙述是A）该语句打开C盘根目录下一个已存在的文件Test.DatB）该语句在C盘根目录下建立一个名为Test.Dat的文件C）该语句建立的文件的文件号为1D）执行该语句后，就可以通过Print #语句从文件Test.Dat中读出信息二、填空题（每空2分，共28分）请将每空的正确答案写在答题卡【1】～【14】序号的横线上，答在试卷上不得分。
《Visual_Basic程序设计》试题及其答案
页脚内容1一、填空题（每题1分，共10分）1.把数学式子： 25sin 21π+写成VB 的数值表达式为（ Sqr(1+3.14159/2*Sin(25*3.14159/180)) ）。
2．设A=5，B=6，C=7，D=8，表达式3>2*B OR A=C AND B<>C OR C>D 的值是（ True ）。
3．若Case 子句中的表达式表列具有形式：<表达式1> To <表达式2>，则它的含义是：当测试表达式的值等于（ 指定范围内的值 ）时，执行该Case 子句相应的语句块。
4．执行下面的程序段后，x 的值为（ 12 ）。
x=0For i=1 To 8 Step 3x=x+iNext i5．在图片框上放置的控件称为图片框的（ 子 ）对象，而窗体是图片框的（ 父 ）对象。
6．将命令按钮Command1的Caption 属性值赋给文本框Text1的Text 属性使用的语句为( Text1.Text=Command1.Caption )7．复选框的Value 属性为（ 1 ）时，表示复选框被选中。
8. 使用滚动条可以获取某一范围内的数值输入。
为使垂直滚动条的Value 属性值从下往上递增变化，应设置滚动条Min 属性值大于( Max )属性值。
9．语句：Dim A(-3 to 4) as Integer定义的一维数组A的元素个数是（8）。
10．给定如下子过程：Function fun(ByVal num As Long) As LongDim k As Long,i As Integerk=1For i=1 To numk=k*iNext iEnd Function执行语句Print fun(5) 后在窗体上显示的结果为（0）。
二、单项选择题（每题1.5分，共30分）1.装载窗体是窗体的（ C ）。
A) 对象B) 属性C) 事件D) 方法2.设a="Visual Basic"，下面使b的值为"Basic"的赋值语句正确的是( B)。
Visual Basic程序设计作业参考答案
窗体
作业2
一、选择题:
1
2
3
4
5
6
7
8
9
10
11
12
C
B
D
A
B
D
A
A
D
A
二、填空题:
题号
参考答案
1
对象列表框，属性显示排列方式，属性列表框，属性说明框
2
Text1.text=”Hello”
3
标准控件ActiveX控件
4
Top Left Width Height
5
Shift
6
Shift＋ctrl
7
《Visual Basic程序设计》作业参考答案
作业1
一、选择题:
1
2
3
4
5
6
7
8
9
10
11
12
B
C
D
A
C
B
A
D
C
B
二、填空题:
题号
参考答案
1
学习版专业版企业版
2
通过“开始菜单”中的“程序”命令
通过“开始”菜单中的“运行”命令
3
文件 退出
4
ALT＋Q
5
13
6
7
8
.vbp,.frm
9
标准菜单 功能菜单
3
Path。
三、实训：（略）
作业12
一、选择题：
1
2
C
D
二、实训：（略）
作业13、作业14、作业15、作业16（略）
5
运行（执行）
6
1
作业5答案
Visual Basic程序—考试题库及答案
收藏 A. a=b B. b=a C. c=a D. a=c
回答错误!正确答案： A
a 为数组名，合法的数组元素是＿＿＿＿＿＿。
使用 Windows XP 保存一新建的工程，其默认的路径是______。
收藏 A. My Documents B. Windows C. VB98 D. VB
回答错误!正确答案： C
所谓默认属性是指不用指定控件的属性名就可以代表其属性。一个标签控件 La bel1 的默认属性是( )。
收藏 A. Name B. FontSize C. Top D. Caption
回答错误!正确答案： C
下列选项中，不能用来在模块之间传递数据的是( )。
收藏 A. 模块级变量 B. 对象属性 C. 全局变量 D. 全局数组
回答错误!正确答案： A
下列正确的答案为：
收藏 A. 50 个 Twip 为一磅 B. 40 个 Twip 为一磅 C. 30 个 Twip 为一磅 D. 20 个 Twip 为一磅
收藏 A. Index B. Name C. Caption D. Default
回答错误!正确答案： A
打开一个存在的顺序文件 SeqOld.dat，用户要从该文件读出数据，指定文件 号为 2，正确的语句为( )。
收藏 A. Open seqOld.dat For Output As #2 B. Open "seqOld.dat" For Output As #2 C. Open "seqOld.dat" For Input As #2 D. Open seqOld.dat For Input As #2
Visual Basic程序设计(第二版)-参考答案
1．10 2．计算 1 到 8 的和，36 3．0，n-1 4．9，x
6．24 7．10
8．x>9
9．x mod 5,x+s
5．1
习题六
一、选择题
1．A 2．C 11．A
二、填空题
3．A
4．A
5．D 6．C
7．D 8．D
9．D 10．A
1．10 2．计算 1 到 8 的和 36
3．0 n-1
3．0
习题四
一、选择题
1．C 2．C 3．D 4．B 5．A 6．D 11．D 12．B 13．D 14．D
二、填空题
1．66666
2．False
3．MsgBox
7．D 8．D 9．A 10．D 4．S(165) 5．123
习题五
一、选择题
1．A 2．C 3．A 4．A 5．D 6．C 7．D 8．D 9．A 10．A 11．C 12．A 13．D 14．B 15．D 16．C 17．B 18．A
4．9 x 5．28
习题七
一、选择题
1．D 2．A 3．A 4．C 5．D 6．D 7．C 8．A 9．B 10．A 11．A 12．A 13．B 14．B 15．D 16．A 17．D 18．D 19．A 20．A
二、填空题
1．ReDim 5．123 246 369 9．pos=pos+Arr(k)
5．A 6．A 7．A 8．C 9．D 10．C
习题十二
一、选择题 1．D 2．A 3．C 4．A 5．C 6．B 7．B 8．C 9．D 10．D
11．C 12．A 二、填空题
1．EOF(1)close #1 Text1.Text 或 Text1 3．END Text1.Text 或 Text1 5．#2 1 0 outchar
《Visual BASIC程序设计》期末考试编程题复习及答案
第2章1.新建工程，在窗体上创建两个命令按钮Command1、Command2，一个标签Label1，界面如图2-5所示，程序运行要求如下：1）单击“改变颜色”按钮，标签上的文字内容改为“颜色已经改变”，文字颜色改为红色。
“改变颜色”按钮代码：Label1.ForeColor = vbRedLabel1.Caption = "颜色已经改变"2）单击“改变字体”按钮，标签上的字体改为“黑体”。
“改变字体”按钮代码：Label1.FontName = "黑体"图2-5程序运行界面最后将工程文件、窗体文件分别以lx2-2.vbp、lx2-2.frm为文件名保存在D:\EX文件夹下。
2.设计一个留言薄。
新建一个工程，在窗体上创建2个标签，2个文本框，1个命令按钮，属性设置如图2-6所示，。
要求单击“提交”按钮后，上面的文本框内容复制到下面的文本框中，且下面文本框中的内容不能修改。
单击“清除”按钮则清除两个文本框中的内容。
“提交”按钮代码：Text2.Text = Text1.Text“清除”按钮代码：Text1.Text = ""Text2.Text = ""图2-6 程序界面最后将工程文件、窗体文件分别以lx2-4.vbp、lx2-4.frm为文件名保存在D:\EX文件夹下。
3.设计一个程序，程序界面如图2-7所示。
当单击“显示”按钮时，在文本框中显示“欢迎使用VB！”；当单击“清除”按钮时，清除文本框内的文本；当单击“退出”按钮时，结束程序运行。
“显示”按钮代码：Text1.Text = "欢迎使用VB!"“清除”按钮代码：Text1.Text = ""“退出”按钮代码：End图2-7 程序运行界面最后将工程文件、窗体文件分别以lx2-5.vbp、lx2-5.frm为文件名保存在D:\EX文件夹下。
最新《Visual_Basic程序设计》试题及其答案
一、填空题（每题1分，共10分）1.把数学式子： 25sin 21π+写成VB 的数值表达式为（ Sqr(1+3.14159/2*Sin(25*3.14159/180)) ）。
2．设A=5，B=6，C=7，D=8，表达式3>2*B OR A=C AND B<>C OR C>D 的值是（ True ）。
3．若Case 子句中的表达式表列具有形式：<表达式1> To <表达式2>，则它的含义是：当测试表达式的值等于（ 指定范围内的值 ）时，执行该Case 子句相应的语句块。
4．执行下面的程序段后，x 的值为（ 12 ）。
x=0For i=1 To 8 Step 3x=x+iNext i5．在图片框上放置的控件称为图片框的（ 子 ）对象，而窗体是图片框的（ 父 ）对象。
6．将命令按钮Command1的Caption 属性值赋给文本框Text1的Text 属性使用的语句为( Text1.Text=Command1.Caption )7．复选框的Value 属性为（ 1 ）时，表示复选框被选中。
8. 使用滚动条可以获取某一范围内的数值输入。
为使垂直滚动条的Value 属性值从下往上递增变化，应设置滚动条Min 属性值大于( Max )属性值。
9．语句：Dim A(-3 to 4) as Integer 定义的一维数组A 的元素个数是（ 8 ）。
10．给定如下子过程：Function fun(ByVal num As Long) As LongDim k As Long,i As Integerk=1For i=1 To numk=k*iNext iEnd Function执行语句Print fun(5) 后在窗体上显示的结果为（ 0 ）。
二、单项选择题（每题1.5分，共30分）1.装载窗体是窗体的（ C ）。
A) 对象 B) 属性 C) 事件 D) 方法2.设a="Visual Basic"，下面使b 的值为"Basic"的赋值语句正确的是( B )。
《Visual Basic程序设计基础》习题参考答案
《Visual Basic程序设计基础》教材习题参考答案第1章 Visual Basic 6.0程序设计概述一、判断题1．√2．√3．×说明：同类控件（如两个标签）相互重叠，设计时可以设置“置前”、“置后”属性。
4．√5．×6．√7．×8．√9．√10．×11．√12．√13．×14．√15．×16．√17．√18．√19．√20．√二、选择题1. C2. B 3．D 4．C 5．B 6．A 7．D 8．A 9．B 10．A 11．C 12．D三、填空题1．对象、事件2．属性、方法、事件3．控件、屏幕（Screen）4．对象5．Left、Top 6．属性、<对象名>.<属性名>=<表达式> 7．网格8．F o rm19．Load或Initialize或Resize或Activate（自动执行的先后顺序也按此排列）10．Activate、Deactivate第2章程序设计基础一、判断题1．√2．×3．×4．×5．√6．×7．√8．√9．√10．×二、选择题1．B 2．D 3．A 4．C 5．C 6．B 7．A 8．D 9. C 10．A 三、填空题1．String 2．4 3．"aaa" 4．145 5．6 6．3 7．18 8．False 9．(x Mod 10) * 10 + x \ 10 10．10 + Int( Rnd * 90 ) 11．a * b Mod c12．Log(x)+Sin(3.141593/6) 13．Const PI=3.1415926 14．日期15．Int(x)+1第3章结构化程序设计与数组一、判断题1．√2．×3．√4．×5．√6．×7．×8．√9．×10．√二、选择题1．A 2．D 3．C 4．C 5．D 6．B三、填空题1．If x>y Then t=y: y=x: x=t 2．IS3．For i = 0 to 9: B(i) = InputBox("B(" & i & ")="): Next i4．Dim 5．String 6．8四、程序阅读题（写出下列程序的运行结果）程序1. 0 5 程序2. 20 程序3. 2 4 7 11 16程序4. 1 4 9 16 25程序5. 程序6.五、程序填空题1．（1）q * i （2）s + p * i / q （3）Next i2．（1）r = 0 （2）m Mod n3．（1）i + j - 1 （2）7 - i （3）Print4．（1）10 + Int(Rnd * 90) （2）i + 1 To 30 （3）a(i)=a(j) （4）a(i) Mod 2 = 1第4章函数与过程一、判断题1．×2．√3．×4．×5．√6．×7．×8．√二、填空题1．按地址传送2．b() As Long 3．6 4．按值传递5．按地址传递6．Public x As Single 7．Static x As Integer 8．Form2.y三、程序阅读题（写出下列程序的运行结果）程序1. s = 2 程序2. 1 程序3. 1 1 2 1 1 2 1 2 2 2 2 3 s = 5 1 1s = 9 1 2 11 3 3 11 4 6 4 1四、程序填空题1．（1）ByeVal （2）k Mod i （3）k = k \ i （4）Call pp(i) 2．（1）a() Aa Double （2）n-1 （3）a(j) < a(k)3．（1）a() As Double, n As Integer （2）t = t * x （3）f = s第5章常用控件一、判断题1．×2．×3．×4．√5．×6．√7．×8．√9．√10．√11．×12．×13．√14．√15．×16．×17．×18．√19．√20．×21．√22．×23．√24．×25．√二、选择题1．C 2．D 3．B 4．B 5．B 6．C 7．B 8．B 9．B 10．A 11．D 12．C 13．B 14．B 15．A 16．D 17．B 18．B 19．B 20．A三、填空题1．上、下、左、左2．缇、无关3．&、<Alt>+<Y> 4．Enabled 5．MaxLength 6．Text1.SetFocus 7．MultiLine 8．Visible 9．Alignment 10．AutoSize 11．ForeColor 12．0或1 13．True 14．1 15．AddItem 16．1 17．List1.Clear 18．文本框、列表框19．下拉式组合框、简单组合框、下拉式列表框20．Scroll 21．Value 22．Change 23．定时器不起作用24．Timer 25．65535四、程序阅读题程序1. 116 程序2. 8程序3. 23451 程序4. 小，你好！程序5. 您好34512 小李，你好！欢迎使用Visual Basic!程序6. 李子程序7. y = 6 程序8. n = 1苹果y = 14 n = 3橘子n = 5葡萄柚子香蕉五、程序填空题1．（1）a(i) = Mid(str1, i, 1) 或a(i) = Mid(Text1.Text, i, 1)（2）p = j （3）a(i) = a(p) （4）Command2.Enabled = True 2．（1）1 To 2*i–1 （2）Command2.Enabled = True （3）Command2.Enabled = False 3．（1）Text2.Enabled = False （2）p = 2 （3）Print i（4）Val(Text1.Text) < 2 或Val(Text1.Text) <= 1 （5）KeyAscii = 134．（1）List1.ListCount （2）List1.RemoveItem I （3）i = i + 1 5．（1）Timer1.Enabled = True （2）x \ 3600（3）(x Mod 3600) \ 60 或(x - 3600 * h) \ 60 （4）x = x + 16．（1）Label1.Left （2）Label1.Left = -Label1.Width第6章图形控件和图形方法一、判断题1．√2．×3．√4．×5．√6．×7．×8．×9．√10．√二、选择题1．C 2．B 3．C 4．A 5．A 6．C 7．A 8．C 9．C 10．B 11．A 12．B 13．B 14．C 15．C三、填空题1．Circle (ScaleLeft + ScaleWidth / 2, ScaleTop + ScaleHeight / 2), 8002．LoadPicture 3．AutoSize、Stretch、False、False 4．选中、属性5．形状、矩形6．Picture1.Picture=LodePicture("C:\Windows\Cloud.bmp")7．图片框、其他控件8．缇、SclaeMode 9．颜色10．颜色、圆弧起点处转角、圆弧终点处转角、椭圆纵轴与横轴长度之比四、程序阅读题程序1. 转动一条红色直线，其轨迹形成一个圆程序2. 在窗体上随机的位置、用随机的颜色、半径绘制1000个空心的圆。