VB程序网上作业答案

合集下载

vb程序习题答案

vb程序习题答案VB程序习题答案在学习Visual Basic（VB）编程的过程中，做习题是非常重要的一部分。

通过做习题，我们可以巩固所学的知识，提高编程能力。

下面是一些常见的VB程序习题及其答案。

1. 编写一个程序，计算1到100的所有偶数的和。

答案：```vbDim sum As Integersum = 0For i = 1 To 100If i Mod 2 = 0 Thensum = sum + iEnd IfNextMsgBox("1到100的所有偶数的和为：" & sum)```2. 编写一个程序，找出一个数组中的最大值和最小值。

答案：```vbDim arr() As Integer = {5, 8, 3, 9, 2}Dim max As Integer = arr(0)Dim min As Integer = arr(0)For Each num In arrIf num > max Thenmax = numEnd IfIf num < min Thenmin = numEnd IfNextMsgBox("数组中的最大值为：" & max & "，最小值为：" & min)```3. 编写一个程序，将一个字符串反转。

答案：```vbDim str As String = "Hello, World!"Dim reversedStr As String = ""For i = str.Length - 1 To 0 Step -1reversedStr = reversedStr & str(i)NextMsgBox("反转后的字符串为：" & reversedStr)```通过做这些习题，我们可以加深对VB编程语言的理解，提高编程能力。

vb程序设计教程参考答案

1、B2、A3、B4、答：属性：红色、充满氢气；事件：松手、针刺；方法：飞走、爆破。

5、答：事件是指对象能够识别并作出反映的外部刺激。

事件驱动又称消息驱动，事件驱动程序设计是指每个事件对应有相应的程序代码，仅在该事件发生时，该段代码才会被执行。

事件发生的顺序决定了代码执行的顺序，因此每次执行应用程序时，程序代码并不是按照程序编写的顺序来执行的。

6、答：VB是一个包括界面设计、程序编码、调试、编译并创建可执行程序的集成开发环境。

VB的集成开发环境的主界面中包含：标题栏、菜单栏、工具栏、控件箱、工程资源管理器、属性窗口、“窗体布局”窗口、窗体设计器、代码编辑器等元素组成。

7、答： VB菜单条通常情况下有：文件、编辑、视图、工程、格式、调试、运行、查询、图表、工具、外接程序、窗口、帮助等13项菜单项组成。

8、答：工具栏可自行定义。

标准工具栏中通常情况下有：添加标准exe工程、添加窗体、菜单编辑器、打开工程、保存工程、剪切、复制、粘贴、查找、撤消、重复、启动、中断、结束、工程资源管理器、属性窗口、窗体布局窗口、对象浏览器、工具箱、数据视图窗口、可视化元件管理器等按钮组成。

9、答：创建VB应用程序的一般步骤为：创建界面；设置窗体和控件属性；编写代码；保存工程；运行并调试程序；检查并排除错误；创建可执行文件。

10、Private Sub Command1_Click()Label1.Caption = "I love vb,I hate vb"End Sub1、2、3、S1 输入待判断自然数： N（N>=2）；S2 i=2；S3 判断i是否小于N-1，若不是转S5S4 判断N除以i的余数是否为0,如果不是则i=i+1转S3；S5 判断i是否等于N，若是输出“是素数”，否则输出“不是素数”。

4、S1 输入待判断自然数： N；S2 将N转换成字符S，计算S的长度K；S3 i=1；S4 判断i是否小于K-1，若不是转S6；S5 判断S中的第i位和第K-i+1位是否相等,如果是则i=i+1转S4，如果不是则转S6；S6 判断i是否是中间位数，若是输出“是回文数”，否则输出“不是回文数”。

东大14秋学期《可视化程序设计(VB)》在线作业1答案

可视化程序设计（VB） 14秋学期《可视化程序设计(VB)》在线作业1一,单选题1. 在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框。

当改变当前驱动器时，目录列表框应该与之同步改变。

设置两个控件同步的命令放在一个事件过程中，这个事件过程是（）。

A. Drive1_ChangeB. Drive1_ClickC. Dir1_ClickD. Dir1_Change?正确答案：A2. 下面程序段运行后，变量Value的值为（）。

x=20 IF x>=10 Then Value =5*x Else Value =4*xA. 100B. 80C. 90D. 70?正确答案：A3. 表达式Abs(-3.6)*sqr(100)的值是（）。

