正阳职专08计算机月考Visual Basic试题
visual basic练习题(选择96题)
1、程序设计语言从程序设计方法来分类可分为【______】。
A系统设计语言、结构化语言与模块化语言B=结构化语言与模块化语言C=结构化语言、模块化语言与面向对象语言D=程序设计语言与科学计算语言2、下面不属于系统软件的是【______】。
A=操作系统B=网络系统C=信息管理系统D=计算机语言编译(解释)系统3、以下不属于高级程序设计语言的是【______】。
A=SQL语言B=C语言C=汇编语言D=Java语言4、高级程序设计语言编写的程序必须转换成机器语言才能执行，转换的方法是【______】。
A=解释和汇编B=解释和编译C=编译和转换D=解释和翻译5、软件是计算机系统的重要组成部分，它被定义为【______】。
A=计算机程序、方法、规则以及在计算机上运行所必需的数据的总称。
B=程序有关的各种文档以及在计算机上运行所必需的数据的总称。
C=计算机程序、方法、规则、程序有关各种文档以及在计算机上运行所必需的数据的总称。
D=计算机程序、方法、规则、程序有关的各种文档的总称。
6、软件可以按功能划分为【______】。
A=系统软件和应用软件B=操作系统和应用系统C=管理软件和应用软件D=系统软件和管理软件7、计算机软件包括【______】。
A=算法及数据结构B=程序和数据C=程序及文档D=可写光盘8、一个对象可以执行的动作和可被对象识别的动作分别称为【______】。
A=方法、事件B=方法、对象C=属性、方法D=过程、事件9、如果把一个人当作对象，那么血型相当于这个对象的【______】。
A=属性B=方法C=事件D=特征10、窗体从加载到显示，依次引发的事件有【______】。
A=Load,Initialize,ActivateB=Initialize,Activate,LoadC=Load,Activate,InitializeD=Initialize,Load,Activate11、Visual Basic是可视化的采用【______】驱动方式的结构化高级程序设计语言。
《VisualBasic程序设计》试题1
《Visual Basic程序设计》模拟试题（一）及答案一、单项选择题(每小题3分，共30分)1．后缀为.bas的文件表示（）。
A．类模块文件B．标准类模块文件C．窗体文件D．窗体二进制数据文件2．在文本框中将Text的内容全部显示为所定义的字符的属性是（）。
A．Password B．PasswordCharC．Caption D．Text3．以下有关Visual Basic语言描述中错误的是（）。
A．不区分大小写B．语句是一行一句，以回车键结束C．用“,”分隔一行中的多个语句D．一条语句放在多行中，则在前一行结束处使用续行符“_”连接下一行4．在VB6.0集成开发环境中有三种工作模式，下列不属于三种工作模式之一的是（）。
A．设计模式B．中断模式C．执行模式D．编写代码模式5．如果想让文本框中的内容在运行时不能编辑，需将文本框的（）属性设置为True。
A．TabStop B．MultiLine C．Locked D．Visible6．在Visual Basic中，变量的默认类型是（）。
A．Integer B．Double C．Currency D．Variant7.文本框没有（）属性。
A．Text B．Name C．Caption D．BorderStyle8．表达式7+10Mod3*2+2（）。
A．13B．7C．6D．19．VB程序中设置断点的按键是（）。
A．F1键B．F9键C．F8键D．Ctrl+F8键10．Dim I As Integer，则运行时变量I的初始值是（）。
A．0B．1C．-1D．空值二、填空题：（每空3分，共30分）1．在VB中，将数据库分为本地数据库、和三种类型。
2.执行赋值语句a=”123”+”456”后，变量a的值是。
3．用Dim A(3,-2To3)语句声明二维数组后，数组A的元素共有个。
4．Winsock控件主要用来编制基于或协议的网络应用程序。
5．控件数组的名字由属性指定，而数组中的每个元素由属性决定。
VisualBasic考试试题带答案
VisualBasic考试试题带答案Visual Basic考试试题带答案1. 应用程序打包后，其包文件的后缀为（ B ）。
A. .exeB. .cabC. .txtD. .ocx2. 在VB中，要想快速获得某个相关控件或语句的帮助信息，一般可首先选中该控件或语句，然后按的键是（ B ）A. HelpB. F1C. F10D. Enter3. 在界面设计时，双击窗体中的对象后，VisualBasic将显示的窗口是（ C ）。
A. 立即窗口B. 属性窗口C. 代码窗口D. 工程资源管理器窗口4. 后缀为.frm的文件表示VB 的（ A ）。
A. 窗体文件B. 类模块文件C. 工程文件D. 标准类模块文件5. 要改变控件的高度，应该修改控件的（ D ）属性。
A. TopB. LeftC. WidthD. Height6. 能够改变标签Label控件显示标题的属性是（ A ）。
A. CapionB. NameC. ClickD. Text7. 与传统的程序设计语言相比，Visual Basic最突出的特点是（ C ）A. 结构化程序设计B. 程序开发环境C. 事件驱动编程机制D. 程序调试技术8. 下列赋值语句正确的是（ B ）A. B+C =AB. A=B+CC. -B=AD. 5=A+B9. 应用程序设计完成后，应将程序保存，保存的过程是（ D ）。
A. 只保存窗体文件即可B. 只保存工程文件即可C. 先保存工程文件，之后还要保存工程文件D. 先保存窗体文件（或标准模块文件），之后还要保存工程文件10. 在Visual Basic中，要使一个窗体不可见，但不从内存中释放，应使用的语句是（ B ）。
A. ShowB. HideC. LoadD. UnLoand11. 如果对象的名称为Mytext，而且对象有一个属性Text，那么在代码中引用该属性的正确格式是（ B ）A. Text.MytextB. Mytext.TextC. Mytext.(Text)D. Mytext*Text12. 要在窗体Form1内显示“myfrm”，使用的语句是（ C ）A. Form.caption="myfrm"B. Form1.caption="myfrm"C. Form1.print "myfrm"D. Form. print "myfrm"13. 每建立一个窗体，工程管理器窗口中就会增加一个（ B ）。
《程序设计Visual basic》 试卷A及参考答案
《程序设计Visual basic》试卷A及参考答案华中师范大学成人专科学年第二学期《程序设计Visual basic》试卷（A卷）装考试时间：120分钟闭卷任课老师：班级：学号：姓名：成绩：一、单项选择题：(每小题3分，共60分) 1. 用高级语言编写的程序为_____________. A.源程序 B.编译程序 C.可执行程序 D.编辑程序 2.计算机的指令集合称为__________. A.机器语言 B.高级语言 C.程序D.软件 3.对于汇编语言的评述中,不正确的是_____________ A.汇编语言采用一定的助记符来代替机器语言中的指令和数据,有称为符号语言 B.汇编语言应用速度快,适用编制实时控制应用程序订 C.汇编语言有解释型和编译行两种 D.机器语言、汇编语言和高级语言程序是计算机语言发展的三个阶段 4.计算机能直接执行的程序是_____________ A.源程序 B. 机器语言程序 C.高级语言程序 5.以下_____________语言是解释性语言. A.FORTRAN B.C�MC++ C.Pascal D.Basic D.汇编语言程序 6.以下_____________语言编写的程序执行速度最快. A.机器语言 B. 高级语言 C.面向对象的语言程序 D.汇编语言程序 7.以下_____________应用程序最适合作为源程序输入的编辑程序. A.Word B.Excel C.记事本 D.写字板线 8.以下____________-语言是脚本语言. A.Basic B.Java C.JavaScrip D.Java Applet 9.以下_____________不是标记语言. A.HTML B.JavaScrip C.SGML D.XML 110.以下_____________属于面向对象的程序设计语言.A.COBOLB.FORTRANC.PascalD.C++11.下列关于计算表示论述中,不正确的是_____________.A.用自然语言表示算法通俗易懂,描述包含分支和循环的算法方便B.流程图是用一些图框表示各种操作,用图形表示算法,直观形象,易于理解 C.伪代码是介于自然语言和计算机语言之间的文字和符号来描述算法 D.用计算机语言表示算法必须严格所用语言的语法规则12.关于高级语言编写的源程序的运行的论述中,不正确的是_____________A.解释程序将源程序逐条翻译成若干条机器指令并立即执行之B.编译程序对源程序整体扫描，先进行语法检查，通过后再编译.objd的目标程序C．需要用连接程序把这些目标程序块连接在一起，形成.exe的可执行目标程序 D.有些高级语言编写的源程序能被计算机硬件识别并运行 13.关于算法的论述中，不正确的是_____________A.一个算法应包含有限个操作步骤，每一步的完成时间无限制 B．算法的含义应当是唯一的，而不应当产生“歧义性”C．算法总的每一个步骤都应当把这些能有效执行，并得到确定的结果 D．一个算法允许有若干个输入/输出14.下列论述中，不属于“结构化程序设计思想要点”的是_____________A.自顶向下，逐步求精B。
计算机专业visual basic月考试题
高二计算机专业visual basic月考试题姓名__________班级_________学号________ （说明：选择题的答案直接写在试卷上面）一、选择题(5*2=10分)（）1、表达式( 7 \ 3 + 1) * (18 \ 5 - 1)的值是（A）8.67 （B）7.8 （C）6 （D）6.67（）2、表达式5 ^ 2 Mod 25 \ 2 ^ 2的值是（A）1 （B）0 （C）6 （D）4（）3、表达式25.28 Mod 6.99的值是（A）1 （B）5 （C）4 （D）出错（）4、表达式Int (8 * Sqr (36) * 10 ^ ( - 2) * 10 + 0.5) / 10的值(A) 4 .8 (B) 0.48 (C) 5 (D) 0.5（）5、\ , / , Mod , * 四个算术运算符中，优先级最低的是(A) \ (B) / (C)Mod (D) *二、填空题（10*2=20分）1、已知A=7.5,B=2,C= - 3.6，写出下列布尔表达式的值。
（1）A>B And C>A Or A<B And Not C>B________________（2）A>B And C>A Or Not C>B And A<B________________2、设A=2,B=3,C=4,D=5，写出下列布尔表达式的值。
（1）A>B And C<= D Or 2*A>C___________（2）3>2*B Or A=C And B<>C Or C>D____________（3）Not A<=C Or 4*C=B ^ 2 And B<>A+C_____________3、若A=20,B=80,C=70,D=30，则表达式A+B>160 Or (B*C>200 And Not D>60)的值是 ________4、设A=2,B= - 2，则表达式A/2+1>B+5 Or B*( - 2)=6的值是_____________5、设A=2,B= - 4，则表达式3*A>5 Or B+8<0的值是____________________6、关系式X<= - 5或X>= 5所对应的布尔表达式是：_____________7、A的绝对值大于等于B同时A不等于C的布尔表达式是：____________三、判断程序或程序段的执行结果（10*6=60分）1．下列程序段的执行结果为（）X=2:Y=1If X * Y <1 Then Y =Y-1 Else Y =-1Print Y-X >02．下列程序段的执行结果为（）X=5Y=-20If Not X >0 Then X=Y-3 Else Y = X+3Print X-Y; Y-X3．下列程序段的执行结果为（）A=″1″B=″2″A=Val(A)+Val(B)B=Val(″12″)If A <> B Then Print A-B Else Print B-A4．下列程序段的执行结果为（）J1=10J2=30If J1<J2 Then Print J2;Print J15．下列程序段的执行结果为（）a = Rnd + 90If Fix(a) > 10 Thenb = Fix(a)If b < 100 ThenPrint bEnd IfEnd If6．下列程序段的执行结果为（）A = 75If A > 60 ThenI = 1ElseIf A > 70 ThenI=2ElseIf A > 80 ThenI = 3ElseIf A > 90 ThenI = 4End IfPrint I7.下列程序段的结果为（）Dim M(10)For I=0 To 10M(I)=2*INext IPrint M(M(3))8.下列程序段的结果为（）Dim A(5)For I=1 To 5A(I)=I*INext IPrint A(I-1)9.下列程序段的结果为（）Dim M(10)For K=1 To 10M(K)=11-KNext KX=6Print M(2+M(X))10、若整型变量a=2，b=3，则下面的程序段执行后整型变量c的值为（）If a>5 thenIf b<4 then c=a-b else c=b-aElseIf b>3 then c=a*b else c=a mod bEnd if四、编程题（10分）输入语文成绩，如果大于等于90分，则在窗体中输出“优”；小于90分，大于等于80分，则输出“良”；小于80分，大于等于60分，则输出“可”；小于60分，则输出“差”写完整下列程序：Private Sub Form_Activate()___________________________________________score = InputBox("请输入语文成绩：")End Sub。
Visual Basic考试题
Visual Basic考试题1. 下列说法中错误的是（ B ）。
A. 应用程序的界面是窗体B. 应用程序的界面是对象C. 每个应用程序都要生成一个工程D. 一个应用程序由若干个Visual Basic 文件组成2. 下列关于窗体的说法不正确的是（ B ）。
A. 窗体的标题由Caption属性确定B. 窗体的Name属性与Caption属性相同C. 窗体的背景图片由其Picture属性设定D. 通过设置Icon属性可使窗体获得最小花时的图标3. Visual Basic应用程序处于执行模式时，这时（ A ）。
A. 既不能设计界面，也不能编写代码B. 可以编辑代码，不能设计界面C. 可以设计界面，不能编辑代码D. 既能设计界面，也能编写代码4. 无论何种控件，共同具有的属性是（ B ）A. TextB. NameC. CaptionD. ForeColor5. 能够改变标签控件显示标题的属性是（ B ）A. NameB. CaptionC. TextD. BordeStyle6. 在VB6.0集成开发环境中有三种工作模式，下列不属于三种工作模式之一的是（ D ）A. 设计模式B. 中断模式C. 执行模式D. 编写代码模式7. Visual Basic是一种面向对象的程序设计语言，构成对象的三要素是（ B ）。
A. 属性、控件和方法B. 属性、事件和方法C. 窗体、控件和过程D. 控件、过程和模块8. 下面各种高级语言中，不是面向对象程序设计语言的是（ C ）。
A. Visual BasicB. C++C. PascalD. Java9. 后缀为.vbp的文件表示VB 的（ C ）。
A. 窗体文件B. 类模块文件C. 工程文件D. 标准类模块文件10. 一个VB应用程序可以包含几个vbp文件（ A ）A. 1个B. 2个C. 可以没有D. 不受限制11. 将定时器的时间间隔设置为1秒，则定时器的Interval属性值应设为（ C ）A. 1B. 100C. 1000D. 1012. MsgBox函数的返回值的类型是（ A ）A. 整型B. 字符串C. 逻辑型D. 日期型13. 设置标签边框的属性是（ A ）。
《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】序号的横线上，答在试卷上不得分。
计算机对口升学VB月考试卷【含答案】
深州职教中心2010---2011学年度第yi学期08计升学【VisualBasic】月考试卷试卷说明：1.本试卷共两道大题，共100分；2.考试时间为90分钟；3.本试卷共四页（含答案专页），交卷时只交答案页一、选择题(40小题,每小题2分,共80分)1.在窗体（名称为 Form1）上画一个名称为 Text1 的文本框和一个名称为 Command1的命令按钮，然后编写一个事件过程。
程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“VB考试”。
下列能实现上述操作的事件过程是：（A）。
A）Private Sub Text1_Change( ) Command1.Caption="VB考试"End Sub B）Private Sub Command1_Click( ) Caption="VB考试"End SubC）Private Sub Form1_Click( ) Text1.Caption="VB考试"End Sub D）Private Sub Command1_Click( ) Text1.Text="VB考试"End Sub2.为了使命令按钮（名称为 Command1）右移200，应使用的语句是（C）。
A）Command1.Move-200 B）Command1.Move 200C）Command1.Left=Command1.Left+200D）Command1.Left=Command1.Left-2003.下列所示的，文本框不具有的属性有（A）A) Caption B) Text C) Enable D) Visible4.下列术语中有属于方法的是( C )A) SetFocus B) Drag C) Click D) Move5.单击按钮，在标签中显示“LOVE VB!”所用到的事件有( D )A) Activate B) Load C) DblClick D) Click6.下列关于Alignment属性的叙述正确的是( A )A) 返回或设置标签中文本的对齐方式B) 返回或设置文本框文本的对齐方式C) 决定标签是否根据文本的变化而改变自己的尺寸D) 其默认值为1,文本居左对齐，取值为单精度型7.ForeColor属性常用于设置( A )A) 前景色B) 背景色C) 边框色D) 以上三者都不是8.如果控件根据输入的文本的高度自动改变尺寸，则应设置（ D ）A)AutoSize,False B)AutoSize,True C)WordWrap,False D)WordWrap,True 9.下面属性中，( B )与控件的外观无关A) BackStyle B) Top C) BorderStyle D) Appearance10.当用户鼠标移动到控件上时，显示用于描述该控件的文本内容，则应将对应的内容设置在其( C )属性中A) Caption B) Description C) ToolTipText D) Text11.下列说法错误的为（D）A) 每一个控件都有名称属性B) 在创建控件数组是每个控件的名称是相同的C) 标签控件可以为没有Caption属性的控件创建快捷键D) Shape和Line均只响应Click事件12.绘制一条起点为（100，110）终点为（120，130）的直线，下面语句正确的是( D)，A) line1.x1=100, line1.x2=110, line1.y1=120, line1.y2=130B) line1.x1=100, line1.y2=110, line1.y1=120, line1.x2=130C) line1.y1=100, line1.x2=110, line1.x1=120, line1.y2=130D) line1.x1=100, line1.y1=110, line1.x2=120, line1.y2=13013.如果给文本框设置为具有垂直滚动条，则需（B）A) 设置文本框的ScrollBar属性为1B) 设置文本框的ScrollBar属性为2C) 将Scroll的Value值设置为1D) 添加VscrollBar控件14.在窗体（名称为 Form1）上画一个名称为 Text1 的文本框和一个名称为Command1 的命令按钮，然后编写一个事件过程。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
正阳职专08计算机第三次月考Visual Basic试题2010-12-27题卡中）（1）下列符号哪一个是VB中的合法变量名A. IFB. 7AB C. A[B]7D. AB7 （2）数学式子sin25°写成VB表达式是A. sin25 B. Sin（25）C Sin（25*3.14/180）D. Sin(25°) （3）函数Int(Rnd(0)*10)是在哪个范围内的整数？A. （0，1） B. （1，10）C. （0，10）D. （1，9）（4）若x是一个正实数，对x的第3位小数四舍五入的表达式是______A. 0.01*Int(x+0.005)B. 0.01*Int(100*(x+0.005))C. 0.01*Int(100*(x+0.05))D. 0.01*Int(x+0.05)（5）函数Left(“Hello”,2)的值为A. HeB. elC. loD. True （6）函数Int(Abs(99-100)/2)的值A. 1B. 0C.“1”D. “0”（7）表达式2*3^2+2*8/4+3^2的值A. 64B. 31C.49D. 22 （8）将命令按钮Command1设置为不可见，应修改该命令按钮的___属性。
A. VisibleB. ValueC. CaptionD. Enabled（9）设a=5, b=6, c=7, d=8，执行语句X=Ilf（（a＞b）And （c＞d）, 10, 20）后，x的值是A）10 B）20 C）30 D）200 （10）语句Print Sgn（-6^2）+ Abs（-6^2）+Int（-6^2）的输出结果是A）-36 B）1 C）-1 D）-72（11）以下窗体名中哪些是非法的窗体名( )。
A._aform B.3frm C.f_1D.frm 5E.f_1*（12）一个名称为myfrm,标题属性为form1的窗体，它的单击事件名应为A. myfrm_clickB.form1_clickC.form_clickD.me_click（13）执行下面语句：print “5*20”的结果是( )。
A.“5*20”B.出现错误信息C.5*20D.100（14）下列语句代码哪一些可正常执行(正常执行是指系统不给出出错提示);A、Print 32765 + 3B、Print 5 +7 = 14 C、Print 256 / 128D、Print "14" + 12E、Print "14"& 12（15）以下使用方法的代码中，正确的是( )。
A、Label1.SetfocusB、Form1.ClearC、Text1.SetFocusD、Combo1.Cls（16）以下程序段的输出结果是x=I：y=4Do Until y＞4x=x*y：Y=y＋ILoop：Print xA）1 B）4 C）8 D）20（17）在窗体上画一个命令按钮，名称为Commandl，编写如下事件过程：Private Sub Command1_Click（）Dim a$, b$，c$, k%a="ABCD”：b=”123456”c=""：k=1Do While k＜= Len（a）Or k＜=Len（b）If k＜=Len（a）Thenc=c＆Mid（a, k, 1）End IfIf k＜=Len（b）Thenc=c＆Mid（b, k, 1）End Ifk=k＋1LoopPrint cEnd Sub运行程序，单击命令按钮，输出结果是A）123456ABCD B）ABCD123456C）D6C5B4A321 D）AlB2C3D456（18）有如下事件过程：Private Sub Form Click（）Dim n A s Integerx=0n=InputBox（"请输入一个整数”）For i=1 To nFor j=1 To ix=x＋I：Next j：Next i：Print xEnd Sub程序运行后，单击窗体，女口果在输入对话框中输入：，则在窗体上显示的内容是A）13 B）14 C）15 D）16（19）请阅读程序：Sub subP（b（）As Integer）For i=1 To 4b（i）=2*iNext iEnd SubPrivate Sub Command 1_Click（）Dim a（l To 4）As IntegerA（l）=5：a（2）=6：a（3）=7a（4）=8For i=1 To 4Print a（i）Next iEnd Sub运行上面的程序，单击命令按钮，则输出结果是A）2 B）5 C）10 D）出错4 6 126 7 148 8 16（20）Fibonacci数列的规律是：前2个数为1，从第3个数开始，每个数是它前2个数之和，即：1，1，2, 3, 5, 8,13, 21，34, 55, 89,…。
某人编写了下面的函数，判断大于1的整数x是否是Fibonacci数列中的某个数，若是，则返回True,否则返回False。
Function Isfab（x As Integer）As BooleanDim a As Integer, b As Integer, c As Integer, flag As Booleanflag=False：a=1：b=IDo While x＜bc=a＋b：a=b：b=cIf x=b Then flag=TrueLoop ：Isfab=flagEnd Function测试时发现对于所有正整数x,函数都返回False,程序需要修改。
下面的修改方案中正确的是A）把a= b与b=c的位置互换B）把c=a+b移到b=c之后C）把Do While x＜b改为Do While x＞bD）把if x=b Then flag=True二、判断题10题，每题1分21、使用声明语句建立一个变量后，VB自动将数值类型的变量赋初值0，变长的字符串被初始化为一个零长度的字符串（””），定长的字符串则用空格填充，Variant变量被初始化为Empty，布尔型的变量初始化为False。
22、在窗体中用Show或Hide方法和在代码中将Visible属性分别设置为TRUE或FALSE的效果是一样的。
23、当对象具有焦点时，按下、松开键盘上一个键会触发该对象的KeyPRESS 事件。
该事件先于KEYDOWN 事件而后于KEYUP事件发生。
24、Dim a1,a2 as integer 语句显式声明变量a1和a2 都为整型变量。
25、函数Len(“abc d”+space(5))的值是5。
26、执行Do…Loop While语句时，不管条件真假，首先会无条件地执行一次循环。
27、语句Command1.visible=false 与Command1.enabled=false 是等价的。
28、通过对CommonDialog通用对话框控件action属性的赋值或方法调用可以生成所需要的如open、save as、color、font、print、help 等常用对话框。
29、当图片框picturebox控件的autosize属性为true时，超过图片框尺寸的图片其超过部分会被图片框截去。
30要创建新的顺序文件，必须先用input或output或append方式打开该文件。
三、填空题10题，每题2分31、若用变量x来存放数据765432.123456，应将x声明为____________变量类型。
32、VB共有5种类型的表达式：算术表达式、____________、关系表达式、布尔表达式和日期表达式。
33、VB是根据表达式的_______符来确定表达式的类型的。
34、写出VB算术表达式a/(c/(d+e^sqr(f))+b)所对应的数学表达式___________35、设A=7、B=3、C=4，写出表达式：A Mod 3 + B^3/C\5的值________36、把数学式T＋3≠V－2且T+V>100写成VB关系或逻辑表达式。
_______________________________37、写出表达式Val("10.5abc2") *Fix(2.7) 的值。
___________38、程序运行时，要求当鼠标移动到文本框控件上时出现提示文本，需要对文本框的哪一个属性进行设置？___________39、怎样在程序设计段创建控件数组？___________40、scale (0,0)-(100,100) :Form1.Line (20, 20)-(50, 50), ,B语句画出的是什么图形？________四、阅读题（每题5分）20分1、请顺序写出下列程序的运行结果：Option ExplicitDim x As Long, y As Long, z As LongPrivate Sub Form_Activate()x = 3: y = 6: z = 9If prime(x) Then Print prime(x)If prime(y) Then Print yIf prime(z) ThenPrint zElsePrint "Welcome!"End IfEnd SubPrivate Function prime(m As Long)Dim f As Boolean, i As Integerf = TrueIf m > 3 ThenFor i = 3 To Sqr(m)If m Mod i = 0 Then f = False:Exit ForNextEnd If： prime = fEnd Function2、请顺序写出下列程序的运行结果：Option ExplicitDim a(5), i As Integer, j AsIntegerPrivate Sub yd(x(), n, m)x(0) = x(n)If n < m ThenFor i = n To m - 1x(i) = x(i + 1)NextElseFor i = n To m + 1 Step -1x(i) = x(i - 1)NextEnd Ifx(m) = x(0)End SubPrivate Function strr(x())Dim p As Stringp = Str(x(1))For i = 2 To UBound(x)p = p & "," & x(i)Nextstrr = pEnd FunctionPrivate Sub Form_Activate()For i = 1 To 5a(i) = iNexti = 2: j = 5yd a(), i, jPrint strr(a)End Sub3、请顺序写出下列程序的运行结果：Option ExplicitPrivate Function age(n As Integer)As IntegerIf n = 1 Thenage = 2Elseage = age(n - 1) + 2End IfEnd FunctionPrivate Sub Form_Load()Debug.Print age(3)End Sub4、已Text1=”Hi!,,,friends…”，请写出运行Call sep_get(Text1)后在列表框List1中显示的内容。