如有帮助欢迎下载支持
《程序设计基础VB》期中考试卷—分析
一、选择题〖每小题2分，共计40分〗；
1. 如果窗体上有命令按钮“确定”，在代码编辑窗口有与之相对应的OK_Click()事件过程，
则命令按钮控件的名称属性和Caption属性分别为 【1】 。 A.“OK”和“确定” B.“确定”和“OK”
C.“Command1”和“确定” D.“Command1”和“OK”
分析：控件的事件过程名是由“控件名_事件名”组成，因此“OK”是名称属性 答案：A
2. 以下所列的7个控件中，具有Caption属性的有 【2】 个。 CheckBox（复选框）、ComboBox（组合框）、HscrollBar（水平滚动条）、Image（图像框）、Frame（框架）、Label（标签）、Line（线条）
A．5 B．4 C．3 D．2
分析：常用控件中，TextBox、PictureBox、Image、ListBox、ComboBox、Timer、Line、Shape、HScrollBar、VScrollBar没有Caption属性；
Label、CommandButton、OptionButton、CheckBox、Frame具有Caption属性； 另外，窗体也有Caption属性。 答案：C
3. 若需要在同一窗口内安排两组相互独立的单选按钮（ OptionButton ），可使用 【3】
控件将它们分隔开。
① TextBox ② Picture ③ Image ④ Frame Ａ． ①② Ｂ． ②③ Ｃ． ②④ Ｄ． ③④
分析：将单选按钮分组的方法是放置在不同的容器中，VB中可以做容器的控件有：PictureBox、Frame 答案：C
4. DrawStyle属性用于设置图形方法输出的线型，它受 【4】 属性的限制。 A．FillStyle B．FillColor C．BorderStyle D．DrawWidth 答案：D
5. 窗体上放置了三个文本框，若在Text1中输入456，在Text2中输入78，在程序中执行了
语句Text3=Text1+Text2后，则在Text3中显示 【5】 。
A.434 B.45678 C.溢出 D.语法错误 分析：当“+”的左右两边操作数都是字符串型数据时，“+”是字符串连接符； 当“+”的左右两边操作数都是数值型数据时，“+”是算术运算符；
当“+”的左右两边操作数不能转换成统一的数值型数据或字符串型数据时，出错。 答案：B
6. 假设变量BOOL是一个布尔型变量，则下列赋值语句中，正确的是 【6】 。 A. BOOL ='TRUE' B. BOOL =.TRUE. C. BOOL =#TRUE# D. BOOL = True 答案：D
7. 以下所列项目不属于窗体事件的是 【7】 。
A. Initialize B. SetFocus C. GotFocus D. LostFocus 分析：SetFocus是方法，不是事件 答案：B
1
如有帮助欢迎下载支持
8. 设控件使用默认名称，以下使用方法的语句中，正确的是 【8】 。
A、List1.Clear B、Form1.Clear C、Combo1.Cls D、Picture1.Clear 分析：窗体和PictureBox中清除用Print、Line、Circle方法画出的内容时，使用Cls方法； ListBox、ComboBox中清除所有列表项，使用Clear方法。 答案：A
9. 执行下面语句后，Len函数值最大的是 【9】 。
Dim IA As Integer, B As Single, S As String *5, Ch As String IA=32767 : B=23.5 : S=”A” :Ch=”abcd”
A．Len(IA) B．Len(B) C．Len(S) D．Len(Ch) 分析：Len函数的参数决定了它的作用。
1）括号中的参数是字符串类型时，Len函数的作用求字符串中字符的个数。本题中C和D就是这种情形，其中C中变量S是定长字符串，不管给它多少字符，实际存放始终是5个字符，所以C项的值是5，D项的值是4。
2）括号中的参数不是字符串类型的变量时，Len函数的作用求该变量在内存中占的字节数。．．本题中A和B就是这种情形，所以A项的值是2，B项的值是4。 答案：C
10. 在下列控件中， 【10】 控件不能改变大小。
A．TextBox B．Label C．Frame D．Timer 答案：D
11. 在窗体上画一个名称为Text1的文本框，然后画一个名称为H1的滚动条，其Min和Max属
性分别为0和100。程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值，如图所示：
以下能实现上述操作的程序段是 【11】 。
A． Private Sub H1_Change() B．Private Sub H1_Click()
Text1.Text=H1.Value Text1.Text=H1.Value End Sub End Sub
C． Private Sub H1_Change() D．Private Sub H1_Click()
Text1.Text= H1.Caption Text1.Text=H1.Caption End Sub End Sub
分析:从文字“如果移动滚动框”可以确定应该选择H1的Change事件，“滚动条的当前值”表示为：H1.Value 答案：A
12. 可以把变化长字符串S中的第一个\子串，替换成“1234\的语句是 【12】 。 A. S=Left(s, InStr(S,\B. Mid(S,InStr(S,\C. Mid(S,InStr(S,\
D. S=Left(s, InStr(S,\分析：若S=“ERABCTYABCUIABC”，那么: A项的结果S为“ERA1234TYABCUIABC” B项的结果S为“ER123TYABCUIABC” C项的结果S为“ER1234YABCUIABC” D项的结果S为“ER1234TYABCUIABC” 答案：D
2
如有帮助欢迎下载支持
13. 在 Select Case X 结构中，描述判断条件 3 ≤ X ≤ 7 的测试项应该写成 【13】 。 A．Case 3 <= X <= 7 B．Case 3 <= X ， X<= 7 C．Case Is <= 7 ， Is >= 3 D．Case 3 To 7
分析：Case条件表达式中，使用Is关键字和关系运算符配合使用，不能使用逻辑运算符。Case 3<=X,X<=7的等价于Case True,False之类的语句，X就和True或False比较，不能达到数值判断的目的 答案：D
14. 下面 【14】 是合法的整型常量。
A．&○100 B．0 C．100% D．“100” 分析：B、D非法，此题出得不好 答案：AC
15. 下面 【15】 语句，可以将列表框List1中的当前选定的列表项的值替换成\。 A.List1.AddItem \ B.List1.Text=\ C.List1.List(List1.ListIndex)= \ D.前三项均可
分析：当前选定的列表项的文本有两种方法表示：List1.List(List1.ListIndex)和List1.Text，但List1.Text不能更改，是只读属性。 答案：C
16. 下列Caption属性值中， 【16】 设置了热键。
A．File B．V&iew C．H*elp D．#Tool 答案：B
17. 如果x是一个正实数，对x的第3位小数四舍五入的表达式是 【17】 。 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)
分析：若x=12.45678，则A项的结果是：.12 ；则B项的结果是： 12.46 ；则C项的结果是： 12.5 ；则C项的结果是： .12 答案：B
18. 设程序运行时文本框中没有内容，当在文本框输入“ABC”时，窗体上显示 【18】 。 Private Sub Txtinput_KeyPress() Print txtinput.text End Sub
A．AABABC B．AAB C．A D． AB A ABC AB 分析：文本框的KeyPress事件是在按键字符显示之前执行的 答案：D
19. 下列程序段的执行结果是 【19】 。 X = 2 Y = 1
If X * Y < 1 Then Y = Y - 1 Else Y = -1 Print Y - X > 0
A．True B．False C．-1 D．1
分析：关系表达式的值是逻辑型True/False，本题将X和Y的值代入，按语句执行的顺序，得出结果。 答案：B
3