《2022年软件开发工具：vb程序设计复习大纲 .pdf》由会员分享，可在线阅读，更多相关《2022年软件开发工具：vb程序设计复习大纲 .pdf（30页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、对外经济贸易大学远程教育学院2014-2015学年第二学期软件开发工具： vb 程序设计复习大纲一、单选题1. 下面正确的赋值语句是（）A. x+y=30 B. y=x C. = *r*r D. 0=x+30 2. 以下属性是在鼠标指向控件时显示的文字信息（）A. Text B. Name C. Caption D. ToolTipText 3. 用 Dim (1,3 to 7,10)声明的是一个几维数组？（）A. 1 B. 2 C. 3 D. 4 4. 函数过程（用Function定义）与子过程（用 Sub 定义）的最大区别是（）A. 函数过程有返回值B. 子过程有返回值C. 函数过程可以带
2、参数D. 子过程可以带参数5. 要显示当前过程中的所有变量及对象的取值，可以利用（）窗口A. 监视B. 调用堆栈C. 立即D. 本地6. 在图片框（ PictureBox）控件中加入一幅图片，需要设置控件的（）属性A. Appearance B. Font C. Picture D. Align 7. 用鼠标点击列表框中的非当前列表项后，值没有发生变化的列表框属性是（）。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 1 页，共 30 页 - - - - - - - - - A. L
3、istIndex B. Text C. Selected D. ListCount 8. 利用形状控件的（）属性可以使控件显示为不同的形状A. Shape B. DrawMode C. BackStyle D. FillStyle 9. 以下合法的VB用户定义的标识符是（）A. next B. sub1 C. f 1 D. a*1 10. VB 中数据类型符包括（）A. 货币类型B. 逻辑型C. 长整型D. 以上各类11. 在 VB集成开发环境中，从（）了解程序所处的工作模式。A. 菜单栏B. 标题栏C. 工具箱D. 工程资源管理器12. 以下能使列表框中的内容呈现灰色的属性是（）A. Vis
4、ible B. FontColor C. Style D. Enable 13. 如果希望在开始运行程序时，就使得窗体的高度为400，应在窗体（）事件程序中编写语句： Form1.Height =400实现。A. Resize B. Click C. Load D. DblClick 14. DIM a(3) as integer，定义了（）A. 3 个整型数数组变量B. 4 个整型数数组变量C. 3 个全局整型数数组变量D. 4 个全局整型数数组变量15. 所有控件都有（）属性。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - -
5、名师精心整理 - - - - - - - 第 2 页，共 30 页 - - - - - - - - - A. Caption B. ForeColor C. Name D. Text 16. 逻辑表达式： aA 的值是（）A. False B. 不确定C. True D. 类型不匹配17. VB 集成开发环境中涉及程序的启动，中断和结束的命令在（）菜单中。A. 运行B. 工具C. 工程D. 视图18. 以下（）的说法不正确。A. 通过菜单可以执行VB所有的命令B. 标题栏说明当前的工作模式C. 通过工具箱可以新建窗体D. 窗体布局窗口可以改变窗体位置19. 在 VB程序所处的工作模式不包括（）
6、A. 设计模式B. 运行模式C. 中断模式D. 检查模式20. 在属性窗口中不可以（）A. 修改控件的属性值B. 浏览控件的属性C. 改变属性的排列D. 增加新属性21. 利用（）函数可以判断在访问文件时是否已经到达了文件尾A. BOF B. EOF C. LOF D. LOC 22. VB6.0 硬件运行环境要求（）A. 80586 以上的处理器B. 16M 以上内存C. 100M 以上的硬盘空间D. 都具备23. 声明一个全局变量的关键字是（）名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - -
7、- - 第 3 页，共 30 页 - - - - - - - - - A. Dim B. Public C. Private D. Global 24. 以下四个运算符中，优先级最高的是（）A. 加（ +）B. 减（ - ）C. 乘（ *）D. 乘方（ ）25. 在标签控件中显示的文字的属性是（）A. Text B. Name C. Caption D. ToolTipText 26. 语句 If x=1 Then y=1,下列说法正确的是（）A. x=1 和 y=1 均为赋值语句B. x=1 为关系表达式，y=1为赋值语句C. x=1 和 y=1 均为关系表达式D. x=1 为赋值语句， y
8、=1为关系表达式27. 在 Visual Basic代码中，将多个语句合并写在一行上的并行符是（）A. 撇号( )B. 冒号 (:) C. 感叹号 (!) D. 星号 (*) 28. 如果希望在进入运行程序时，使得窗体的高度为5000，不论窗体在设计时的大小，应在窗体（）事件程序中编写语句：Form1.Height=5000 实现A. Resize B. Click C. Load D. KeyDown 29. 语句 Form1.Cls 的作用是（）A. 清除窗体中运行时的产生的文字和图形B. 清除窗体和控件中的文字和图形C. 清除窗体中的控件D. 清除窗体中设计时的文字和图形30. 不能出现
9、在VB 变量名中的字符是（）名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 4 页，共 30 页 - - - - - - - - - A. 8 B. * C. _ D. F 31. 数据绑定控件通过设置（）属性于数据控件联系在一起A. Name B. DataField C. Enabled D. DataSource 32. 在 For , Next 循环语句中，如果省略 Step 子句，则循环语句的步长为（）A. -1 B. 1 C. 2 D. 0 33. 在设置文字字体的属性是
10、（）A. Text B. Name C. Caption D. Font 34. 数学关系 3= x10 表示成正确的VB表达式为（）A. 3=x 10 B. 3 =x AND x10 C. x 10 D. 3=x AND 10 35. 在文本框中，通过键盘输入一个字符的操作中，没有触发的文本框事件是（）A. LostFocus B. KeyPress C. KeyDown D. Changed 36. 决定单选钮图形与文字标题相对位置的属性是（）A. Style B. Alignment C. Left D. Top 37. VB 中的变量如果没有显示声明其数据类型，则默认为（）A. 日期型
11、B. 变体型C. 字符型D. 数据型38. Visual Basic的主要特点包括（）名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 5 页，共 30 页 - - - - - - - - - A. 可视化B. “事件驱动”的编程方式C. 集成开发环境D. 都具备39. 某一 VB工程含 F1、F2两个窗体，执行“ F1.Show: F2.Hide ”语句后，F1、F2窗体显示的结果为（）A. 都显示B. 都不显示C. 仅显示 F1窗体D. 仅显示 F2窗体40. 在文本框中显示的文字
12、的属性是（）A. Text B. Name C. Caption D. ToolTipText 41. 如果希望在进入运行程序时，使得窗体的高度为5000，不论窗体在设计时的大小，应在窗体（）事件程序中编写语句：Form1.Height=5000 实现A. Resize B. Click C. Load D. KeyDown 42. 列表框的 MultiLine 属性的值类型是（）A. 逻辑型B. 字符串型C. 数值型D. 字符数组43. 列表框的 MultiLine属性的值类型是（）。A. 逻辑型B. 字符串型C. 数值型D. 字符数组44. 涉及程序的启动，中断和结束的命令在（）菜单中。A
13、. 运行B. 工具C. 工程D. 视图45. VisualBasic的主要特点包括（）。A. 可视化B. “事件驱动”的编程方式C. 集成开发环境D. 都具备46. 在属性窗口中不可以（）。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 6 页，共 30 页 - - - - - - - - - A. 修改窗体属性值B. 浏览控件的属性C. 改变属性的排列D. 增加新属性47. 要快速了解窗体Appearance 属性的含义，一般采用（）方法。A. 都可以B. 在属性窗口选中该属性，按
14、F1键C. 在“帮助”的“索引”栏键入该属性名D. 通过属性窗口的属性含义说明48. 工具箱中的图标说明是“CommandButton ”代表（）控件。A. 窗体B. 文本框C. 命令按钮D. 标签49. 工具箱中的图标说明是“Text”代表（）控件。A. 窗体B. 文本框C. 命令按钮D. 标签50. 工具箱中的图标说明是“Label ”代表（）控件。A. 窗体B. 文本框C. 命令按钮D. 标签51. 在 VB集成开发环境中，从（）了解程序所处的工作模式。A. 菜单栏B. 标题栏C. 工具箱D. 工程资源管理器52. 在 VB程序所处的工作模式不包括（）。A. 设计模式B. 运行模式C.
15、中断模式D. 检查模式53. 用鼠标点击窗体时触发了窗体的（）。A. Show 事件B. Load 事件C. LostFocus事件D. Click事件名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 7 页，共 30 页 - - - - - - - - - 54. 在文本框中，通过键盘输入一个字符的操作中，没有触发的文本框事件是（）。A. LostFocus B. KeyPress C. KeyDown D. Change 55. 如果希望在运行程序时，每单击一次窗体，就使得窗体的高
16、度增加10，应在窗体（）事件程序中编写语句：Form1.Height=Form1.Height+10实现。A. Resize B. Click C. Load D. DblClick 56. 每个对象应具有各自的（）。A. 属性B. 事件C. 方法D. 全部57. 通过（）属性可以改变文本框中的文字的颜色。A. Font B. ForeColor C. BackColor D. Text 58. 语句 Form1.Cls 的作用是（）。A. 清除窗体中运行时的文字和图形B. 清除窗体和控件中的文字和图形C. 清除窗体中的控件D. 清除窗体中设计时的文字和图形59. 在窗体安排了两个文本框：Te
17、xt1 和 Text2 ，通过以下程序， PrivateSubText1_Change（） Text2.Text=Text1.Text EndSub 正确的结果是（）。A. 单击窗体，使得在Text1 文本框中输入的内容，同时出现在Text2 文本框中B. 在 text1 中输入文字时，同时出现在Text2 文本框中C. 在 text2 中输入文字时，同时出现在Text1 文本框中D. 在 text1 中输入文字完毕，相同内容才出现在Text2 文本框中60. 以下合法的VB标识符是（）。A. sub B. 12a C. f_1 D. a%1 61. 不能出现在VB变量名中的字符是（）。名师资
18、料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 8 页，共 30 页 - - - - - - - - - A. 8 B. * C. _ D. F 62. 逻辑表达式： axThenPrinty EndSub A. 100 B. 200 C. y D. 没有显示65. 运行下面程序时，For 语句执行了（）次。 PrivateSubForm_click（）Dima(10)AsIntegerDimiAsInteger,sAsInteger Fori=0To10Step2 a(i)=i s=s+
19、a(i) Nexti Prints EndSub A. 5 B. 6 C. 10 D. 11 66. 执行语句printlen(“VisualBasic ”) 结果显示的是（）。A. VisualBasic B. len(“VisualBasic ”)C. 12 D. 14 67. Publica(10)asinteger，定义了（）。A. 10 个整型数数组变量B. 11 个整型数数组变量C. 10 个全局整型数数组变量D. 11 个全局整型数数组变量68. 决定单选钮图形与文字标题相对位置的属性是（）。A. Style B. Alignment C. Left D. Top 名师资料总结
20、- - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 9 页，共 30 页 - - - - - - - - - 69. 用鼠标点击列表框中的非当前列表项后，值没有发生变化的列表框属性是（）。A. ListIndex B. Text C. Selected D. ListCount 70. 在组合框的属性中，值是逻辑值的属性是（）。A. ListIndex B. Top C. Sorted D. Style 71. 在程序运行时用鼠标点击文件列表框中的某个文件时，文件列表框的被赋值的属性是（）。A. De
21、fault B. Archive C. FileName D. FileTitle 72. Timer的 Interval属性的值 =1000代表是（）。A. 1 毫秒B. 1 分钟C. 1秒D. 1 小时73. 工具箱中的图标说明是“ListBox ”代表（）控件。A. 窗体B. 组合框C. 命令按钮D. 列表框74. 水平滚动条控件max属性值代表（）的值。A. 水平滚动条位于右侧B. 水平滚动条最大增减量C. 水平滚动条位于左侧D. 水平滚动条最大宽度75. 窗体放置了一个图像picture1和时钟 timer1 控件， Intervel=1000，执行下列程序的效果是（）。Privat
22、e Sub Timer1_Timer（）Picture1.Left=Picture1.Left+800 If Picture1.Leftform1.width Then Picture1.Left=0 End If End Sub 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 10 页，共 30 页 - - - - - - - - - A. 每隔 1秒 picture1右移 800，picture1移出窗体后，返回到窗体的左端B. 每隔 1秒 picture1左移 800，pict
23、ure1移出窗体后，返回到窗体的右端C. 单击窗体， picture1右移 800，picture1移出窗体后，返回到窗体的左端D. 单击窗体， picture1左移 800，picture1移出窗体后，返回到窗体的右端76. 要形成多组单选项，应采用（）控件。A. 滚动条B. 文本框C. 框架D. 复选框77. 在“工程资源管理器”窗口中列出的文件类型是（）A. *.txt B. *.frm C. *.doc D. *.jpg 78. 下列可作为VisualBasic变量名的是（）A. A#A B. 4A C. ?xY D. constA 79. 定义 a 为整型变量，函数CStr(a) 的
24、功能是（）A. 把变量 a 转换为字符串B. 返回字符“ a”C. 把变量 a 转换为整型变量D. 返回整数 a 80. 将数学表达式 2(a+b)+5 2写成VisualBasic的表达式，其正确的形式是（）A. 2*(a+b)十5/2 B. 2(a+b)+52 C. (a+b)2十5*2 D. 2(a+b)+5*2 81. 窗体上只有命令按钮Command1 ，代码中有如下过程：Private Sub Command1_Click（）a=software and hardware Msgbox a End Sub 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - -
25、 - - - - - - - - - 名师精心整理 - - - - - - - 第 11 页，共 30 页 - - - - - - - - - 则该过程是（）A. 事件过程B. 通用过程C. 函数D. 设计过程82. 在窗体上添加一个名称为List1 的列表框，一个名称为Label1 的标签。当单击列表框中的某个选项时，在标签中显示该选项名称。下列能正确实现此功能的程序是（）A. Private Sub List1_Click() Label1.CaptionList1.ListIndexB. PrivateSubList1_Click() Label1.NameList1.ListIndex
26、EndSubC. PrivateSubList1_Click() Label1.CaptionList1.TextEndSubD. PrivateSubList1_Click() Label1.NameList1.TextEndSub 83. 如下事件过程 : Private Sub Command1_Click（）x=0 For i=1 To 3 x=x+1 Next i Label1.Caption=x End Sub 程序运行后 , 单击命令按钮Command1, 则 Label1 显示（）A. 3 B. 4 C. 5 D. 6 84. 窗体上一个名为command1(1)的按钮，正确调
27、用其Name 属性的方法是（）_ A. command1.name B. command1*name C. command1(1).name D. command1(1)*name 85. 设 a=“Visual Basic”，下面使b=“Basic ”的语句是（）名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 12 页，共 30 页 - - - - - - - - - A. b=Left(a,7,12) B. b=Right(a,5,5) C. b=Left(a,7,5) D. b
28、=Mid(a,7,5) 86. 将文本框控件的（）属性设置为False ，可正常显示文本但不可编辑。A. Locked B. Enabled C. MultiLine D. Visible 87. 以下关于过程及过程参数的描述中，错误的是（）A. 事件过程不能被其他过程调用B. ByVal关键字声明按值传递参数C. ByRef 关键字声明按地址传递参数D. 事件过程是基于对象的事件而建立的88. 设 a=5，b=3，则以下表达式值为真的是（）A. a =b And b 10 B. (a b)Or(b 0) C. a 0 And (b 0) D. (5 a)And(b 0) 89. DirLis
29、tBox目录列表框的Path 属性的作用是（）_ A. 显示当前驱动器或指定驱动器上的路径B. 显示当前驱动器或指定驱动器上的某目录下的文件名C. 显示根目录下的文件名D. 只显示当前路径下的文件90. 为了暂时停止计时器，应把计时器的某个属性设置为False ，这个属性是（）A. Visible B. Timer C. Enabled D. Interval 91. VisualBasic6.0有三种工作模式，编写程序时处在（）模式A. 设计B. 帮助C. 中断D. 运行92. 当文本框的ScrollBars属性设置了非零值时，却没有效果，原因是（）。（选择一项）名师资料总结 - - -精品
30、资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 13 页，共 30 页 - - - - - - - - - A. 文本框中没有内容B. 文本框的 MultiLine属性为 False C. 文本框的MultiLine属性为 True D. 文本框的Locked 属性为 True 93. 以下叙述中正确的是（）A. 窗体的 Name属性指定窗体的名称，用来标识一个窗体B. 窗体的 Name属性的值是显示在窗体标题栏中的文本C. 可以在运行期间改变对象的Name属性的值D. 对象的 Name属性值可以为空94. 刚
31、建立一个新的标准EXE工程后，不在工具箱中出现的控件是（）A. 单选按钮B. 图片框C. 通用对话框D. 文本框95. 下列程序运行后的结果是（） Privatesubcommand_click（） Fori=1to4 X=4 Forj=1to3 X=3 Fork=1to2 X=x+6 Nextk,j,i Printx Endsub A. 7 B. 15 C. 157 D. 538 96. 图像框有一个属性，可以自动调整图形的大小，以适应图像框的尺寸，这个属性是（）A. Autosize B. Stretch C. AutoRedraw D. Appearance 97. 在窗体上画一个名称为
32、Command1 的命令按钮和一个名称为Text1 的文本框，然后编写如下程序： PrivateSubCommand1_Click（） Dimx,y,zAsInteger x=5:y=7:z=0:Text1.Text= CallP1(x,y,z) Text1.Text=Str(z) EndSub SubP1(ByValaAsInteger,ByValbAsInteger,ByRefcAsInteger) C=a+b EndSub 程序运行后，如果单击命令按钮，则在文本框中显示的内容是A. 12 B. 0 C. Str(z) D. 没有显示98. 要向一个图片框（PictureBox）控件中加入
33、一幅图片，需要设置控件的（）属性A. Picture B. Appearance C. Font D. Align 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 14 页，共 30 页 - - - - - - - - - 99. 在用通用对话框控件建立“打开”或“保存”文件对话框时，如果需要指定文件列表框所列出的文件类型是文本文件( 即.txt文件 ) ，则正确的描述格式是（）A. “文本文件 (.txt)(.txt)”B. “文本文件 (.txt)(*.txt)”C. “text
34、(.txt)(*.txt)”D. “text(.txt)(*.txt)”100. 可以同时删除字符串前导和尾部的函数是：（）A. Ltrim B. Rtrim C. Trim D. Mid 101. 当我们输入代码时，VisualBasic可以自动检测哪种错误？（）A. 逻辑错误B. 运行错误C. 语法错误D. 编译错误102. 表达式（）可以计算整型变量x 的位数。A. Len(Trim(Str(Abs(x) B. Len(Abs(x)-1 C. Len(Abs(x) D. Len(Trim(Int(x) 103. 下列哪个语句可以为动态数组分配实际元素个数？（）A. Dim语句B. ReD
35、im 语句C. Ststic语句D. Public语句104. 设有如下变量声明： Dim TestDate As Date 为变量 TestDate 正确赋值的表达方式是（）。A. TextDate=#1/1/2002#B. TestDate=# “1/1/2002 ”#C. TextDate=date(“1/1/2002 ”)D. TestDate=Format( “m/d/yy ”, “1/1/2002 ”)105. 要获得用户在组合框输入的内容，应利用的组合框的属性是（）A. List B. Text C. Selected D. ListIndex 106. 函数 Int （Rnd
36、（0）*10）是在哪个范围内的整数？（）名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 15 页，共 30 页 - - - - - - - - - A. (0,1) B. (0,9) C. (1,10) D. (0,10) 107. 从键盘上输入两个字符串，分别保存在变量str1,str2中。确定第二个字串在第一个字符串中起始位置的函数是（）。A. Left B. Mid C. String D. Instr 108. 下列（）能作为 VisualBasic的变量名。A. ABCD
37、B. E 567 C. 123TDYU D. _Xzy 109. “x是小于 105的非负数”，用VB的表达式表示正确的是（）_。（选择一项）A. 0=x105 B. 0C. 0=xAndx105 D. 0=xOrx=85Print “优秀” Case x=60 Print “合格” Case elsePrint “不及格” End Case（1）简述 Select case语句的作用 .（2）执行以上程序段后，窗体打印结果是“合格”，输入的数的范围是120. 在窗体上画一个文本框和一个计时器控件，名称分别为Text1和Timer1, 在属性窗口中把计时器的Interval属性设置为 0，En
38、abled 属性设置为 False ，程序运行后，如果单击命令按钮，则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操作的程序：Private Sub Command1_Click()Timer1.Enabled_ _ （1）Timer1.Interval_ （2）End SubPrivate Sub Timer1_Timer()Text1.Text = TimeEnd Sub名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 18 页，共 30 页 - - - - - - -
39、- - （1）在（1）处应填入的内容是 _（2）在（2）处应填入的内容是 _121. 在窗体上画一个名称为Comamnd1的命令按钮 , 然后编写如下通用过程和命令按钮的事件过程 :Private Function fun(ByVal m As Integer) fun = m 3 End FunctionPrivate Sub Command1_Click()Dim i As Integer, s As Integer s = 0 For i = 1 To 5 s = s + fun(i) Next Print sEnd Sub（1）上述程序中， fun 是用户定义的函数还是过程？它的功能是
40、什么？（2）程序运行后 ,单击命令按钮 ,则窗体上显示的是122. 程序段名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 19 页，共 30 页 - - - - - - - - - Dim x As Integer, i As Integerx = val(inputbox(“输入0-100之间的整数” , ”输入成绩” )Select case x Case x=85Print “优秀” Case x=60Print “合格” Case elsePrint “不及格” End Ca
41、se（1）简述 Select case语句的作用（2）执行以上程序段后，为x 输入80， 窗体打印结果是123. 在窗体上有一个命令按钮Command1和一个文本框 Text1 ，然后编写如下程序 :Private Sub Command1_Click()Dim a, b As Integerb = 100For a=1 to 10 b = b - aNext aText1.Text = bEnd Sub名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 20 页，共 30 页 - -
42、- - - - - - - （1）简述 For 语句的作用（2）程序运行后 , 在文本框中显示的内容是124. 在窗体上画一个名称为Comamnd1的命令按钮 , 然后编写如下通用过程和命令按钮的事件过程 :Private Function fun(ByVal m As Integer) fun = m 2 End FunctionPrivate Sub Command1_Click()Dim i As Integer, s As Integer s = 0 For i = 1 To 5 s = s + fun(i) Next Print sEnd Sub（1）上述程序中，函数fun 功能什么
43、（2）程序运行后 ,单击命令按钮 ,则窗体上显示的是125. 在窗体上放置一个命令按钮和一个文本框, 名称分别为 Command1和Text1, 然后编写如下程序 :名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 21 页，共 30 页 - - - - - - - - - Private Sub Command1_Click()Dim a, b As IntegerDim sum As Longsum = 0For a=1 to 10b =Cint(InputBox(“请输入第” &
44、 a & “个数” ) sum = sum + bNext aMsgBox “Sum= “ & SumEnd Sub（1）简述 InputBox 和 MsgBox的作用（2）程序运行后 , 单击 Command1命令按钮，其功能是三、编写程序名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 22 页，共 30 页 - - - - - - - - - 126. 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理
45、- - - - - - - 第 23 页，共 30 页 - - - - - - - - - 127. 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 24 页，共 30 页 - - - - - - - - - 128. 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 25 页，共 30 页 - - - - - - - - - 129. 名师资料总结 - - -精品资料欢迎下
46、载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 26 页，共 30 页 - - - - - - - - - 130. 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 27 页，共 30 页 - - - - - - - - - 131. 一、单选题1. B 2. D 3. C 9. B 10. D 11. B 13. C 14. B 15. C 17. A 18. C 19. D 21. B 22. D 23.
47、B 25. C 26. B 27. B 29. A 30. B 31. D 33. D 34. B 35. A 37. B 38. D 39. C 41. C 42. A 43. A 45. D 46. D 47. A 49. B 50. D 51. B 53. D 54. A 55. B 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 28 页，共 30 页 - - - - - - - - - 57. B 58. A 59. B 61. B 62. A 63. C 65. A 66
48、. C 67. C 69. D 70. C 71. C 73. D 74. A 75. A 77. B 78. D 79. A 81. A 82. C 83. C 85. D 86. B 87. A 89. A 90. C 91. A 93. A 94. C 95. B 97. A 98. A 99. B 101. C 102. A 103. B 105. B 106. B 107. D 109. C 110. B 111. C 113. C 114. C 115. B 117. D 118. C 二、阅读程序 , 并简答以下问题119. 参考答案：（1）多分支选择语句（2）85 X =60
49、120. 参考答案：（1）=TRUE （2）=1000 121. 参考答案：（1）fun 是用户定义的函数，功能是求一个整数的三次方（ 2）225 122. 参考答案：（1）多分支选择语句（ 2）合格123. 参考答案：（1）循环语句（2） 45 124. 参考答案：（1）求一个整数的平方（2）55 125. 参考答案：（1）输入对话框、消息对话框（2）无答案名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 29 页，共 30 页 - - - - - - - - - 三、编写程序126
50、. 参考答案：Private Sub C1_Click() Dim s, x, a1,a2 as integer a1= val(text1.text) a2= val(text2.text) For x= a1 to a2 s = s+a1 Next Text3.text=str(s) End Sub 127. 参考答案：Private Sub C1_Click() Text1.text=”我选的课是” if ch1.value=1 then text1.text1=text1.text & ch1.caption endif if ch2.value=1 then text1.text1=