西华师范大学计算机VB试题及答案8.doc

试卷编号：8486一、填空 共5题 （共计5分）第1题 （1.0分） 题号:1120A和B同为正整数或同为负整数的VB表达式为【1】.=(答案1)=A=INT(A) AND B=INT(B) AND A*B0第2题 （1.0分） 题号:1490如果将框架的【1】属性设置为False,则表示框架内的对象均被屏蔽.=(答案1)=Enabled第3题 （1.0分） 题号:1363数学表达式如图的VB算术表达式为【1】.=(答案1)=Sin(15*3.14/180) + Sqr(x + Exp(3)/Abs(x - y) - Log(3 * x)第4题 （1.0分） 题号:1374下面程序运行后输出的结果是【1】.Private Sub Command1_Click()a$=*:B$=$For i=1 To 4If i Mod 2=0 Thenx$=String(Len(a$)+i,B$)Elsex$=String(Len(a$)+i,a$)End IfPrint x$Next iEnd Sub=(答案1)=*$*$第5题 （1.0分） 题号:245声明单精度常量g(重力加速度)代表9.8可写成【1】.=(答案1)=const g=9.8=或=const single g=9.8二、判断 共5题 （共计5分）第1题 （1.0分） 题号:332在MsgBox 函数中 prompt 参数是必须的.答案：Y第2题 （1.0分） 题号:352在过程中用Dim和Static定义的变量都是局部变量.答案：Y第3题 （1.0分） 题号:1123使用Print方法只能在窗体中输出,不能在图片框中输出.答案：N第4题 （1.0分） 题号:342在VB中,可以将在Picture控件中绘制的图形以文件的形式保存在磁盘上.答案：Y第5题 （1.0分） 题号:270当窗体的ScaleTop=0,ScaleLeft=0时,这个窗体Top和Left值也是0.答案：N三、单项选择 共5题 （共计5分）第1题 （1.0分） 题号:3173当一个窗体被卸载时,最后引发的一个事件是.A:DeactivateB:QueryUnloadC:UnloadD:terminate答案：D第2题 （1.0分） 题号:3182记录长度最大可取的值是_字节.A:32767B:32768C:65535D:65536答案：A第3题 （1.0分） 题号:869要清除已经在图片框Picture中打印的字符串而不清除图片框中的图像,应使用语句().A:A.P1.ClsB:P1.picture=LoadPicture()C:P1.PrintD:P1.piture答案：A第4题 （1.0分） 题号:3234执行下面程序段后,变量a的值为_. For I=1 To 3 For j=1 To I For k=j To 3 a=a+1 Next k Next j Next IA:3B:9C:14D:21答案：C第5题 （1.0分） 题号:2231Rnd函数不可能是下列()值.A:0B:1C:0.1234D:0.0005答案：B四、多项选择 共5题 （共计5分）第1题 （1.0分） 题号:276下列语句哪些是错误的语句（）？A:Const Imax As Integer=&o155B:Const _Ga As String=abcC:Dim aa,bb As Integer,cc As StringD:yy=8,uu=9答案：BD第2题 （1.0分） 题号:278下列哪些标识符不符合变量的命名规则（）？A:hyuB:$abcC:4wD:y.uE:ty%F:_n8答案：BCDEF第3题 （1.0分） 题号:284设A=abcdefghijklm，下列（）的函数值为jklm。A:Mid(A,10,4)B:Left(A,4)C:Right(A,4)D:Mid(A,10,14)答案：ACD第4题 （1.0分） 题号:275下列说法中哪些是正确的（）？A:逻辑型数据占1个字节B:长整型数据占4个字节C:单精度型数据占4个字节D:一个汉字在Visual Basic中占1个字节答案：BCD第5题 （1.0分） 题号:277下列说法哪些是正确的（）？A:不能对符号常量重新赋值B:Label控件用来在窗体中显示文本，其中的文本用户不能直接修改C:TAB()函数用于在输出表达式前将输出点定位在第N-1个字符位置D:格式输出函数Format()可以使数值、日期或字符串按用户指定的格式输出答案：ABD五、程序填空 共1题 （共计10分）第1题 （10.0分） 题号:491-【程序填空】-功能：以下程序的功能为，单击窗体后如果输入的数据分别为W，8和？时， 窗体上显示的内容分别是：W is Alpha Character、8 is Numeral Character、 ？is Other Character-Private Sub Form_Click() Dim strC As String * 1 strC = InputBox(请输入数据) *SPACE* Select Case 【?】 *SPACE* Case a To z 【?】 Form1.Print strC + Is Alpha Character Case 0 To 9 Form1.Print strC + Is Numeral Character *SPACE* 【?】 Else Form1.Print strC + Is Other Character End SelectEnd Sub=(答案1)=strC=(答案2)=, A To Z=(答案3)=Case六、程序改错 共1题 （共计10分）第1题 （10.0分） 题号:455-【程序改错】-题目：猜数游戏：程序启动后Lable1和Lable2滚动显示 属于1，100的随机整数，当用户单击左大或 右大按钮时，滚动停止，如果用户猜对了， 在Lable3中显示猜对了，否则显示猜错了。-Private Sub Command1_Click() Timer1.Enabled = False *FOUND* If Val(Label1.Caption) Val(Label2.Caption) Then Label3.Caption = 猜对了 Else Label3.Caption = 猜错了 End IfEnd SubPrivate Sub Command2_Click() Timer1.Enabled = False If Val(Label1.Caption) Val(Label2.Caption) Then=或=If Val(Label2.Caption) Val(Label1.Caption) Then=(答案2)=Label3.Caption = 猜对了=(答案3)=Label3.Caption = 猜错了七、程序设计 共1题 （共计20分）第1题 （20.0分） 题号:156-【程序设计】-题目：(事件)双击窗体。 (响应)求3+6+9+12+15+18+300的和，并将结 果输出到窗体上。将结果存入变量 SUM中。-答案：- Dim i As Integer For i = 3 To 300 If i Mod 3 = 0 Then sum = sum + i End If Next Print sum-八、VB窗体设计 共2题 （共计40分）第1题 （20.0分） 题号:36-【窗体设计】-题目：请按照题目要求设计指定的窗体。 建立如(图1)所示界面。-1、窗体设置 1）名称设置为“Game”。 2）标题内容为“游戏控制器”。 3）边框样式设置为1。 4）隐藏控件菜单栏。2、在窗体中的最上面添加标签（Label） 1）名称设置为“lblTiShi”。 2）标题内容为“这些设置帮助您配置安装在计算机上的游戏控制器。”。 3）自动调整大小。3、在标签下面添加框架（Frame） 1）名称设置为“fraKongZhiQi”。 2）标题内容为“安装游戏控制器”。4、在框架“fraKongZhiQi”内添加如下控件 1）添加列表试图（ListView） 名称设置为“lvwKongZhiQi”； 查看设置为3； 添加2个列首； 列首1文本为“控制器”； 列首2文本为“状态”。 2）添加命令按钮（CommandButton） 名称设置为“cmdTianJia”； 标题内容为“添加(A).”； 窗体快捷键设置为“ALT + A”。 3）添加命令按钮（CommandButton） 名称设置为“cmdShanChu”； 标题内容为“删除(R)”； 窗体快捷键设置为“ALT + R”。 4）添加命令按钮（CommandButton） 名称设置为“cmdShuXing”； 标题内容为“属性(P)”； 窗体快捷键设置为“ALT + P”。5、在框架下面添加如下3个命令按钮（CommandButton） 1）名称设置为“cmdGaoJi”； 标题内容为“高级(D).”； 窗体快捷键设置为“ALT + D”。 2）名称设置为“cmdYiNan”； 标题内容为“疑难解答(T).”； 窗体快捷键设置为“ALT + T”。 3）名称设置为“cmdQueDing”； 标题内容为“确定”。第2题 （20.0分） 题号:77-【窗体设计】-题目：在窗体上放一文本框，一菜单