《赤峰学院vb模拟试题库含答案集锦》由会员分享，可在线阅读，更多相关《赤峰学院vb模拟试题库含答案集锦（42页珍藏版）》请在金锄头文库上搜索。
1、1模拟试题一模拟试题一1VB 是一种面向对象的程序设计语言，（ ）不是面向对象系统所包含的三要素。.属性 .变量 .方法 .事件 2.不论何控件，共同具有的是( )属性。ACaption B.Text C. Name D.ForeColor3. 程序代码如下： Command1.Caption=”确定 ”，则 Command1、Caption、“确定 ”分别代表（ ） A.属性、对象、值 .对象、值、属性 C.对象、方法、属性 .对象、属性、值 4.下面 ( )是不合法的整型常数。A278 B. amax, “min=“; aminEnd Sub三、写出下面程序的运行结果（10 分）1. Pr
2、ivate Sub Command1_Click()x = 0n = InputBox(“)For i = 1 To nFor j = 1 To ix = x + 1Next jNext iPrint xEnd Sub程序运行后，单击命令按钮，如果输入 5，则在窗体上显示的内容是:2. Option base 1Private sub subp(b() As Integer) for i=1 to 4b(i)=2*inext i End FunctionPrivate Sub Command1_Click() Dim a() as integer a(1)=5a(2)=6a(3)=7a(4)=
3、8subp a()for i= 1 to 435print a(i)next iEnd Sub单击命令按钮后，程序的运行结果为：四、程序设计（10 分）我国现有人口约 13 亿，设年增长率为 0.8%，编写程序，计算多少年后增加到20 亿。答案答案一、一、选择题选择题CBDAA BCCCD BDBDC CACBD CBCBA DDBCC二、二、填空题填空题1 下拉式下拉式 弹出式弹出式2 Showopen showcolor 1 33 Sqr(x)/(2*a)+32-3*x4 DEFGH5 amaxx 三、三、写出下程序的运行结果写出下程序的运行结果1 15 2.2. 2 24 46 68 8
4、四、四、程序设计程序设计Private Sub Form_click()Dim p As Single, r As Single, n As Integern = 0: p = 13: r = 0.008Do While p 5,-1,0)后，x 的值为( ) 。 A) 5 B) 6 C) 0 D) -1 (8) 产生1，100之间的随机整数的 Visual Basic 表达式是（ ）。 A) Int(Rnd*100)+1 B) Int(Rnd*1)+100C) Int(Rnd*101)+1 D) Int(Rnd)+100(9) 执行语句 s=right(“VisualBasic“,5)后，s
5、 的值是( )。A) Visual B) Basic C) 6 D) 11(10) 下面（ ）是合法的变量名。A) dim B) A-1 C) _123 D) t_t6(11) 设 a=1，b=2，c=3，d=4，下列表达式的值是( )。NOT aa+cA）-1 B)1 C）True D) False(12) 、/、mod、*等 4 个算术运算符中，优先级最低的是（ ）。A) B)/ C)mod D)*37(13) 以下程序段的输出结果是 （ ）。a = Sqr(3)b = Sqr(2)print abA）-1 B）0 C）False D）True(14) 在窗体上画一个名称为 Text1 的
6、文本框和一个名称为 Command1 的命令按钮，然后编写如下事件过程 Private Sub Command1_Click() Text1.Text = “Visual“ Text1 = “Basic“ Text1 = “Program“End Sub程序运行后，如果单击命令按钮，则在文本框中显示的是( )。A) 出错 B) Visual C) Basic D) Program (15) Print Format$(32548.5, “000,000.00“)的输出结果为（ ）。A)32548.5 B)32,548.5 C)032,548.50 D)32,548.50(16) 在窗体上画一个
7、命令按钮，然后编写如下事件过程：Print Sub Command1_Click()a = InputBox(“Enter the First integer“)b = InputBox(“Enter the Second integer“)print b + aEnd Sub程序运行后，单击命令按钮，先后在两个输入对话框分别输入 456 和 123，则输出结果是（ ）。A) 579 B)123 C)456123 D)123456(17)为了使标签覆盖背景，应把 BackStyle 属性设置为( )。A)0 B)1 C)True D)False(18) 删除列表框中指定项目的方法为A）Move
8、 B）Remove C）Clear D）RemoveItem(19)假定在图片框 Picture1 中装入了一个图形，为了清除改图形（注意，清除图形，不是删除图片框），应采用的正确方法是A)选择图片框，然后按 Del 键B)执行语句 Picture1. Picture=LoadPicture（“ “）38C)执行语句 Picture. Picture=D)选择图片框，在属性窗口中选择 Picture 属性条，然后按回车键(20) 以下关于函数过程的叙述中，正确的是A) 函数过程形参的类型与函数返回值的类型没有关系B) 在函数过程中，过程的返回值可以有多个C) 当数组作为函数过程的参数时，既能以
9、传值方式传递，也能以传址方式传递D) 如果不指明函数过程参数的类型，则该参数没有数据类型(21) 如果列表框（List1）中没有被选定的项目，则执行 List1.RemoveItem List1.ListIndex 语句的结果是（ ）A)移去第一项 B)移去最后一项C)移去最后加入列表一项 D)以上都不对 (22) 下列表达式的值为 2123 的是（ ）A) Val(“123asd“) amax, “min=“; aminEnd Sub三、写出下面程序的运行结果（10 分）1. Private Sub Command1_Click()a = 041For i = 1 To 2For j = 1
10、 To 4if j mod 2 0 thena = a + 1end ifa = a + 1Next jNext iPrint aEnd Sub程序运行后，单击命令按钮，输出结果为:2. Function F(a As Integer) b = 0 Static c b = b+1 c = c+1 f = a+b+c End Function Private Sub Commandl_Click () Dim a As Integer a =2 For i =1 To 3 Print F(a) Next i End Sub 单击命令按钮后，程序的运行结果为：四、程序设计（10 分）编写程序计算
11、 1+5+7+99。答案答案42一、一、选择题选择题BABAC ADABD DCDDC DBDBA DBDBC DABDC二、填空题二、填空题1、 .vbp2、Dir1_change Drive1_change File1.Path=Dir1.Path Dir1.Path=Drive1.Drive3、25+32=57 4、ABCD HIJK5、amaxx 三、写出下程序的运行结果三、写出下程序的运行结果1 12 2.2. 4 45 56 6四、程序设计四、程序设计Private Sub Form_Click() Dim s as integer,i as integer S=0 For i=1 to 99 step 2S=s+i Next iPrint s End Sub
