《赤峰学院vb模拟试题库含答案.doc》由会员分享，可在线阅读，更多相关《赤峰学院vb模拟试题库含答案.doc（42页珍藏版）》请在三一办公上搜索。
1、模拟试题一1VB是一种面向对象的程序设计语言，（ ）不是面向对象系统所包含的三要素。 .属性 .变量 .方法 .事件 2.不论何控件，共同具有的是( )属性。 ACaption B.Text C. Name D.ForeColor3. 程序代码如下：Command1.Caption=”确定”，则Command1、Caption、“确定”分别代表（ ）A.属性、对象、值 .对象、值、属性 C.对象、方法、属性 .对象、属性、值4.下面( )是不合法的整型常数。 A278 B. &O278 C. &H278 D. 2785.为了给x、y、z三个变量赋初值1，下面正确的赋值语句是( )。 Ax=y=
2、z=1 Bx=1，y1，z1Cx=1：y1：z1 Dxyz=16.赋值语句：a=123+Mid(“123456”，3，2)执行后，变量a中的值是( )。 A”12334” B12334 C157 D1237. 数学关系3x10表示成正确的VB表达式为（） 、3=x10 、3=x AND x=3 OR x10 、3=x AND 8 Then y=x2+1 If x2=9 Then y=x2-2 If x2=1X2+3x=1 Then B、If x=1 Then f=sqr(x+1) D、If x=1 Then f=sqr(x+1)If x1 Then f=x*x+3 f=x*x+38循环语句Fo
3、r i= -3.5 To 5.5 Step -0.5的循环次数是( )。 A20 B19 C18 D09 数学关系3x10表示成正确的VB表达式为（） 、3=x10 、3=x AND x=3 OR x10 、3=x AND 8 Then y=x2+1 If x2=9 Then y=x2-2 If x25,-1,0)后，x的值为()。 A)5 B)6 C)0 D)-1 (8) 产生60，100之间的随机整数的Visual Basic表达式是（）。A) Int(Rnd*40)+60 B) Int(Rnd*40)+61C) Int(Rnd*41)+60 D) Int(Rnd*41)+61(9) 执行
4、语句s=Len(Mid(VisualBasic,1,6)后，s的值是A) Visual B) Basic C) 6 D) 11(10) 下面（）是合法的变量名。A) dimB) m-1 C)_123D) X_t6(11) 下面正确的赋值语句是（）。A）x=y+3 B）x=y=3C）x+y=3 D）3x=y(12)VB提供了结构化程序设计的三种基本结构，三种基本结构是（）。A）递归结构、选择结构、循环结构B）选择结构、过程结构、顺序结构C）过程结构、输入、输出结构、转向结构D）选择结构、循环结构、顺序结构(13) 确定一个控件在窗体上的位置的属性是（）。A) Width和HeightB) Wid
5、th或HeightC) Top和Left D) Top或Left(14) 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程 Private Sub Command1_Click() Text1.Text = Visual Text1 = Basic Text1 = ProgramEnd Sub程序运行后，如果单击命令按钮，则在文本框中显示的是A) 出错 B) Visual C) Basic D) Program (15) 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub
6、Command1_Click() Dim array1(10, 10) As Integer Dim i As Integer, j As Integer For i = 1 To 3 For j = 2 To 4 array1(i, j) = i + j Next j Next i Text1.Text = array1(2, 3) + array1(3, 4)End Sub程序运行后，单击命令按钮，在文本框中显示的值是A) 15 B) 14 C) 13 D) 12(16) 设菜单中有一个菜单项为Open。若要为该菜单命令设计访问键，即按下Alt及字母O时，能够执行Open命令，则在菜单编辑
7、器中设置“Open命令的方式是 A) 把Caption属性设置为&Open B) 把Caption属性设置为O&pen C) 把Name属性设置为&Open D) 把Name属性设置为O&pen(17) 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click() x=InputBox(Input) Select Case x Case 1,3 Print 分支 1 Case 2,4 Print 分支 2 Case Else Print Else 分支 End SelectEnd Sub程序运行后，如果在输入对话框中输入2，则窗
8、体上显示的是（）。 A） 分支1 B） 分支2 C） Else分支 D) 程序出错(18) for k=13 to -5 step -2循环次数为：（）。A) 7 B) 8 C) 9 D) 10 (19)用下面语句定义的数组的元素个数是( )Dim a(3,1 To 5) As IntegerA)8 B)15 C)20 D)21(20) 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click() a$=Program Print String(3,a$)End Sub程序运行后，单击命令按钮，在窗体上显示的内容是 A）Pro
9、B) ram C) gra D) PPP(21) 保存一个工程至少应保存两个文件，这两个文件分别是（ ）A)文本文件和工程文件 B)窗体文件和工程文件C)窗体文件和标准模块文件 D)类模块文件和工程文件 (22) 下列表达式的值为2123的是（ ）A) Val(123asd) & 2000 B) Val(123) + 2000C) Str(123) & 2000 D)Str(123)+2000(23) 表示滚动条控件取值范围最大值的属性是（）。A）Max B）LargeChange C）Value D）Max-Min(24) 当使用Line方法时，参数B与F可组合使用，下列组合中（）不允许。A
10、)BF B)B C)省略不用 D)F(25)可以RGB(x,y,z)函数获取颜色，下面的数字对应了x,y,z三个参数，其中不合法的是（）。A)0，0，0 B) 200，255，129 C) 100，256，200 D)255，255，0(26) 在用菜单编辑器设计菜单时，必须输入的项有（）。A)快捷键 B)索引 C)热键 D)名称(27) 在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：Option Base 0Private Sub Command1_Click() Dim city As Variant city = Array(北京, 上海, 天津, 重庆) Pri
11、nt city(1)End Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是A）空白 B）错误提示 C）北京 D）上海(28) 假定有以下函数过程：Function Fun(S As String) As String Dim s1 As String For i = 1 To Len(S) s1 = UCase(Mid(S, i, 1) + s1 Next i Fun = s1End Function在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click() Dim Str1 As String, Str2 As String Str1
12、= InputBox(请输入一个字符串) Str2 = Fun(Str1) Print Str2End Sub程序运行后，单击命令按钮，如果在输入对话框中输入字符串abcdefg，则 单击确定按钮后在窗体上的输出结果为 A）gfedcba B）ABCDEFG C）GFEDCBA D）abcdefg(29) Circle(500,600)，500， ， ， ,3将绘制（ ）。 A)圆弧 B)扇形 C)圆 D)椭圆(30) 在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：Private Sub Command1_Click() int t1Static t2 t1=t1+1 t2
13、=t2+1 End Sub三次单击命令按钮后，t1,t2的值分别为（）：A) 1 1B) 3 3 C) 1 3 D) 3 1二、 填空题（每题2分,计16分）1 窗体上有一个名称为List1的列表框，一个名称为Text1的文本框，一个名称为Label1、Caption属性为“Sum”的标签，一个名称为Command1、标题为“计算”的命令按钮。程序运行后，将把1100之间能够被7整除的数添加到列表框。如果单击“计算”按钮，则对List1中的数进行累加求和，并在文本框中显示计算结果，如图所示。以下是实现上述功能的程序，请填空。 Private Sub Form_Load() For i=1 To 100 If
