江西二级VB笔试题.doc

江西信息应用职业技术学院VB试卷考试科目：VB程序设计 考试形式：闭卷适应班级： 一、 单项选择题（每小题1分，共25分）(1)以下能在“工程资源管理器”窗口中列出的文件类型是：（ ）A)*.txt B)*.frm C)*.doc D)*.jpg (2)下列可作为Visual Basic变量名的是：（ ）A)A#A B)4A C)?xY D)constA (3) 以下能在窗体Form1的标题栏中显示“VisualBasic窗体的语句是：（ ）A) Form1.Name=VisualBasic窗体B) Form1.Title=VisualBasic窗体C) Form1.Caption=VisualBasic窗体D) Form1.Text=VisualBasic窗体”(4)将数学表达式2(a+b)+52写成Visual Basic的表达式，其正确的形式是：（ ）A) 2*(a+b)十5/2 B) 2(a+b)+52 C)(a+b)2十5*2 D) 2(a+b)+5*2 (5)窗体上只有命令按钮Command1，代码中有如下过程：Private Sub Command2_Click() a=software and hardwareMsgbox aEnd Sub 则该过程是：（ ）A)事件过程B)通用过程C)函数D)设计过程(6)在窗体上添加一个名称为List1的列表框，一个名称为Label1的标签。当单击列表框中的某个选项时，在标签中显示该选项名称。下列能正确实现此功能的程序是：（ ）A) Private Sub List1_Click()Label1CaptionList1.ListIndexEnd Sub B) Private Sub List1_Click()Label1NameList1ListIndexEnd Sub C) Private Sub List1_Click()Label1CaptionList1.TextEnd Sub D) Private Sub List1_Click()Label1NameList1.TextEnd Sub (7) 如下事件过程:Private Sub Command1_Click()x=0For i= 1 To 5x = x +1Next iLabel1.Caption= xEnd Sub程序运行后,单击命令按钮Command1,则Label1显示：（ ）_A) 3 B) 4 C) 5 D) 6(8)窗体上一个名为command1(1)的按钮，正确调用其Name属性的方法是：（ ）A)B)command1*nameC) command1(1).nameD) command1(1)*name(9)可以同时删除字符串前导和尾部空白的函数是：( )A、Ltrim B、 Rtrim C、 Trim D、Mid(10) 以下关于文件的叙述中，错误的是：（ ）A）顺序文件中的记录一个接一个地顺序存放B）随机文件中记录的长度是随机的C）执行打开文件的命令后，自动生成一个文件指针D）LOF函数返回给文件分配的字节数 (11)以下关于过程及过程参数的描述中，错误的是( )A) 事件过程不能被其他过程调用B)ByVal关键字声明按值传递参数C)ByRef关键字声明按地址传递参数D)事件过程是基于对象的事件而建立的(12)设a=5，b=3，则以下表达式值为真的是A) a=b And b10 B)(ab)Or(b0)C) a0 And(b0) D)( 5a) And (b0)(13)在窗体上一个名称为TxtA的文本框有如下的事件过程：Private Sub TxtA_KeyPress(keyascii as integer)End Sub 则能够触发KeyPress事件的操作是：（ ）A)单击鼠标 B)双击文本框C)鼠标滑过文本框 D)按下键盘上的某个键 (14)DirListBox目录列表框的Path属性的作用是：（ ）A)显示当前驱动器或指定驱动器上的路径B)显示当前驱动器或指定驱动器上的某目录下的文件名C)显示根目录下的文件名D)只显示当前路径下的文件(15)为了暂时停止计时器，应把计时器的某个属性设置为False，这个属性是：（ ）A) Visible B) TimerC) Enabled D) Interval（16） 设窗体上有一个文本框，名称为text1,程序运行后，要求该文本框不能接受键盘输入，但能输出信息，以下属性设置正确的是（ ）：A)text1.maxlength=0 B)text1.enabled=flaseC)text1.visible=flase D)text1.width=0 （17）对声明语句String*size,以下说法正确的是：（ ）A、size为定长的字符串 B、size为变长的字符串C、size为指针 D、size为定长的字符串的长度（18） Load事件的理解正确的是( ) A此事件是在一个窗体被装载时发生 B 当窗体从屏幕上删除时发生 C 可以用于释放窗体资源 D 以上均不正确（19） 在窗体上画一个名称为Text1的文本框，然后画一个名称为HScroll1的滚动条，其Min和Max属性分别为0和100。程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值，如图所示：以下能实现上述操作的程序段是：（ ）A）Private Sub HScroll_Change()Text1.Text=HScroll1.ValueEnd SubB) Private Sub HScroll_Click()Text1.Text=HScroll1.ValueEnd SubC) Private Sub HScroll_Change()Text1.Text=HScroll.CaptionD) Private Sub HScroll_Click()Text1.Text=HScroll.CaptionEnd Sub（20） 在工具箱中，需要添加才会显示的控件是( ) A Command B ComboBox C Shape D RichTextBox（21） 以下关于多重窗体程序的叙述中，错误的是：（ ）A) 用Hide方法不但可以隐藏窗体，而且能清除内存中的窗体B）在多重窗体程序中，各窗体的菜单是彼此独立的C）在多重窗体程序中，可以根据需要指定启动窗体D）对于多重窗体程序中，而且单独保存每个窗体（22） 以下叙述中错误的是：（ ）A）事件过程是响应特定事件的一段程序B）不同的对象可以具有相同名称的方法C）对象的方法是执行指定操作的过程D）对象事件的名称可以由编程者指定（23） 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()a$=VisualBasicPrint String(3,a$)End Sub程序运行后，单击命令按钮，在窗体上显示的内容是：（ ）A） VVV B) Vis C) sic D) 11（24） 设有如下程序段：x=2For i=1 To 10 Step 2x=x+iNext运行以上程序后，x的值是：（ ）A) 26 B) 27 C) 38 D) 57（25）、执行如下两条语句，窗体上显示的是( )a=9.8596Print Format(a,$0,000.00)A) 0,009.86 B) $9.86 C) 9.86 D) $0,009.86二、程序阅读题（每小题5分，共30分） 1. Satatic private Sub Command1_Click Dim x as Integer,s as integer x=Val(Inputbox(请输入一个正整数=) if x= 5 Then Timer1.Enabled = False End Sub Public Sub sub1(n As Integer) n = n + 1 Print n=; n End Sub 写出程序运行后窗体上显示的结果。4. Private Sub cmdSum_Click()static Sum as integer Sum=2*Sum+1End Sub问：第三次单击命令按钮cmdSum后，Sum的值为：5、Private Sub Form_Click() Dim a1 As Integer,a2 As Integer a1=10:a2=100 wu a1,a2 print “a1=”;a1,”a2=”;a2 End SubPrivate Sub wu(b1 As Integer,Byval b2 As Integer) b1=b12:b2=b2 Mod 13 print “b1=”;b1,”b2=”;b2 End Sub 写出程序运行时单击窗体后,在Form1上的输出结果。结果为： 6Private Sub Form_Click( ) Dim k as integer, s as integer, j as integer Form1.clsFor k=1 to 5 s=0 for j=k to 5 s=s+1next jnext kPrint “s=”,s End Sub写出程序运行时单击窗体后的输出结果。 结果为：三：综合应用题（共15分）1、输出100以内能被3整除的数之和。答案：一、选择题(每小题1分，共25分)(1) B (2) D (3) C (4) A (5) B(6) D (7) C (8) C (9) C (10) B(11) A (12) B (13) D (14) A (15) C(16) B (17) D (18) A (19) A (20) D(21) A (22) D (23) A (24) B (25) D二