A. -360B. 360C. -36D. 36?正确答案：D4. 设有以下循环结构 Do 循环体 Loop While <条件> 则以下叙述中错误的是（）。

A. 若条件"是一个为0的常数，则一次也不执行循环体"B. "条件"可以是关系表达式、逻辑表达式或常数"C. 循环体中可以使用Exit Do语句D. "如果"条件"总是为True，则不停地执行循环体"?正确答案：A5. 在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程： Option Base 0 Private Sub Command1_Click() Dim city As Variant city = Array("北京", "上海", "天津", "沈阳") Print city(1) End Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是（）。

A. 空白B. 错误提示C. 北京D. 上海?正确答案：D6. 目录列表框的Path属性的作用是（）。

VB程序设计教程课后参考答案概要

VB程序设计教程课后参考答案习题一一、填空题1．对象、事件驱动2．窗体、控件3．属性4．属性窗口、编程设置5．事件过程6．对象名、下划线、事件名7．Form_click8．Print form1.print “我的VB”9．主窗口、属性、工具箱、代码、窗体、工程资源管理10．菜单、快捷键二、选择题1．C 2. A 3. B 4. B 5. D 6. B C 7. A 三、简答题（略）习题二一、选择题1. D2. C3. C4. B5. C6. B7. C8. B 9. A 10. B 11. B 12. C 13. D 14. B15. A 16. A 17. A 18. A 19. B 20. C 21. A22. B 23. B 24. A 25. C 26. A 27. B 28. B29. C 30. B 31. D 32. D 33. C二、填空题1．Controlbox、Maxbutton、Minbutton2．Multiline TRUE3．******4．单文档界面（SDI）多文档界面（MDI）5．窗体显示6．Passwordchar7．_change()三、编程题（略）习题三一、基础知识题（略）二、填空题1．整型、长整型、单精度、双精度2．(x mod 10)*10+x\103．Sin(3.14*15/180)+sqr(x+exp(3))/abs(x-y)-log(3*x)4．(a+b)/(1/(c+5)-c*d/2)5．X mod 5=0 or x mod 9=06．False7．-4、3、－3、3、－4、48．CDEF10．TRUE11．变量、属性12．‘_ :13．(略)14．“”＃15．Public、通用/模块、Dim、static、private16．+ 、&、+17．Now() 、time()、日期18．Inputbox()、字符串、val()19．Msgbox()三、选择题1．B 2. C 3. A 4. B D此题有误 5. B 6. A7. D 8. B 9. B 10. C 11. D 12. B13. C 14. B 15. A 16. C 17.A 18. D19. A 20. D 21. A 22. C 23. C 24. D25. A 26. D 27. D 28. B 29. C 30. B31. C 32. B 33. C D此题有误34. C 35. A36. D 37. C 38. A 39. B 40. A 41. C42. C 43. D 44. C 45. D 46. A四、编程题1.Option ExplicitPrivate Sub Command1_Click()Dim a%, b%, c%, delta%Dim x1#, x2#, x#a = Val(InputBox("please input data to a:", "info", 1))b = Val(InputBox("please input data to b:", "info", 1))c = Val(InputBox("please input data to c:", "info", 1))If a = 0 And b <> 0 Thenx = -c / bPrint "所构成的方程是：" & b & "x" & "+" & c & "=0"Print "该一元一次方程的根是：", xEnd IfIf a = 0 And b = 0 ThenPrint "很抱歉，不能构成合法的方程！"End IfIf a <> 0 Thendelta = b * b - 4 * a * cIf delta >= 0 Thenx1 = (-b + Sqr(delta)) / (2 * a)x2 = (-b - Sqr(delta)) / (2 * a)Print "所构成的方程是：" & a & "x2" & "+" & b & "x" & "+" & c & "=0"Print "该方程的根是："Print "第一个根是：", x1Print "第二个根是：", x2Else2Print "该方程有两个虚根："Print "第一个虚根是：" & -b / (2 * a) & "+" & Sqr(Abs(delta)) / (2 * a) & "i"Print "第二个虚根是：" & -b / (2 * a) & "－" & Sqr(Abs(delta)) / (2 * a) & "i" End IfEnd IfEnd Sub2.Option ExplicitPrivate Sub Command1_Click()Dim i%, s%s = 0For i = 1 To 99 Step 2s = s + iNextPrint sEnd Sub3.Option ExplicitPrivate Sub Command1_Click()Dim i%Dim s#s = 0For i = 1 To 100s = s + 1 / i * (-1) ^ (i + 1)NextPrint sEnd Sub4.Option ExplicitPrivate Sub Command1_Click()Dim i%, n%Dim t#, s#n = Val(InputBox("please input data:", "info", 5))s = 0t = 1For i = 1 To nt = t * is = s + tNextPrint sEnd Sub5.Option ExplicitPrivate Sub Command1_Click()Dim a%, b%, c%Dim p#, s#a = Val(InputBox("please input data to a:", "info", 3))b = Val(InputBox("please input data to b:", "info", 4))c = Val(InputBox("please input data to c:", "info", 5))If (a + b > c And Abs(a - b) < c) Or (a + c > b And Abs(a - c) < b) Or ((b + c) > a And Abs(b - c) < a) Thenp = (a + b + c) / 2s = Sqr(p * (p - a) * (p - b) * (p - c))Print "三角形的面积是：" & sElsePrint "很抱歉，不能构成合法的△三角形！"End IfEnd Sub6.Option ExplicitPrivate Sub Command1_Click()Dim ji%, tu%For ji = 1 To 27For tu = 1 To 27If ji * 2 + tu * 4 = 78 And ji + tu = 27 ThenPrint "鸡的个数是：" & jiPrint "兔的个数是：" & tuEnd IfNextNextEnd Sub7.Option ExplicitPrivate Sub Command1_Click()Dim i%Dim s#, t#s = 10t = 10For i = 1 To 7t = t * 0.4s = s + t * 2NextEnd Sub8.Option ExplicitPrivate Sub Command1_Click()Dim i%, fs%, max%, min%, s%Dim ave#fs = Val(InputBox("please input score:", "info", 90))s = fsmax = fsmin = fsFor i = 2 To 7fs = Val(InputBox("please input score:", "info", 90))If max < fs Thenmax = fsEnd IfIf min > fs Thenmin = fsEnd Ifs = s + fsNextave = (s - max - min) / 5Print "该运动员的平均成绩是：" & aveEnd Sub9. ‘同学们，这道题方法很多，主要考察你对选择结构的理解，我给出其中一种方法。

