|
||
|
||
| 一、选择题1～20每小题2分，21～30每小题3分，共70分 1.在窗体中添加一个命令按钮，并编写如下程序： Private Sub Command1Click() X=1:Y=2:Z=3 X=Y:Y=Z:Z=X Print Z End Sub 程序执行后，输出的结果是()（本题分值：1分） A.3 B.0 C.2 D.1 【正确答案】 C 2.下列叙述不正确的是()（本题分值：1分） A.注释语句是非执行语句，仅对程序的有关内容起注释作用，它不被解释和编译 B.注释语句可以放在代码中的任何位置 C.注释语句不能放在续行符的后面 D.代码中加入注释语句的目的是提高程序的可读性 【正确答案】 B 3.Rnd函数不可能产生()值。（本题分值：1分） A.0 B.1 C.0.1234 D.0.00005 【正确答案】 B 4、下面表达式中，()的运算结果与其他三个不同。（本题分值：1分） A.Exp(-3.5) B.Int(-3.5)+0.5 C.-Abs(-3.5) D.Sgn(-3.5)-2.5 【正确答案】 A 5.数学式子sin30°写成VB表达式是：()（本题分值：1分） A.Sin30 B.Sin(30) C.Sin(30°) D.Sin(30*3.14/180) 【正确答案】 D 6.表达式5＾2 Mod 25＾2的值是()（本题分值：1分） A.1 B.0 C.6 D.4 【正确答案】 A 7.函数UCase(Mid(″visual basic″,8,8))的值为()（本题分值：1分） A.visual B.basic C.VISUAL D.BASIC 【正确答案】 D 8.设有数组声明语句： Option Base 0 Dim B(-1 To 10,2 To 9,20) As Integer 则数组B中共有()个元素。（本题分值：1分） A.1800 B.1848 C.2016 D.2310 【正确答案】 C 9.在VB语言中，6个关系运算符在运算过程中优先级从高到低的顺序是()（本题分值：1分） A.=→<>→<→>→<=→>= B.>→>=→=→<→<=→<> C.<=→<→=→>=→>→<> D.不分先后顺序 【正确答案】 D 10.下面程序运行后，输出的值是() Private Sub Command1_Click() J=1 While J＜5 J=J+1 A=A+J*J Wend Print A End Sub （本题分值：1分） A.25 B.16 C.29 D.54 【正确答案】 D 11.有如下程序： Private Sub FormKeyPress(KeyAscii As Integer) For m=1 To 3 For j=1 To m For k=j To 3 n=n+m+j-k Next k Next j Next m Print n End Sub 程序运行后，按任意键，n的值是()（本题分值：1分） A.3 B.14 C.9 D.20 【正确答案】 D 12.函数InStr(″VB程序设计教程″，″程序″)的值为()（本题分值：1分） A.1 B.2 C.3 D.4 【正确答案】 C 13.单击命令按钮时，下列程序代码的执行结果为() （本题分值：1分） A.该计算机中的CPU有32个寄存器 B.该计算机能够处理的最大数不超过232 C.该计算机每秒钟所能执行的指令条数为32MIPS D.该计算机中的CPU可以同时处理32位的二进制数 【正确答案】 A 14.表达式Int(4*Rnd+1)*(Int(4*Rnd-1))值的范围是( )（本题分值：1分） A.［-1，8］ B.［-4，8］ C.［-3，8］ D.［0，8］ 【正确答案】 B 15.下列赋值语句中，( )是错误的。（本题分值：1分） A.x=x+1 B.x=x+y C.x+y=x D.x=4＞6 【正确答案】 C 16.在以下四个逻辑表达式中，其逻辑值为“真”的是( )（本题分值：1分） A.Not(3+5＜4+6) B.2＞1 And 3＜2 C.1＞2 Or 2＞3 D.Not(1＞2) 【正确答案】 D 17.InputBox函数返回值的类型为()（本题分值：1分） A.数值 B.字符串 C.变体 D.数值或字符串(视输入的数据而定) 【正确答案】 B 18.表达式″Turbo″+″c″＞″True″+″Basic″的值是()（本题分值：1分） A.0 B.1 C.-1 D.2 【正确答案】 C 19.表达式1.5+3＞2 Or 7 Mod 3＜4 And Not 1的运算结果是()（本题分值：1分） A.-1 B.0 C.1 D.其他 【正确答案】 A 20.下列程序的功能是() （本题分值：2分） A.输出字符串x的值 B.输出字符串x的长度 C.判断字符串x是否对称 D.输出字符串x左右两边的字符 【正确答案】 C 21.下面程序运行后，窗体(Form1)中输出的结果是( ) Private Sub Form1_Load() Form1.AutoRedraw=True x=-17.8 Print Sgn(x)*Int(Abs(x)) End Sub （本题分值：1分） A.-18 B.-17 C.17 D.18 【正确答案】 B 22.在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() A=″12″ B=″34″ C=″56″ Print A＋B＋C End Sub 程序运行后，单击命令按钮，输出结果是( ) （本题分值：1分） A.″123456″ B.123456 C.102 D.显示出错信息 【正确答案】 B 23.下面程序运行后输出的结果是( ) （本题分值：1分） A.1 1 B.0 2 C.1 2 D.6 【正确答案】 C 24.下面程序的循环次数为( ) For I=10 To 40 Step 6 Print I Next I （本题分值：1分） A.5 B.6 C.32 D.33 【正确答案】 B 25.下面程序运行后，m的值是( ) a=12.3 b=-123 m=Len(Str(a)+Str(b)) （本题分值：1分） A.9 B.5 C.7 D.8 【正确答案】 A 26. （本题分值：1分） A.60 B.43 C.14 D.12 【正确答案】 B 27. （本题分值：1分） A.9 B.32 C.6 D.8 【正确答案】 B 28.下面程序运行后输出的结果是( ) Private Sub Form_Click() For X=5 To 2.5 Step -7 Next X Print X End Sub （本题分值：1分） A.-2 B.2.5 C.2.9 D.-7 【正确答案】 A 29.下面程序运行后输出的结果是( ) Private Sub Command1_Click() A=0 For M=1 To 10 A=A+1∶B=0 For J=1 To 10 A=A+1∶B=B+2 Next J∶Next M Print A;B End Sub （本题分值：1分） A.10 20 B.20 110 C.110 20 D.200 110 【正确答案】 C 30.以下程序段中，循环语句( ) Private Sub Form_Load() x%=0 While Not x x=x+1 Print x Wend End Sub （本题分值：1分） A.是死循环 B.有语法错误 C.循环体执行一次 D.将产生“溢出”错误 【正确答案】 D 二、填空题(每空2分，共30分) 1、要使工具栏控件的某按钮呈按钮菜单的样式，可以在其属性页中设置其选项为5-tbrDropDown。 （本题分值：2分） 【正确答案】 【1】Style 2、若A=20,B=80,C=70,D=30,则表达式A+B＞160 Or (B*C＞200 And Not D＞60)的值是。 （本题分值：2分） 【正确答案】 【2】True 3、2sinx+3cosx+arctanx+ln x lny的VB表达式为。 （本题分值：2分） 【正确答案】 【3】2*Sin(x)+3*Cos(x)+Atn(x)+Log(x)*Log(y) 4、在工具栏的右侧还有两个栏，分别用来显示窗体的当前位置和大小，其单位为，1英寸等于。左边一栏显示的是窗体左上角的坐标，右边一栏显示的是窗体的长×宽。 （本题分值：4分） 【正确答案】 【4】Twip 【5】1440Twip 5、要将某窗体定义为一个MDI子窗体，需要将其属性设置为True。 （本题分值：2分） 【正确答案】 【6】MDIChild 6、下面是用一个子程序求2!+3!+4!的值的程序，请完成程序。 Private Sub Command1_Click() s=0 For t= GoSub 200 s=s+p Next t Print ″2!+3!+4!=″;s Exit Sub 200：p=1 For k=1 To t p=p*k Next k End Sub （本题分值：4分） 【正确答案】 【7】2 To 4 【8】Return 7、使用Mod运算符判断变量i是否为偶数，若为偶数就把它在窗体上显示出来。使用单行结构条件语句为。 （本题分值：2分） 【正确答案】 【9】If i Mod 2=0 Then Print i 8、在运行时，MDI父窗体中的子窗体最小化时，其图标将显示在中。 （本题分值：2分） 【正确答案】 【10】MDI父窗体 9、搬砖问题：36块砖，36人搬，男的搬4块，女的搬3块，2个小儿抬1块，要求1次全部搬完，问需男、女、小儿各多少人? Private Sub Command1_Click() For Male=1 To 9 For Female=1 To 12 For Boy=1 To 36 Step 2 If Boy+Female+Male=36 And Then Print Male,Female,Boy End If Next Boy Next Female Next Male End Sub （本题分值：2分） 【正确答案】 【11】Male*4+Female*3+Boy/2=36 10、下面的程序用于根据文本框X中输入的内容进行以下处理： 若X为2、4、6，则打印“X的值为2、4、6”；若X为3、5，则打印“X的值为3、5”；若X为7、8，则打印“X的值为7、8”；否则，打印“X不在范围内”。 Private Sub Command1_Click() Select Case Val(X.Text) Case Print ″X的值为2、4、6″ Case Print ″X的值为3、5″ Case Print ″X的值为7、8″ Print ″X不在范围内″ End Select End Sub （本题分值：8分） 【正确答案】 【12】2，4，6 【13】3，5 【14】7，8 【15】Case Else |
||