下载文档原格式
vb简单的课程设计一、课程目标知识目标：1. 让学生掌握VB（Visual Basic）编程语言的基本语法和结构；2. 培养学生运用VB编写简单的程序，解决实际问题；3. 让学生了解VB编程中的顺序结构、选择结构和循环结构；4. 使学生掌握VB中常用的内部函数和控件。
技能目标：1. 培养学生独立设计、编写和调试简单VB程序的能力；2. 培养学生运用VB编程解决实际问题的思维方法和技巧；3. 提高学生的逻辑思维能力和编程实践能力。
情感态度价值观目标：1. 培养学生对计算机编程的兴趣和热情，激发学生的学习积极性；2. 培养学生良好的编程习惯，注重代码规范和可读性；3. 培养学生团队协作精神，学会与他人共同解决问题。
课程性质：本课程为信息技术学科，以实践操作为主，注重培养学生的编程技能和逻辑思维能力。
学生特点：六年级学生具备一定的计算机操作基础，对编程有好奇心，但注意力容易分散，需要结合实际案例和趣味性教学。
教学要求：结合学生特点，采用任务驱动法，引导学生主动探索，注重理论与实践相结合，提高学生的编程实践能力。
通过课程学习，使学生达到上述课程目标，并为后续学习打下坚实基础。
二、教学内容1. VB编程环境介绍：认识VB集成开发环境，熟悉工具栏、菜单栏、属性窗口等基本组成部分。
教材章节：第一章 VB概述2. VB基本语法：掌握变量、常量、数据类型和运算符的使用。
教材章节：第二章 VB编程基础3. VB程序结构：学习顺序结构、选择结构（If条件语句）和循环结构（For、While循环语句）。
教材章节：第三章 程序控制结构4. 内部函数和控件：学习常用内部函数（如数学函数、字符串函数等），了解常用控件（如文本框、按钮等）的使用。
教材章节：第四章 内部函数与控件5. 编程实例分析：分析并编写简单的VB程序，如计算器、九九乘法表等。
教材章节：第五章 实例分析6. 程序调试与优化：学习查找程序中的错误，掌握调试技巧，提高程序质量。
VB期中考试题一、填空题1、Visual Basic是一种面向__________的可视化程序设计语言，采取了__________的编程机制。
2、在VB中工程文件的扩展名是____________，窗体文件的扩展名是____________，标准模块文件的扩展名3、一个控件在窗体的位置由_______和________属性决定，其大小由__________和_________属性决定。
4、设置控件背景颜色的属性名称是______________________。
5、x=InputBox(___ __, , )6、写出显示下图信息框的MsgBox函数MsgBox( , , )二、选择题1、下面不是VB工作模式的是( )A.设计模式B.运行模式C.汇编模式D.中断模式2、可视化编程的最大优点是( )A.具有标准工具箱B.一个工程文件由若干个窗体文件组成C.不需要编写大量代码来描述图形对象D.所见即所得3、下列不能打开属性窗口的操作是( )A.执行“视图”菜单中的“属性窗口”命令B.按F4键C.按Ctrl+TD.单击工具栏上的“属性窗口”按钮4、下列可以打开立即窗口的操作是( )A.Ctrl+DB.Ctrl+EC.Ctrl+FD.Ctrl+G5、Visual Basic的编程机制是( )A.可视化B.面向对象C.面向图形D.事件驱动6、以下能够触发文本框Change事件的操作是( )A.文本框失去焦点B.文本框获得焦点C.设置文本框的焦点D.改变文本框的内容7、应用程序设计完成后，应将程序保存，保存的过程是( )A.只保存窗体文件即可B.只保存工程文件即可C.先保存工程文件，之后保存窗体文件D.先保存窗体文件(或标准模块文件)，之后还要保存工程文件8、任何控件都具有的属性是( )A.TEXTB.CAPTIOND.FORECOLOR5、决定控件上文字的字体、字形、大小及效果的属性是( )A.TEXTB.CAPTIOND.FONT9、在窗体上建立了多个控件，如TEXT、LABEL1、COMMAND1，若要使程序一运行焦点就定位在COMMAND1控件上，应将COMMAND1控件的( )设置为0A.INDEXB.TABINDEXC.TABSTOPD.ENABLED10、运行时，当用户向文本框输入新的内容，或在程序代码中对文本框的TEXT属性进行赋值从而改变了文本框的TEXT属性值时，将触发文本框的( )事件A.CLICKB.DBLCLICKC.GOTFOCUSD.CHANGE11、以下窗体名中哪些是非法的窗体名( )。
《vb期中测试》试卷一、单选题（每题1.5分，共45分）1、下列程序段的执行结果为______。
K = 0For I = 1 To 3A = I ^ I ^ KPrint A;Next IA、 1 1 1B、 1 4 9C、 1 2 3D、 0 0 0您的答案：A 参考答案：A您的得分：1.5 题分：1.52、设执行以下程序段时依次输入1、3、5，执行结果为______。
Dim a(4) As Integer, b(4) As IntegerFor K = 0 To 2a(K + 1) = Val(InputBox("请输入数据"))b(3 - K) = a(K + 1)Next KPrint b(K)A、 1B、 5C、 3D、 0您的答案：A 参考答案：A您的得分：1.5 题分：1.53、设a=5,b=10，则执行c = Int((b - a) * Rnd + a) + 1后，c值的范围为______。
A、6~10B、6~9C、5~10D、5~9您的答案：C 参考答案：A您的得分：0 题分：1.54、若设置了文本框的属性PasswordChar="$"，则运行程序时向文本框中输入8个任意字符后，文本框中显示的是______。
A、8个"*"B、1个"$"C、8个"$"D、无任何内容您的答案：B 参考答案：C您的得分：0 题分：1.55、下列程序段的执行结果为______。
A = 0:B = 0For I = -1 To -2 Step -1For J = 1 To 2B = B + 1Next J A = A + 1Next IPrint A; BA、 4 2B、-2 2C、 2 4D、 2 3您的答案：C 参考答案：C您的得分：1.5 题分：1.56、确定一个控件在窗体上的位置的属性是______。
程序设计基础期中考试试卷与参考答Company Document number：WUUT-WUUY-WBBGB-BWYTT-1982GT《程序设计基础》课程期中考试试卷试题一、判断题（每小题2分，共20分）说明：在以下提供的若干陈述中，逐一判断其正确与否，用A表示正确，用B表示错误。
(1) 事件过程可以由某个用户事件触发执行，它不能被其他过程调用。
(2) Visual Basic的Double类型数据可以精确表示其数值范围内的所有实数。
(3) For/Next循环正常（未执行Exit For）结束后，控制变量的当前值等于终值。
(4) Sub过程名在过程中必须被赋值。
(5) SetFocus方法是把焦点移到指定对象上，使对象获得焦点，该方法适用于所有控件。
(6) 移动框架时框架内控件也随之移动，所以框架内控件的Left和Top属性值也随之改变。
(7) 单选钮控件和复选框控件都具有Value属性，它们的作用完全一样。
(8) 当组合框的Style属性设置为0时，组合框称为“下拉式组合框”，其选项可以从下拉列表框的列表项中选择，也可以由用户输入。
(9) 若Visual Basic中容器取缺省坐标系，则坐标原点在容器左上角、单位长度为像素。
(10 ) 用Output模式打开文件，如果指定文件和路径不存在，则会自动创建指定文件及路径。
试题二、单选题（每小题2分，共20分）(11 ) 将VB新建的“标准EXE”工程保存在磁盘上，至少会产生（11）文件。
[A] .frx和.frm [B] .exe和.vbp [C] .vbp和.frm [D] .frm和.bas(12 ) 窗体Form1的Name属性是Frm1，它的单击事件过程名是（12）。
[A] Form1_Click [B] Form_Click [C] Frm1_Click [D] Me_Click(13 ) 已知字符串变量x存放"1234"，表达式Val("&H"+Left(x,2))的值是（13）。
一、选择题（本大题共60个小题，每小题1分，共60分。
在每小题所给的四个选项中，只有一个符合题目要求，将正确答案填在相应的括号中）1、Windows XP是（）A、多用户多任务操作系统B、单用户单任务操作系统C、单用户多任务操作系统D、多用户分时操作系统2、多窗口的切换可以通过_______进行（）A、改变窗口的大小B、关闭当前活动窗口C、按【Alt+Shift】组合键D、按【Alt+Tab】组合键3、在Window X P中，任务栏的最主要功能是（）A、实现任务间的切换B、显示系统的所有功能C、显示所有已打开过的窗口图标D、显示当前窗口的图标4、Windows XP的命令菜单中，变灰的菜单表示（）A、将弹出对话框B、该命令正在起作用C、该命令的快捷键D、该命令当前不可用5、在Windows中，关于对话框叙述不正确的是（）A、对话框没有最大化按钮B、对话框没有最小化按钮C、对话框形状大小不能改变D、对话框不能移动6、在Windows中，下列叙述正确的是（）A、当用户为应用程序创建快捷方式时，就是将该应用程序再增加一个备份B、关闭一个窗口就是将该窗口正在运行的程序转入后台执行C、桌面上的图标完全可以根据用户的意愿重新排列D、一个应用程序窗口只能显示一个文档窗口7、安装Windows之后，桌面上不能直接删除的图标有（）Ａ、我的电脑Ｂ、回收站Ｃ、IE浏览器Ｄ、网上邻居8、要打开下拉式菜单可以使用（）A、热键B、Alt+热键C、Ctrl+热键D、Shift+热键9、在Windows的窗口中，选中末尾带有…的菜单意味着（）A、将弹出下一级菜单B、将执行该菜单命令C、表示该菜单项已被选中D、将弹出一个对话框10、在Windows“开始”菜单下的“文档”菜单存放的是（）A、最近建立的文档B、最近打开过的文件夹C、最近打开过的文档D、最近运行过的程序11、在Windows中，实现窗口移动的操作是（）A、将鼠标指针指向菜单栏，拖到鼠标B、将鼠标指针指向边框，拖到鼠标C、将鼠标指针指向标题栏，拖到鼠标D、将鼠标指针指向任何位置，拖到鼠标12、如果一个窗口被最小化，此时运行其他程序，则（）A、与被最小化的窗口相对应的撤除内存B、与被最小化的窗口相对应的继续占有内存C、与被最小化的窗口相对应的程序被终止执行D、内存不够时，会自动关闭13、当一个文档窗口被关闭后，该文档将（）A、保存在外存中B、保存在内存中C、保存在剪贴板D、既保存在外存也保存在内存中14、关于Windows XP窗口概念，以下叙述正确的是（）A、屏幕上只能出现一个窗口，这就是活动窗口B、屏幕上可以出现多个窗口，但只有一个是活动窗口C、屏幕上可以出现对个窗口，但不止一个是活动窗口D、屏幕上可以出现多个活动窗口15、下列________不是对活动窗口的描述（）A、标题栏为蓝色B、对应的程序为前台程序C、对应的任务按钮上凸D、对应的任务按钮下凹16、在Windows XP的“关闭计算机”对话框中，不能选择的是（）A、待机B、重新启动C、切换用户D、关闭17、Windows中将信息传送到剪贴板不正确的方法是（）A、用“剪切”命令把选定的对象拷贝到剪贴板B、Alt+PrintScreen把当前窗口拷贝到剪贴板C、用“复制”命令把选定的对象拷贝到剪贴板D、用Ctrl+V把选定的对象拷贝到剪贴板18、在Windows XP操作系统中，将“回收站”中文件还原时，被还原的文件将回到（）A、系统的“我的文档”中B、计算机内存中C、系统的桌面上D、文件原来的位置上19、对Windows XP中的文件或文件夹使用“发送到”命令时，其操作的说法不正确的是（）A、可以将文件或文件夹快速复制到“我的文档”B、可以创建文件或文件夹的桌面快捷方式C、可以将文件或文件夹快速移动到Ｕ盘D、发生成功后，源文件或文件夹不受任何影响20、在Windows XP的文件操作中，下列说法错误的是（）A、用鼠标右键单击该文件夹，然后选择“重命名”，键入新的文件名后按回车键即可完成该名操作B、在选中该文件夹的情况下再用左键单击该文件夹的名称，输入新文件名后按回车键即可完成改名操作C、用右键双击该文件夹，输入新文件名后按回车键即可完成改名操作专业课期中考试试卷学号：____________姓名：_______________D、选中该文件夹后，使用“文件”菜单下的“重命名”选项，输入新文件名后按回车键即可完成改名操作21、Windows XP中，对文件和文件夹的管理主要通过_________来实现（）A、对话框B、剪贴板C、资源管理器或我的电脑D、控制面板22、在Windows中，当选定文件或文件夹后，不将文件或文件夹放到“回收站”中，而直接删除的是（）A、按DELETE(DEL)键B、用鼠标直接将文件或文件夹拖放到“回收站”中C、按SHIFT+DELETE(DEL)键D、用“我的电脑”或“资源管理器”窗口中“文件”菜单中的删除命令23、在Windows的“资源管理器”中，用鼠标将硬盘上某个文件拖放到U盘上的操作是（）A、移动B、复制C、删除D、剪切24、在Windows XP中，可以使用“回收站”进行恢复的文件是（）A、直接使用“DELETE”按键删除的硬盘上的文件B、直接使用“DELETE”按键删除的网络驱动器上的文件C、使用鼠标左键选定U盘上的文件后拖放到“回收站”D、使用鼠标右键选定U盘上的文件后选择“剪切”命令，然后“粘贴”到回收站25、下面关于Windows XP的文件名的叙述错误的是（）A、文件名中允许使用汉字B、文件名中允许使用多个圆点分隔符C、文件名中允许使用空格D、文件名中允许使用竖线“|”26、在Windows XP的“资源管理器”窗口中，如果想一次选定多个分散的文件夹或文件，正确的操作是（）A、按住CTRL键，用鼠标右键逐个选取B、按住CTRL键，用鼠标左键逐个选取C、按住SHIFT键，用鼠标右键逐个选取D、按住SHIFT键，用鼠标左键逐个选取27、在Windows中，下列正确的文件名是（）A、MY PRKGRAM GROUPB、FILE1|FILE2C、A<>B.CD、A?B.DOC28、在Windows“资源管理器”窗口中，为了将选定硬盘上文件或文件夹复制到U盘，应进行的操作是（）A、先将它们删除并放入“回收站”，再从“回收站”中恢复B、用鼠标左键将它们从硬盘拖到U盘C、先执行“编辑”菜单中的“剪切”命令，在执行“编辑”菜单中的“粘贴”命令D、用鼠标右键将它们从硬盘拖到U盘并从弹出的快捷菜单中选择“移动到当前位置”29、用于获得字符串长度的函数是（）A、Len()B、LenB()C、StrLen()D、strLength()30、在Windows资源管理器左窗口中，若显示的文件夹图标前面带有加号“+”，意味着该文件夹（）A、含有下级文件夹B、仅含有文件C、是空文件夹D、不含下级文件夹31、在“资源管理器”中，查看所有文件（包括隐藏文件和系统文件），正确的操作是（）A、单击【查看】——列表，显示所有文件B、单击【查看】——详细列表，显示所有文件C、单击【工具】——文件夹选项，然后在“查看”选项窗口中单击显示所有文件和文件夹D、单击【编辑】——全部选定，显示所有文件32、在Windows XP中，当按下“SHIFT”键的同时，用鼠标左键在不同驱动器之间拖到对象时，系统的操作是（）A、复制B、移动C、创建快捷方式D、无操作33、在Windows XP中，若想“搜素”文件名的第二个字母是“C”的所有文本文件，可以在对话框中“文件名”栏中输入（）A、?c.txtB、*c*.txtC、?c*.txtD、*c.txt34、“X是小于100的非负数”，用VB表达式表示正确的是( ).A、0<=X<100B、0<=X<100C、X>=0 AND X<100D、0<=X OR X<10035、Windows中，文件夹的组织结构是一种（）A、表格结构B、树形结构C、网状结构D、线性结构36、在Windows“资源管理器”窗口右部选定所有文件，如果要取消其中几个文件的选定，应进行的操作是（）A、用鼠标左键依次单击各个要取消选定的文件B、按住CTRL键，再用鼠标左键依次单击各个要取消选定的文件C、按住SHIFT键、再用鼠标左键依次单击各个要取消选定的文件D、用鼠标右键依次单击各个要取消选定的文件37、鼠标在屏幕上产生的标记符号变为一个“沙漏”状，表明（）A、Windows执行的程序出错B、Windows正在执行某一处理任务，请用户稍等C、提示用户注意某个事项，并不影响计算机继续工作D、等待用户键入Y或N，以便继续工作38、在Windows中，下列叙述正确的是（）A、桌面的图标不能按用户的意愿重新排列B、只有对活动窗口才能进行移动/改变大小等操作C、回收站与剪贴板一样，是内存中的一块区域D、一旦屏幕保护开始，原来的屏幕上的当前窗口就关闭了39、在同一张磁盘上（）A、允许同一个文件夹的两个文件同名，也允许不同文件夹中的两个文件同名B、不允许同一个文件夹的两个文件同名，也不允许不同文件夹中的两个文件同名C、允许同一个文件夹的两个文件同名，但不允许不同文件夹中的两个文件同名D、不允许同一个文件夹的两个文件同名，但允许不同文件夹中的两个文件同名40、在画图中，为了保存一幅作品，应用命令（）A、CTRL+XB、CTRL+VC、CTRL+SD、TAB41、假定窗体的名称为Form1,则把窗体的标题设置为“VB_Test”的语句为( )A、Form1=“VB_Test”B、Form1.Caption=“VB_Test”C、Form1.Text=“VB_Test”D、=“VB_Test”42、在Windows中可通过________来进行输入法的安装和删除（）A、附件B、资源管理器C、我的电脑D、控制面板43、表达式25 Mod 3+23\5*2的值是（）A、0B、2C、3D、644、在Windows中，按下Ctrl+Alt+Del将出现“任务管理器”窗口，该窗口所列出的内容是（）A、已经打开的各个文档的文件名B、系统中可执行的各个程序名C、具有“系统”属性的应用程序名D、正在运行的各个程序名45、Visual Basic中可以用类型说明符来标识变量的类型，其中表示货币型的是（）A、%B、#C、@D、$46、在VB启动时，我们新建一个工程，通常默认选择“新建”标签中的（）选项A、标准EXEB、ActiveX EXEC、ActiveX DLLD、ActiveX控件47、退出Visual Basic的错误方法是（）A、单击窗口右上角的关闭按钮B、选择“文件”菜单中“退出”命令C、按快捷键Alt+QD、选择“文件”菜单中“关闭”命令48、与传统和程序设计语言相比，Visual Basic最突出的特点是（）A、结构化程序设计B、程序开发环境C、程序调试技术D、事件驱动编程机制49、在启动Visual Basic后，系统为用户新建的工程起一个名为（）的临时名称。
2010~2011学年度第2学期期中考试试卷[B1]考试科目: 《Visual Basic程序设计》考试形式: 开卷-上机考答题时间: 120分钟班级学号姓名一、选择题（2分/题, 共20分）1.以下有关VB对象名称(Name)属性的叙述，正确的是_______。
A）对象的Name属性值可以为空B）窗体的Name属性用来标识和引用窗体C）可以在程序运行期间改变对象的Name属性值D）窗体的Name属性值是显示在标题栏中的字符串2.Visual Basic6.0集成环境的主窗口中不包括_______。
A）标题栏B）菜单栏C）状态栏D）工具栏3. 在开发VB应用程序时, 一个工程一般至少应含有_______。
A）标准模块文件和类模块文件B）工程文件和窗体文件C）工程文件和类模块文件D）工程文件和标准模块文件4. .为了使命令按钮(名称为Command1)右移200, 应使用的语句是_______。
A）Command1.Move -200B）Command1.Move 200C）Command1.Left= Command1.Left+200D）Command1.Left= Command1.Left-2005. 当程序运行时, 系统自动执行启动窗体的_______事件过程。
A）Click B）Load C）Unload D）GotFocus6. Visual Basic有多种类型的窗口, 若要在设计时看到窗体窗口, 以下操作不正确的是________。
A）打开“视图”菜单, 选择“对象窗口”B）双击VB窗口工作区的空白处C）单击“工程资源管理器”中的“查看对象”按钮D）双击“工程资源管理器”中对应的窗体名7. 下面关于属性和方法的描述中, 不正确的是________。
A）属性是对象的特征, 方法是对象的行为B）属性和方法都有值C）属性可以被赋值D）方法表示能执行的操作8. 下面关于标签和文本框的描述中, 正确的是________。
贯通大数据技术应用专业期中考试一、单选题：（每题只有一个答案是正确的，请把正确答案的序号写到题目后面的括号里。
多选、错选均不得分。
每题1分，共40分）1.VB属于哪种语言（）*（分值： [单选题] *A.A语言。
B.B语言。
(正确答案)C. C语言。
D. R语言。
2. VB是由哪国开发的.（）*（分值： [单选题] *A. 中国B. 英国C. 美国(正确答案)D. 俄罗斯3.VB是面向什么的（）*（分值： [单选题] *A. 面向过程B. 面向用户C. 面向未来D. 面向对象(正确答案)4.VB是那家公司开发的（）*（分值： [单选题] *A. 微软(正确答案)B. 阿里巴巴C. 甲骨文D. 腾讯5.下列哪项不属于VB的优点（）*（分值： [单选题] *A. 可视化程度高B. 开放性强(正确答案)C. 界面标记简单D. 可进行模块化处理6. 我们所熟悉的VB6.0版本发行与那一年（）*（分值： [单选题] *A. 1998(正确答案)B. 1999C. 2000D. 20017.菜单控件只包括一个事件，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件，这个事件是（）。
*（分值：[单选题] *A.GotFocusB.LoadC.Click(正确答案)D.KeyDown8. 滚动条控件(如图所示)的Max属性所设置的是（）*（分值： [单选题] *A. 滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值(正确答案)B. 单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量C. 单击滚动条的箭头区域时，滚动条中滚动块的最大移动量D. 滚动条控件无该属性。
9.以下选项中，不属于标签的属性（）*（分值： [单选题] *A. EnabledB. CaptionC. Default(正确答案)D. Font10. 要求改命令按钮显示的文本，应当在属性窗口中改变的属性是（）*（分值：[单选题] *A. Caption(正确答案)B. NameC. TextD. Label11.设置一个单选按钮(OptionButton)所代表选项的选中状态，应当在属性窗口中改变的属性是（）。
《程序设计基础VB》期中考试卷一、选择题〖每小题1分, 共计40分〗；1.以下变量名中合法的是【1】。
A.x2-.......B.prin.......C.str_....D.2x分析：书P105, 标识符命名规则答案：C在Visual Basic中, 所有的窗体和控件都必定具有的一个属性是【2】。
A. NameB. Font C)Caption D)FillColor分析：名称属性是每个对象必须具备的, VB为每一个对象设置了一个默认的名称, 用户可以不更改, 对象的默认名称是由对象的类名+序号构成的。
答案：A以下所列的7个控件中, 具有Caption属性的有【3】个。
CheckBox（复选框）、ComboBox（组合框）、HscrollBar（水平滚动条）、Image（图像框）、Frame（框架）、Label（标签）、Line（线条）A. 5B. 4C. 3D. 2分析：常用控件中, TextBox、PictureBox、Image、ListBox、ComboBox、Timer、Line、Shape、HScrollBar、VScrollBar没有Caption属性；Label、CommandButton、OptionButton、CheckBox、Frame具有Caption属性；另外, 窗体也有Caption属性。
答案：C2.用来设置文字字体是否斜体的属性是【4】。
A. FontUnderlineB. FontBoldC. FontSlopeD. FontItalic分析: 也可以写成Font.Italic答案：D若需要在同一窗口内安排两组相互独立的单选按钮（ OptionButton ）, 可使用【5】控件将它们分隔开。
① TextBox ② Picture ③ Image ④ FrameＡ. ①②Ｂ. ②③Ｃ. ②④Ｄ. ③④分析：将单选按钮分组的方法是放置在不同的容器中, VB中可以做容器的控件有：PictureBox、Frame答案：CTimer控件的【6】属性决定该控件是否对时间的推移做出响应。
《vb期中测试》试卷一、单选题（每题1.5分，共45分）1、设执行以下程序段时依次输入1、3、5，执行结果为______。
Dim a(4) As Integer, b(4) As IntegerFor K = 0 To 2a(K + 1) = Val(InputBox("请输入数据"))b(3 - K) = a(K + 1)Next KPrint b(K)A、 0B、 3C、 5D、 1您的答案：A 参考答案：D您的得分：0 题分：1.52、下列程序段的执行结果为______。
Dim A(10), B(5)For i = 1 To 10A(i) = iNext iFor j = 1 To 5B(j) = j * 20Next jA(5) = B(2)Print "A(5)="; A(5)A、A(5)= 5B、A(5)= 20C、A(5)= 10D、A(5)= 40您的答案：D 参考答案：D您的得分：1.5 题分：1.53、在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：Private Sub Form_Load()ShowText1.Text = ""Text2.Text = ""Text1.SetFocusEnd SubPrivate Sub Text1_Change()Text2.Text = Mid(Text1.Text, 8)End Sub程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2显示的内容是______。
A、BeijingC B、China C、Beijing D、BeijingChina您的答案：B 参考答案：B您的得分：1.5 题分：1.54、在窗体（名称为Form1）上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事件过程。
程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为"计算机等级考试"。
以下能实现上述操作的事件过程是______。
A、Private Sub Form1_ Click ()Text1.Caption = "计算机等级考试"End SubB、Private Sub Command1_ Click ()Caption = "计算机等级考试"End SubC、Private Sub Text1_Change()Command1.Caption = "计算机等级考试"End SubD、Private Sub Command1_ Click ()Text1.Text = "计算机等级考试"End Sub您的答案：参考答案：C您的得分：0 题分：1.55、下列程序段的执行结果为______。
A = 0:B = 0For I = -1 To -2 Step -1For J = 1 To 2B = B + 1Next JA = A + 1Next IPrint A; BA、 2 4B、 4 2C、-2 2D、 2 3您的答案：参考答案：A您的得分：0 题分：1.56、以下关于焦点的叙述中，错误的是______。
A、当文本框失去焦点时，触发LostFocus事件B、可以用TabIndex属性改变Tab顺序C、如果文本框的TabStop属性为False，则不能接收从键盘上输入的数据D、当文本框的Enabled属性为False时，其Tab顺序不起作用您的答案：参考答案：C您的得分：0 题分：1.57、为了使图片框的大小可以自动适应图片的尺寸，则应______。
A、将其Autosize属性值设置为FalseB、将其Stretch属性值设置为TrueC、将其Stretch属性值设置为FalseD、将其Autosize属性值设置为True 您的答案：参考答案：D您的得分：0 题分：1.58、以下Case语句中错误的是______。
A、Case 0 To 10B、Case 3,5,Is>10C、Case Is>10 And Is<50D、Case Is>10您的答案：参考答案：C您的得分：0 题分：1.59、在窗体上画一个命令按钮，然后编写如下程序：Sub S1(ByVal x As Integer, ByVal y As Integer)Dim t As Integert = xx = yy = tEnd SubPrivate Sub Command1_Click()Dim a As Integer, b As Integera = 10b = 30S1 a, bPrint "a="; a; "b="; bEnd Sub程序运行后，单击命令按钮，输出结果是：______。
A、a= 10 b= 30B、a= 30 b= 30C、a= 30 b= 10D、a= 10 b= 10您的答案：参考答案：A您的得分：0 题分：1.510、在窗体上画一个命令按钮（名称为Command1），编写如下事件过程：Private Sub Command1_Click()b = 5c = 6Print a = b + cEnd Sub程序运行后，单击命令按钮，输出的结果是：______。
A、a=b+cB、a=11C、a=D、False您的答案：参考答案：D您的得分：0 题分：1.511、文本框能输入下列______。
A、文本和数字 B、ASCII字符 C、回车 D、控制字符您的答案：参考答案：A您的得分：0 题分：1.512、执行下列语句strInput=InputBox("请输入字符串","字符串对话框","字符串")将显示输入对话框。
此时如果直接单击"确定"按钮，则变量strInput的内容是______。
A、"字符串对话框"B、"请输入字符串"C、"字符串"D、空字符串您的答案：参考答案：C您的得分：0 题分：1.513、把窗体的KeyPreview属性设置为True，然后编写如下过程：Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)Print Chr(KeyCode)End SubPrivate Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)Print Chr(KeyCode + 2)End Sub程序运行后，如果按"A"键，则输出结果为______。
A、AB B、AA C、AC D、AD您的答案：参考答案：C您的得分：0 题分：1.514、设在菜单编辑器中定义了一个菜单项，名为menu1。
为了在运行时隐藏该菜单项，应使用的语句是______。
A、menu1.Visible=TrueB、menu1.Enabled=FalseC、menu1.Enabled=TrueD、menu1.Visible=False您的答案：参考答案：D您的得分：0 题分：1.515、设a=2，b=3，c=4，下列表达式的值是______。
Not a <=c Or 4*c=b^2 And b < > a + cA、FalseB、1C、TrueD、-1您的答案：参考答案：A您的得分：0 题分：1.516、以下能够正确计算n!的程序是______。
A、Private Sub Command1＿Click()n=5:x=1:i=1Dox=x*ii=i+1Loop While i<=nPrint xEND SubB、Private Sub Command1＿Click()n=5:x=1Dox=x*ii=i+1Loop While i<nPrint xEND SubC、Private Sub Command1＿Click()n=5:x=1:i=1Dox=x*ii=i+1Loop While i>nPrint xEND SubD、Private Sub Command1＿Click()n=5:x=1:i=1Dox=x*ii=i+1Loop While i<nPrint xEND Sub您的答案：参考答案：A您的得分：0 题分：1.517、窗体上有两个水平滚动条HV、HT，还有一个文本框Text1和一个标题为"计算"的命令按钮Command1，并编写了以下程序：Private Sub Command1_Click()Call calc(HV.Value,HT.Value) End SubPublic Sub calc(x As Integer,y As Integer)Text1.Text=x*yEnd Sub运行程序，单击"计算"按钮，可根据速度与时间计算出距离，并显示计算结果。
对以上程序，下列叙述中正确的是______。
A、过程调用语句不对，应为calc(HV,HT)B、程序不能正确运行C、计算结果在文本框中显示出来D、过程定义语句的形式参数不对，应为Sub calc(x As Control,y As Control)您的答案：参考答案：C您的得分：0 题分：1.518、在窗体上画一个名称为File1的文件列表框，并编写如下程序：Private Sub File1_DblClick()x=Shell(File1.FileName,1)End Sub以下关于该程序的叙述中，错误的是______。
A、File1中显示的是当前驱动器、当前目录下的文件B、双击文件列表框中的文件，将触发该事件过程C、要执行的文件的名字通过File1.FileName指定D、x没有实际作用，因此可以将该语句写为：Call Shell(File1.FileName,1)您的答案：参考答案：D您的得分：0 题分：1.519、为了把一个记录型变量的内容写入文件中指定的位置，所使用的语句的格式为______。
A、Put文件号，记录号，变量名B、Get文件号，变量名，记录号C、Put文件号，变量名，记录号D、Get文件号，记录号，变量名您的答案：参考答案：A您的得分：0 题分：1.520、以下叙述错误的是______。
A、用Shell函数可以执行扩展名为.exe的应用程序B、Static类型的变量可以在标准模块的声明部分定义C、若用Static定义通用过程，则该过程中的局部变量都被默认为Static类型D、全局变量必须在标准模块中用Public或Global声明您的答案：参考答案：B您的得分：0 题分：1.521、要利用通用对话框控件来显示"保存文件"对话框，需要调用控件的______方法。