vb程序设计试题及答案(三)

vb程序设计试题及答案(三)一、单选题1. 在VB中，用于声明变量的关键字是（）。

A. DimB. SubC. FunctionD. Const答案：A2. VB中，用于结束一个程序的运行的语句是（）。

A. EndB. ExitC. StopD. Quit答案：A3. VB中，用于实现循环的关键字是（）。

A. ForB. NextC. DoD. Loop答案：A4. 在VB中，以下哪个不是合法的变量名？（）A. _nameB. name$C. 123nameD. name答案：C5. VB中，用于定义一个数组的关键字是（）。

A. DimB. ReDimC. EraseD. New答案：A二、判断题1. VB中的所有变量都必须先声明后使用。

（）答案：错误2. VB中，If语句后面必须跟Then。

（）答案：正确3. VB中，可以同时声明多个变量。

（）答案：正确4. VB中，使用Mid$函数可以返回字符串中的任意字符。

（）答案：错误5. VB中，可以创建一个没有名称的过程。

（）答案：错误三、填空题1. 在VB中，使用________关键字可以定义一个过程。

答案：Sub 或 Function2. VB中，使用________函数可以获取当前日期。

答案：Date3. VB中，使用________函数可以获取当前时间。

答案：Time4. VB中，使用________函数可以将字符串转换为数字。

答案：Val5. VB中，使用________函数可以将数字转换为字符串。

答案：Str四、简答题1. 请简述VB中事件驱动编程的概念。

答案：事件驱动编程是一种编程范式，程序的执行流程由外部事件（如用户操作、系统消息等）触发，而不是按照预先定义的顺序执行。

2. VB中如何实现一个简单的计算器？答案：可以通过创建一个窗体，添加两个文本框用于输入数字，添加一个按钮用于触发计算事件，再添加一个文本框用于显示结果。

在按钮的点击事件中编写代码实现加、减、乘、除等基本运算。

