1、1模拟试题一1V B 是 一 种 面 向 对 象 的 程 序 设 计 语 言 ， （ ） 不 是 面 向 对 象 系 统 所 包 含 的 三 要 素 。 .属 性 .变 量 .方 法 .事 件 2.不 论 何 控 件 ， 共 同 具 有 的 是 ( )属 性 。A Caption B.Text C. Name D.ForeColor3. 程 序 代 码 如 下 ：Command1.Caption=”确 定 ”， 则 Command1、 Caption、 “确 定 ”分 别 代 表 （ ） A.属 性 、 对 象 、 值 .对 象 、 值 、 属 性 C.对 象 、 方 法 、 属 性 .对 象
2、 、 属 性 、 值4.下 面 ( )是 不 合 法 的 整 型 常 数 。A 278 B. &O278 C. &H278 D. 2785.为 了 给 x、 y、 z 三 个 变 量 赋 初 值 1， 下 面 正 确 的 赋 值 语 句 是 ( )。A x=y=z=1 B x=1， y 1， z 1C x=1： y 1： z 1 D xyz=16.赋 值 语 句 ： a=123+Mid(“123456”， 3， 2)执 行 后 ， 变 量 a 中 的 值 是 ( )。A ”12334” B 12334 C 157 D 1237. 数学关系 3x=3 OR x8 Then y=x2+1If x2
3、=9 Then y=x2-2If x2=1 Then B、If x=1 Then f=sqr(x+1) D、If x=1 Then f=sqr(x+1)If x=3 OR x=1X2+3 x8 Then y=x2+1If x2=9 Then y=x2-2If 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) 执行语句 s=Len(M
4、id(“VisualBasic“,1,6)后，s 的值是A) Visual B) Basic C) 6 D) 11(10) 下面（）是合法的变量名。A) dim B) m-1 C) _123 D) 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“10 Text1 = “Basic“ Text1 = “Program“End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的是A) 出错 B) Visual C) Basic D) Program (15) 在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，
6、然后编写如下事件过程：Private Sub 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“。若要为该菜单命令设计访问键，即按
7、下 Alt 及字母O 时，能够执行“Open“命令，则在菜单编辑器中设置“Open“命令的方式是A) 把 Caption 属性设置为&Open B) 把 Caption 属性设置为 O&penC) 把 Name 属性设置为&Open D) 把 Name 属性设置为 O&pen(17) 在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()x=InputBox(“Input“)Select Case xCase 1,3Print “分支 1“Case 2,4Print “分支 2“Case ElsePrint “Else 分支 “End SelectEnd Sub程序运行后，如果在输入对话框中输入 2，则窗体上显示的是（）。A） 分支 1 B） 分支 2 C） Else 分支 D) 程序出错
