VB第四套模拟题

云南农业大学计算机公共课VB第四套模拟题 一、单项选择题。共50分，每小题2.5分。 1. 要使文本框获得输入焦点,则应采用文本框控件的哪个方法 AGotFocus BLostFocus Ckeypress DSetFocus 2. 要把一个命令按钮设置成无效，应设置其哪一属性值 AVisible BEnabled CDefault DCancel 3. 为了在按下回车键时执行某个命令按钮的事件过程，需要把该命令按钮的一 个属性 设置为True,这个属性是 AValue BCancel CEnabled DDefault 4. 下面给出的符号中，能作为Visual Basic的变量名的是 AABS B4A12CAA_123 DBB 5. 下面能够作为Visual Basic的表达式的是 A 4sinnBbA2-4ac C[-bsqrdlt]/2*a*cDexpxABSY 6. 下列不支持Print方法的是 A图片框控件B窗体 C打印机D文本框控件 7. 下列语句中,不正确的打印语句是 APrint a35BPrint a;35 CPrint a35DPrint a;35 8. 设有赋值语句Stt1abede和Str2xyz,则语句Print Str1Str2的输出结果 为 Aabede1-1 xyzBabedexyz C abede xyzD J abede xyz 口 9. 语句Dim a3,4,5定义的数组中所包含的数组元素的个数是 A12B60C120D345 10. Print sgn20*sqr3sqr2的输出结果为 AlBFalse CTrueD0 11. Print atabs-3A232.5, ,.000的输出结果为 A41.5000B 41.500 C 000041.5000D 000041.5000 12. Box函数的返回值的类型是 A数值B字符类型 C变体D数值或字符串视输入的数据而定 13. 设计一个程序，在程序中添加一个名称为 1的窗体，添加窗体的Click事 件过 程代码， Private sub -Click Dim x As Single,y As Single XlnputBox输人第一个数据，输人数据 ylnputBox输人第二个数据，输入数据 Print xy End Sub 程序运行时，单击窗体，先后在两个输入对话框中输入123和456,则程序的输 出结果为 A123456B123C579D456 14. 列表框中的列表项的数目可通过以下哪个属性的值获得 ACountBListcountCListlndexDlndex 15. 为使计时器控件每隔5秒钟产生一个计时器事件Timer事件，则应将其 Interval属性值设置为 A5B500C300D5000 16. 设窗体的Click事件过程代码如下 Private Sub -Click Dim k As Integer,a As Integer k1 If k1 Then a 2*k If k2 Then a 2*k 1 If k3 Then a k Print k;a End Sub 则当程序运行时,在窗体上单击鼠标时的输出结果是 A1 2 B1 3 C1 1 D3 1 17. 以下哪个程序段的执行结果为OK”。 A B Dim y As Integer Dim y As Integer y10 y20 Select Case y Select Case y Case 11 To 1 Case ls20,ls20 Print OK Print OK End Select End Select C D Dim y As Integer Dim y As Integer y6 y10 Select Case y Select Case y Case ls6,1,2 to 5 Case 1,3,ls6 Print OK End Select Print OK End Select 18. 程序运行时，在窗体上单击左键，则输出结果为 Private Sub -click Dim m As lnteger,n as Integer, j as integer, k As Integer n0 For m1 To 3 For j1 Tom For kj To3 nn1 Next k,j,m End Sub C14 D21 A 6B 10 19. 设有以下程序段 Dim i As Integer,] As Integer i1 Do While i 4 iil Forj5 To 1 Step-1 Print i*j Next j loop 则其中的语句Print i*j的执行次数是 A 15B16C17D18 20. 下面程序执行时，当在窗体上单击左键时的输出结果是 Private Sub _Click Dim x As Integer,a As Integer,y As Integer For xl To 2 a 0 For yl To x1 a a 1 Next y Print a; Next x End Sub A1 1 1B2 3 4C0 0 0D1 2 3 二、填空题共20分，每空2分。 1. 表达式 Lenxya 123的值是_ 1 2. 表达式4 5\6* 7/8 mod 9 的值2 3. Visual Basic的三种工作模式的是设计、运行和 3。 4. Visual Badic是面向 4的程序设计语言，采用 5 编程机制, 5. 假设某一过程如下 Private Sub 1_Click l .CaptionVB 示例” End S