VB程序设计教程习题解答

《VB程序设计教程》（第4版）习题解答单元一巩固与提高答案一、选择题1. Visual Basic 6.0分为3种版本，不属于这3种版本的是A）学习版B）专业版C）企业版D）业余版【答】D。

2. 下列方法中不能退出Visual Basic的是A）按Alt+Q组合键B）按下Alt+F组合键，然后按Esc键C）按F10键，然后按F键，再按X键D）打开“文件”菜单→“退出”命令【答】B。

3. Visual Basic集成的主窗口中不包括A）属性窗口B）标题栏C）菜单栏D）工具栏【答】A。

4. 下列操作可以打开立即窗口的是A）Ctrl+D B）Ctrl+F C）Ctrl+G D）Ctrl+E【答】C。

二、填空题1. 与传统的程序设计语言相比，Visual Basic最突出的特点是____。

【答】事件驱动编程机制。

2. 如果不使用鼠标，用键盘打开菜单和执行菜单命令，第一步应按____键。

【答】功能键F10或Alt键。

3. 建立一个新的标准模块，应该选择____菜单下的“添加模块”命令。

【答】“工程”菜单。

三、思考题1. 简述Visual Basic的特点。

【答】与一般的程序设计语言相比，VB具有以下特点：(1) 可视化的设计平台；(2) 面向对象的设计方法；(3) 事件驱动的编程机制；(4) 结构化的设计语言；(5) 充分利用Windows资源；(6) 开放的数据库功能与网络支持。

2. 简述Visual Basic集成开发环境的组成。

【答】VB 6.0集成开发环境除了具有标准Windows环境的标题栏、菜单栏、工具栏外，还有工具箱、属性窗口、工程管理器窗口、窗体设计器、立即窗口、窗体布局窗口等有用的开发工具。

(1) 标题栏和菜单栏：标题栏中显示的有窗体控制菜单图标、当前激活的工程名称、当前工作模式以及最小化、最大化∕还原、关闭按钮。

菜单栏中显示了“文件”、“编辑”、“视图”、“工程”、“格式”等菜单项，其中包含了VB编程的常用命令。

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习题答案

vb习题答案VB习题答案Visual Basic（VB）是一种广泛应用于软件开发的编程语言，它简单易学、功能强大，因此备受开发者的喜爱。

然而，对于初学者来说，掌握VB的各种知识和技巧并不容易。

为了帮助大家更好地学习和理解VB，本文将提供一些常见习题的答案，希望能够对大家的学习有所帮助。

1. 请写一个VB程序，输出“Hello, World!”。

答案：```vbModule Module1Sub Main()Console.WriteLine("Hello, World!")Console.ReadLine()End SubEnd Module```2. 请写一个VB程序，计算并输出1到100之间所有偶数的和。

答案：```vbModule Module1Sub Main()Dim sum As Integer = 0For i As Integer = 1 To 100If i Mod 2 = 0 Thensum += iEnd IfNextConsole.WriteLine("1到100之间所有偶数的和为：" & sum) Console.ReadLine()End SubEnd Module```3. 请写一个VB程序，判断一个输入的整数是否为素数。

答案：```vbModule Module1Sub Main()Console.WriteLine("请输入一个整数：")Dim num As Integer = Console.ReadLine()Dim isPrime As Boolean = TrueIf num <= 1 ThenisPrime = FalseElseFor i As Integer = 2 To Math.Sqrt(num)If num Mod i = 0 ThenisPrime = FalseExit ForEnd IfNextEnd IfIf isPrime ThenConsole.WriteLine(num & "是素数。

1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。

客观题_0001试卷总分：100 测试时间：240单项选择题判断题一、单项选择题（共20 道试题，共80 分。

）1. 用户在组合框中输入或选择的数据可以通过一个属性获得，这个属性是（）。

A. ListB. ListindexC. TextD. Listcount2. 在设计菜单时，如果要在菜单中加入一个菜单分隔条，则菜单分隔条的标题必须设置为（）。

A. 加号（+）B. 减号（-）C. 星号（*）D. 感叹号（!）3. 保存新建的工程时，默认的文件夹是（）。

A. My DocumentB. VB98C. "\ "D. Windows4. 要清除列表框的所有容，可用（）方法来实现。

A. RemoveTtemB. ClsC. ClearD. 以上均不可以5. 用标准工具栏中的工具按钮不能执行的操作是（）。

A. 添加工程B. 打印源程序C. 运行程序D. 打开工程6. 改变驱动器列表框的Drive属性值，将激活（）事件。

A. ChangeB. ScollC. KeyDownD. KeyUp7. 下列语句语确的是（）。

A. a=1 b=2 c=3B. a=l：b=2：c=3C. a=1，b=2，c=3D. a=1；b=2；c=38. 要在窗体Form1显示“myfrm”，使用的语句是（）。

A. Form. print "myfrm"B. Form.caption="myfrm"C. Form1.print "myfrm"D. Form1.caption="myfrm"9. 图象框Image没有的属性是（）。

A. PictureB. AppearanceC. AutoRedrawD. 以上属性都没有10. 可获得字符的ASCII码的函数是（）。

A. ValB. FixC. AscD. Chr11. 计时器没有的属性是（）。

A. IntervalB. EnableC. SizeD. Index12. 以下选项中，不是Visual Basic标准控件的是（）。

A. 复选框B. 定时器C. 窗体D. 命令按钮13. 下列不能打开菜单编辑器的操作是（）。

A. 按Ctrl+EB. 单击工具栏中的“菜单编辑器”按钮C. 执行“工具”菜单中的“菜单编辑器”命令D. 按Shift + Alt + M14. 使文本框获得焦点的方法是（）。

A. SetfocusB. LostfocusC. GotfocusD. Change15. 以下语句Print Format $(32548.5,"000,000.00") 的输出结果是（）。

A. 32548.5B. 32,548.5C. 032,548.50D. 32,548.5016.为了使目录路径列表Dir1的容符合驱动器列表框Drive1的选择，应当（）。

A. 在Dir1_Click事件中加入Dir1.Path=Drive1.DriveB. 在Drive1_Click事件中加入Dir1.Path=Drive1.DriveC. 在Dir1_Click事件中加入Drive1.Path=.Drive.PathD.在Dir1_Click事件中加入Drive1.Path=.Dir1.Path17. 把数值型数据转换为字符串型数据使用的函数是（）。

A. ValB. StrC. AscChrD. Chr18. 在VB的集成环境中创建应用程序时，除了工具箱窗口、窗体设计器、属性窗口外，必不可少的窗口是（）。

A. 立即窗口B. 代码窗口C. 窗口布局窗口D. 监视窗口19. 单选按钮不具有的属性是( )。

A. ValueB. CaptionTextC. TextD. Font20. 与Load Form2等效的语句是（）。

A. Form2. LoadB. Form2.ShowC. Form2. Visible =FalseD. Form2. Visible=True客观题_0001试卷总分：100 测试时间：240单项选择题判断题二、判断题（共 5 道试题，共20 分。

）1. 将焦点主动设置到指定的控件或窗体上应采用SetFocus方法。

A. 错误B. 正确2. 全局变量在整个应用程序中有效，其作用域是整个应用程序运行期间。

A. 错误B. 正确3. 4AB和AB都可以作为VB的变量名。

A. 错误B. 正确4. 一个工程的文件可以被其它工程文件共享。

A. 错误B. 正确5. 所谓属性是指对象的名字、大小、位置和颜色等特性。

A. 错误B. 正确客观题_0002试卷总分：100 测试时间：240单项选择题判断题一、单项选择题（共20 道试题，共80 分。

）1. 当窗体最小化时缩小为一个图标，设置这个图标的属性是（）。

A. MouseiconB. IconC. PictureD. Mousepointer2. 键盘事件的执行顺序是（）。

A. KeyPress、KeyDown、KeyUpB. KeyDown、KeyPress、KeyUpC. KeyUp、KeyDown、KeyPressD. KeyUp、KeyPress、KeyDown3. 表达式 10+ 5 Mod 10 \ 9 / 3 的值等于（）。

A. 10B. 12C. 15D. 运算错误4. 用Dim A（-3 To 5）As Integer语句所定义的数组的元素个数是（）。

A. 6B. 7C. 8D. 95. Visual Basic程序调试过程中，逐语句调试的按键是（）。

A. F1B. F8C. F9D. F106. 下列可以用来存储图像供其他对象使用的控件是( )。

A. ToolBarB. StatursBarC. ImageListD. TreeView7. 要清除列表框的所有容，可用（）方法来实现。

A. RemoveTtemB. ClsC. ClearD. 以上均不可以8. 相对于UPD协议而言，TCP协议是一种（）。

A. 面向连接的协议B. 无连接的协议C. 计算机间不建立连接D. 适用于传送少量数据9. 假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先应进行的操作是（）。

A. 单击窗体上没有控件的地方B. 单击任一个控件C. 不执行任何操作D. 双击窗体的标题栏10. 为了暂时关闭计时器，应把该计时器的某个属性设置为False ，这个属性是（）。

A. VisibleB. TimerC. EnabledD. Interval11. 一旦数据到达,将首先触发Winsock控件的（）。

A. DataArrival事件B. ConnectionRequest事件C. DataSend事件D. DataGet事件12. 将定时器的时间间隔设置为1秒，则定时器的Interval属性值应设为（）。

A. 1000B. 100C. 10D. 113.设ADOrs为Recordset对象，从“学生基本情况表”中获取所有记录的语句是（）。

A. ADOrs.Open "select * From 学生基本情况表"B. ADOrs.Execute "select * From 学生基本情况表"C. ADOrs.New "select * From 学生基本情况表"D. ADOrs.Select "select * From 学生基本情况表"14. 设a=6，则执行x=IIf（a>5，－1，0）后，x的值为（）。

A. 5B. 6C. 0D. -115. 可通过设置一普通窗体的何种属性，将它转变成MDI子窗体（）。

A. MDIChild=TrueB. WindowsState=NormalC. MDIChild=FalseD. WindowsState=Maximized16. 在“打开”对话框中设置Files.Pattern="*.bat"程序代码执行后，会显示（）。

A. 只包含扩展文件名为“*.bat”的文件B. 第一个bat文件C. 包含所有文件D. 会显示磁盘的路径17. 为了把窗体上的某个控件变为活动的，应执行的操作是（）。

A. 单击该控件的部B. 单击窗体的边框C. 双击该控件D. 双击窗体18.为了使目录路径列表Dir1的容符合驱动器列表框Drive1的选择，应当（）。

A. 在Dir1_Click事件中加入Dir1.Path=Drive1.DriveB. 在Drive1_Click事件中加入Dir1.Path=Drive1.DriveC. 在Dir1_Click事件中加入Drive1.Path=.Drive.PathD.在Dir1_Click事件中加入Drive1.Path=.Dir1.Path19. 下列可作为Visual Basic变量名的是( )。

A. A(A＋B)B. AlphaC. 4ABCD. AB#20. 在代码编辑器中，如果一条语句太长，无法在一行写下（不包括注释），要折行书写，可以在行末使用续行字符（），表示下一行是当前行的继续。

A. 一个空格加一个下划线字符( _)B. 一个下划线字符(_)C. 直接回车D. 一个空格加一个连字符(-)客观题_0002试卷总分：100 测试时间：240单项选择题判断题二、判断题（共 5 道试题，共20 分。

）1. 假定一个文本框的Name属性为Text1，为了在该文本框中显示“Hello!”，所使用的语句可写为： text1="Hello!"A. 错误B. 正确2. 要将命令按钮 Command1设置为不可见，应修改该命令按钮的Value属性。

A. 错误B. 正确3. 函数过程不能接收参数。

A. 错误B. 正确4. 将变量A、B、C都赋值为0，可以用赋值语句A = B = C = 0去完成。

A. 错误B. 正确5. 全局变量在整个应用程序中有效，其作用域是整个应用程序运行期间。

A. 错误B. 正确客观题_0003试卷总分：100 测试时间：240单项选择题判断题一、单项选择题（共20 道试题，共80 分。

）1. 表达式Abs(-5)+Len("ABCDE")的值是（）。

A. 5ABCDEB. -5ABCDEC. 10D. 02. VB6.0集成环境的主窗口中不包括（）。

A. 标题栏B. 菜单栏C. 状态栏D. 工具栏3. 对于窗体级变量，下列说法中错误的是（）。

A. 所在窗体的各子程序都可以访问B. 其它窗体的子程序不能访问C. 所在窗体的各子程序都不能访问用Private定义的窗体级变量D. 一定要在所在窗体的通用区定义4. 下列控件中可设置滚动条的是（）。