VB题目

算法结构与执行实例：

1．对输入的二个整数a和b，找出其中的较大者赋给c并输出。解决该问题的算法流程图如图所示：

上述流程图中虚线框部分的内容可为

2.某算法的部分流程图如图所示。执行这部分流程后，“x ←x - 2”被执行的次数为

A. 0

B. 1

C.2

D. 3

3.某算法的部分流程图如右图所示，执行这部分流

程后，变量a，b的值分别是（）

A.3,3

B.3,4

C.6,6

D.7,11

4.某算法的部分流程图如下图所示，执行这部分流

程后，变量x的值是

A.0

B.1

C.2

D.3

5．某算法的部分流程图如图所示。执行这部分流程，依次输入3,4,-1，则输出s的值是

A．-2 B．-1 C．0 D．1

6．某算法流程图如右图所示，执行这部分流程后，变量s的值及x ←x＋1执行的次数分别为( )

A．0 3

B．－5 4

C．0 4

D．－5 3

7．某算法的流程图如下图所示，执行该

算法后，输出s的值是( )

A．6 B．12

C．18 D．36

VB程序阅读实例：

1．【加试题】Visual Basic程序段如下：

Function f(x As Single, y As Single) As Single

If x> y And y < 0 Then f ＝x ^ Abs(y) Else f ＝x * Int(Sqr(y))

End Function

Private Sub Command1_Click()

Dim a As Single, b As Single

a ＝Val(Text1.Text):

b ＝Val(Text2.Text)

Text3.Text ＝Str(f(a, b))

End Sub

该程序段运行后，文本框Text1、Text2分别输入3, 2后，单击命令按钮Command1，文本框Text3中显示的是( )

A．2 B．3

C．6 D．9

2.【加试题】有如下VB程序：

该程序运行后，在列表框Listl中显示的是

3.【加试题】有如下VB程序段：

Dim a(l To 5) As Integer, i As Integer, c As Integer

a(l) = 2 : a(2) = 1 : a(3) = 3 : a(4)=4 : a(5) = 5

c=0

For i = 3 To 5

If a(i - 2) + a(i - 1) = a(i) Then c = c + 1

Next i

Textl. Text = Str(c)

该程序段运行后，文本框Textl中显示的内容是

A.1

B. 2

C. 3

D. 4

4.【加试题】对称字符串的特征是从左到右读和从右到左读是完全一样的。如“abba”是对称的，“abcba”也是对称的。判断字符串是否对称的VB程序段如下：

n=Len(s) 's是待判断的字符串

k=0:j=n

For i=1 to n/2

Next i

If k=0 Then Label1.Caption="对称"Else Label1.Caption="不对称"

方框中的代码由以下三部分组成：

②j=j-1

②If c1<>c2 Then k=k+1

③c1=Mid(s,i,1):c2=Mid(s,j,1)

代码顺序正确的选项是（）

A.①②③

B.②③①

C.③②①

D. ②①③

5．【加试题】有如下VB程序段：

Dim s(1 To 6) As String

Text1.Text＝””

For i ＝1 To 5

For j ＝i＋1 To 6

If s(i) ＋s(j) < s(j) ＋s(i) Then

t ＝s(j): s(j) ＝s(i): s(i) ＝t

End If

Next j

Text1.Text ＝Text1.Text＋s(i)

Next i

如果程序运行，一开始当数组元素s(1)到s(6)的值依次为“4”、“343”、“312”、“12”、“246”、“121”，运行该段代码后，文本框Text1中显示的内容为( ) A．434331224612121 B．434331224612112

C．343312246121124 D．121122463123434

算法实例：

1．以下为一段VB程序，程序运行结束后，Label1中显示的结果是Dim sum As Integer

Dim i, j, k As Integer

List1.Clear

sum ＝0

For i ＝1 To 10

For j ＝i To 10

For k ＝j To 10

If k^2＝i^2＋j^2 Then

List1.AddItem (Str(i) ＋Str(j) ＋Str(k))

sum＝sum＋1

End If

Next k

Next j

Next i

Label1.Caption ＝”组数：” ＋Str(sum)

A．组数：1 B．组数：2 C．组数：3 D．组数：4

2．【加试题】某程序的部分代码如下：

Dim a(1 To 8) As Integer

Dim i As Integer, k As Integer, key As Integer

key ＝Val(Text1.Text)

For i ＝1 To 8

If a(i) ＝key Then k ＝i

Next

End Sub

数组元素a(1)到a(8)的数据依次为“5、78、9、23、56、67、23、11”，查找元素key为23，则程序执行后，变量k的值为( ) A．1 B．4

C．7 D．8

3.【加试题】采用如下选择排序算法对数组a中5个数据“23，86，98，65，2”按从小到大的顺序进行排序。

整个排序过程中，数组中的数据比较次数和交换次数分别是

A. 10次和3次B．10次和4次

C ．15次和3次 D. 15次和10次

4.【加试题】已知单调函数()f x 在[0，1]区间存在一个0

x ，使0

()0f x

。现用对分查找法搜索0

x 的值，开始搜索区间为[0，1]，若经过10次

对分查找后还需继续搜索，则第11次搜索区间的长度为 A.1/2

B. 1/10

C. 21/10

D. 101/2

5.【加试题】某对分查找算法的VB 程序段如下： i=1:j=9:n=0 key=Val(Text1.Text) Do While i<=j n=n+1 m=Fix((i+j)/2)

If key=d(m) Then Exit do 'Exit Do 表示退出循环

If key

Loop

数组元素d(1)到d(9)的值依次为“7,12,18,25,39,58,61,72,86”，若该程序段运行结果后，n 的值为2，则key 的值是（） A.39

B.18或61

C.18或72

D.12或61

6.【加试题】有如下程序段： For i = 1 To 2

For j = 5 To i + 1 Step -1

If a(j) > a(i) Then

t = a(j): a(j) = a(i): a(i) = t

End If

Next j

Next i

数组元素a(1)到a(5)的值依次为“33，24，45, ,16,77”，经过该程序段“加工”后，数组元素a(1)到a(5)的值依次为

A. 77,45,33,16,24

B. 77,33,45,16,24

C. 77,24,45,16,33

D. 77,45,33,24,16

7.【加试题】已知一无序数组a（下标1到n），通过引入数组b（下标1到n），使得a(b(1))≤a(b(2)) ≤a(b(3))……≤a(b(n))（示例如图所示），对这些有序数据可进行对分查找。则第一次查找时，中点位置m与中点值分别是

A. m的值是Fix((1+n)/2),中点值是a(m)

B. m的值是Fix((1+n)/2),中点值是a(b(m))

C. m的值是Fix((b(1))+b(n))/2),中点值是a(m)

D. m的值是Fix((b(1))+b(n))/2),中点值是a(b(m))

8．【加试题】某对分查找算法的VB程序段如下：

key = Val(Text1.Text)

i = 1: j = 10

Text2.Text = ""

Do While i <= j

m = Int((i + j) / 2 + 0.5)

If key = a(m) Then Exit Do 'Exit Do表示退出循环

If key < a(m) Then j = m - 1 Else i = m + 1

Text2.Text = Text2.Text + Str(a(m))

Loop

数组元素a(1)到a(10)的值依次为“8,17,24,30,36,40,55,58,61,66”，文本框Text1中输入的值是30，执行该程序段，文本框Text2中显示的是

A．40 24 B．40 24 36 C．36 24 D．36 17 24

9．【加试题】小赵对选择排序算法进行了如下改进：在数组的所有元素中找出最小和最大数据的元素，然后将这两个元素分别与第一个和最后一个元素交换数据，在余下的元素中找出最小和最大数据的元素，分别与第二个和倒数第二个元素交换数据，以此类推，直到所有元素的数据按升序排列。小赵编写的VB程序段如下：

p = 1: q = 10

Do While p < q

iMin = p: iMax = p

For i = p + 1 To q

If a(i) < a(iMin) Then iMin = i

If a(i) > a(iMax) Then iMax = i

Next i

t = a(iMin): a(iMin) = a(p): a(p) = t

t = a(iMax): a(iMax) = a(q): a(q) = t

p = p + 1

q = q - 1

Loop

要使程序实现上述算法思想，则方框中的语句是

A．If iMax = p Then iMax = iMin B．If iMin = p Then iMin = iMax C．If iMax = p Then iMin = iMax D．If iMin = p Then iMax = iMin 程序阅读（填空）：

1.编写VB程序，实现如下功能：在文本框Textl中输入包含数字、字母的字符串，单击“统计”按钮Commandl，统计该字符串中数字字符的个数，并在标签Labell中输出结果。界面如图所示。

(1)在设计应用程序界面时，应使用第14题-2图所示“控件工具箱”中的（填写相应编号）添加“统计”按钮。(2)为实现上述功能，请在划线处填人合适代码或选项。

划线②、③的选项：

A. Do While i<=n

B.c=Mid(s,i,1)

C.For i=1 To n

2.编写VB程序，实现如下功能:在文本框Textl和Text2中分别输入一个整数，单击命令按钮Command1,在列表框List1中显示结果，运行效果如1图所示。结果包含两列数据，第1列为两数之间的摄氏温度值（间隔1度、升序），第2列为对应的华氏温度值。

1图2图

（1）要使命令按钮Command1上显示的文本改为“转换”，可在其属性窗口（2图) 中将属性的属性值修改为“转换”。（2）为实现上述功能，请在划线处填入合适代码或选项。Private Sub Command1_Click()

Dim t1 As Integer, t2 As Integer

Dim i As Integer, t As Integer

Dim f As Single

List1.Clear

t1 = Val(Text1.Text)

t2 = Val(Text2.Text)

If ①Then '(选填字母,从下列A、B、C、D四个选项中选取一项）

t = t1: t1 = t2: t2 = t

End If

i = t1

Do While ②'(选填字母,从下列A、B、C、D四个选

项中选取一项）

f = i * 9 / 5 + 32 '摄氏温度转换为华氏温度

List1.AddItem Str(i) + " " + Str(f)

③'（填程序代码）

Loop

End Sub

划线①、②处的选项:

A.i <= t2

B.f <= t2

C.t1 > t2

D. i < f

3.编写“加法练习题生成器”程序，实现如下功能：在文本框Text1中输入题数n，单击“生成”按钮Command1，在列表框List1中显示n个两数之和小于100的加法练习题。程序运行界面如图a所示。

2.（1）Caption

图b

写相应编码）添加“生成”按钮。

（2）实现上述功能的VB程序如下，请在划线处填写合适的代码。Private Sub Command1_Click()

Dim n As Integer, i As Integer, a As Integer, b As Integer

Randomize

n = Val(Text1.Text)

i = ①

Do While i <= n

a = Int(Rnd * 100)

b = Int(Rnd * 100)

If ②Then

List1.AddItem "(" + Str(i) + " )" + Str(a) + "+" + Str(b) + "="

i = i + 1

End If

Loop

End Sub

（3）运行该程序，在文本框中输入5，单击“生成”按钮后，对语句“a=Int(Rnd*100)”执行次数的描述，最合理的是（单选，填字母：A.执行次数等于5 / B.执行次数大于等于5 / C.执行次数小于等于5）。

4.编写VB程序，实现如下功能：在文本框Text1中输入某一年份，单击“天干地支与生肖”按钮Command1，在列表框List1中输出该年份开始的12个年份及对应的“天干地支”与“生肖”，运行界面如图所示，程序代码如下。

（1）代码“Private Sub Command1_Click()”中的Click 是。（单选，填字母：A.对象名/B.属性名/C.事件名）（2）为实现上述功能，请在划线处填入合适的代码。

Private Sub Command1_Click()

Dim a As Integer, b As Integer

Dim i As Integer, n As Integer

Dim c1 As String, s1 As String

Dim c2 As String, s2 As String

Dim c3 As String, s3 As String

List1.Clear

s1 = "甲乙丙丁戊己庚辛壬癸"

s2 = "子丑寅卯辰巳午未申酉戌亥"

s3 = "鼠牛虎兔龙蛇马羊猴鸡狗猪"

n = Val(Text1.Text)

For i = n To ①

a = (i + 6) Mod 10

b = (i + 8) Mod 12

c1 = Mid(s1, a + 1, 1)

c2 = Mid(s2, b + 1, 1)

c3 = Mid(s3, b + 1, 1)

List1.AddItem ②+ "年" + c1 + c2 + " " + c3 Next i

End Sub

（3）由上述算法可知，2024年对应的“天干地支”为。

5. 奇偶校验是一种校验数据传输正确性的方法。其中奇校验方法：统计二进制数据的数位中“1”的个数，若个数为奇数，则校验位值为0，否则校验位值为1。小李编写了一个计算奇校验位值得VB程序，功能如下：在文本框Text1中输入1～255十进制待校验数，单击“计算”按钮Command1后，在文本框Text2中显示该数对应的二进制值，并在标签Label3中显示该数的校验位值。程序运行界面如图所示。

（1）在设计程序界面时，要清空文本框中的显示内容，应修改该文

本框中的属性。

（2）实现上述功能的VB程序如下，请在划线处填入合适代码。Private Sub Command1_Click()

Dim a As Integer, s As String

Dim n As Integer, t As Integer, v As Integer

n = Val(Text1.Text)

t = 0

s = ""

Do While n > 0

a = n Mod 2

n = n \ 2

t = ①

s = Str(a) + s

Loop

v = t Mod 2

Text2.Text = s

Label3.Caption = "校验位值：" + ②

End Sub

（3）运行该程序，在文本框Text1中输入22，单击“计算”按钮，则显示的校验位值是。

6．多数高次方程不存在求根公式，因此求精确根非常困难，甚至不可能，从而寻找方程的近似根就显得特别重要。由于数轴上的点是有序的，因此我们可以用对分查找法找出高次方程在某一区间的实根。即：不断地将区间对分，使得区间中点的值不断逼近方程的根。当区间小于精度的时候，我们就停止对分，并用此时区间的中点值作

的实根，其函数图像如图a

观察该函数图像发现函数有一实根在区域(1,2)之间，因此我们取两者的中点m＝(1＋2)/2代入方程进行检测，发现f(1.5)＝5x3－55x2＋170x－130＝18.125，因为f(1.5)>0，因此区间应该往左移动，得下一个区间(1,1.5)，然后继续进行检测，如果区间差的绝对值r≤误差率e，则认为该中点m是方程的根。根据上述方法描述，设计一个VB求解程序的根。程序运行界面如图c所示，单击求解按钮Command1，在文本框Text1中显示方程的根。

vb考试题及答案

1．下列不是VB常量的是 B 。 A）3.14 B）′Name ′ C)#10/18/2007# D)True 2．确定控件在窗体上位置的属性是 C 。 A）Width 和Height B）Width 和Top C）Top 和Left D）Top 和Height 3．数学表达式1≤X＜10表示成正确的VB表达式为 B 。 A）1≤X＜10 B）X＞=1 And X＜10 C) X＞=1 Or x＜10 D) X＞=1 And ＜10 4. 下面的__ B ___语句可以实现：先在窗体上输出大写字母A，然后在同一行的第10列输出小写字母b。 A）Print "A";Tab(9);"b" B）Print "A";Spc(8);"b" C）Print "A";Space(10);"b" D）Print "A";Tab(8);"b" 5. 下列控件中，不能改变大小的控件是 D 。 A）TextBox B）Label C）Frame D）Timer 6．Visual Basic过程的编写是在 D 中进行的。 A）窗体窗口B）工程资源管理器窗口C）属性窗口D）代码编辑窗口 7. 在Visual Basic中，声明全局变量应该用 D 关键字。 A）Dim B）Private C）Static D）Public 8. 在Visual Basic表达式中，运算符的运算顺序为 A 。 A）算术运算符—>字符串运算符—>关系运算符—>逻辑运算符 B）逻辑运算符—>关系运算符—>字符串运算符—>算术运算符 C）字符串运算符—>算术运算符—>关系运算符—>逻辑运算符 D）关系运算符—>逻辑运算符—>算术运算符—>字符串运算符 9. 下列属于非法调用的函数是 A 。 A）sqr(-5) B)Sgn(-5) C)Exp(-5) D)Int(-5) 10. 下列能够正确输出”a=8”形式的语句是 B 。 A）print a=3+5 B）pirnt “a=”;3+5 C）print “a=3+5”D）print a=;3+5 11. 下列符号中，可以用作VB变量名的是 C 。 A）x.y.z B)3xyz C)x_yz D)Integer 12. 可以删除字符串两端空格的函数是 A 。 A）Trim B）Rtrim C）Ltrim D）Mid 13. 函数Int(Rnd*80)+1是在 D 范围内产生随机整数。 A）[0，80] B）[0，79] C）[1，79] D）[1，80]

大学VB考试题库

大学VB考试题库 一、单项选择题 1、与传统的程序设计语言相比,Visual Basic最突出的特点是（）。 A、结构化程序设计 B、程序开发环境 C、事件驱动编程机制 D、程序调试技术 2、赋值语句：a=123& MID("123456",3,2)执行后，a变量中的值是（）。 A、"12334" B、123 C、12334 D、157 3、保存一个工程至少应保存两个文件，这两个文件分别是（B）。 A、文本文件和工程文件 B、窗体文件和工程文件 C、窗体文件和标准模块文件 D、类模块文件和工程文件 4、以下能在窗体Form1的标题栏中显示"VisualBasic窗体"的语句是（C）。 A、https://www.doczj.com/doc/5518728525.html,="VisualBasic窗体" B、Form1.Title="VisualBasic窗体" C、Form1.Caption="VisualBasic窗体" D、Form1.Text="VisualBasic窗体" 5、为了装入一个VisualBasic应用程序，应当（D） A、只装入窗体文件（.frm） B、只装入工程文件（.vbp） C、分别装入工程文件和标准模块文件（.bas） D、分别装入工程文件、窗体文件和标准模块文件 6、赋给一个数组的数据类型一定要（A）。 A、相同 B、不相同 C、两可 D、都不对 7、下面正确的赋值语句是（C）。 A、x+y=30 B、y=π*r*r C、y=x+30 D、3y=x 8、VisualBasic 6.0集成环境的主窗口中不包括（C）。

A、标题栏 B、菜单栏 C、状态栏 D、工具栏 9、以下叙述中错误的是(C)。 A、Visual Basic 是事件驱动型可视化编程工具 B、Visual Basic应用程序不具有明显的开始和结束语句 C、Visual Basic工具箱中的所有控件都具有宽度（Width）和高度（Height）属性(计时器) D、Visual Basic中控件的某些属性只能在运行时设置 10、要使Print方法在Form_Load事件中起作用，要对窗体的(C)属性进行设置。 A、Backcolor B、ForeColor C、AutoRedraw D、BackStyle 11、若要使命令按钮不可操作，要对(A)属性进行设制。 A、Enabled B、Visible C、BackColor D、Caption 12、以下叙述中错误的是(B)。 A、一个工程中可以包含多个窗体文件 B、在一个窗体文件中用Private定义的通用过程能被其他窗体调用 C、在设计VB程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件。 D、一个工程默认的启动对象是Form1 13、Cls方法可以清除窗体或图片框中的(C)内容。 A、在设计阶段使用Picture设置的背景位图 B、在设计阶段放置的控件 C、在运行阶段产生的图形和文字 D、以上均可 14、设x=3,y=5,则以下表达式值为真的是 (C) A、(-3+5>x) And (y>0) B、(x<0) Eqv (y>0) C、(x>y) Or (y>0) D、x>=y And y>10 15、为了防止用户随意将光标置于控件之上，应将进行(D)设置。 A、将控件的TabIndex属性设置为0

VB模拟试题1

一、概念填空题 1．在Visaul Basic中,属性窗口分为四个部分，这四个部分分别是（ 1 ）属性显示方式、属性列表和对当前属性的简单解释。 2．组合框有三种不同的风格，它们分别是：( 2 )、( 3 )和( 4 )。3．VB中，当KeyPress事件发生时会返回一个按键的（ 5 ）值。 4. 时钟控件是有规律地以一定的( 6 )激发计时器事件，而执行相应的代码程序。 5．A = 8，B = 3，C = 5，则表达式A MOD 3 + B^3 / C \ 5的值为（ 7 ）。6．声明一个双精度变量Num5，的声明语句是 ( 8 ) 。 7．有一文本框Text1，为了使该文本框在运行时获取焦点，应执行的语句是（ 9 ）。8．在使用动态数组时，如要改变数组的大小而又不丢失数组中的数据，应使用（ 10 ）关键字。 9．Visual Basic逻辑数据类型只有 True 与 False 两个值。当逻辑数据转换成整型数据时，True 转换为（ 11 ），False转换为（ 12 ）。 10．在Visaul Basic 中依据变量的作用范围将VB变量的作用范围分为三类，它们是：（ 13 ）变量、（ 14 ）变量和（ 15 ）变量。 11．在Visual Basic工程中，拥有多个窗体的程序可用（ 16 ）语句将窗体装入内存，用（ 17 ）语句将指定窗体从内存中删除。 12．在Visual Basic中，当坐标系确定后，如果坐标值前加上关键字Step，则坐标值（X，Y）是（ 18 ）坐标。 13．字符串常量是由任何ASCII字符组成，在程序代码中，它必须由（ 19 ）括起来。 14．如果有三个单选按钮直接画在窗体上，另有四个单选按钮画在框架中，则运行时，可以同时选中（ 20 ）个单选按钮。 二、概念选择题 1．不能触发滚动条Change事件的操作是（）。 A) 拖动滚动条的滑块 B) 单击两端箭头 C) 单击滚动条的滑块 D) 单击滚动条的空白处 2．已知变量x 、y为整数型，且x=4 , y=12 ,s为字符型，且s=“a”，Leble1为标签控件，Leble1的Caption属性值为Label1，下列合法的赋值语句是（）。 A) X= Leble1.Caption B) Leble1.Caption=Str(X) C) X*3=Y D) Y=X*S 3．下列可以将变量A、B的值互换的语句是( )。 A) A=B : B=A B) C=B : B=A ：A=C C) A=C : C=B : B=A D) A=(A+B)/2 ：B=(A-B)/2 4．下列叙述中错误的是（）。 A)VB是采用了事件驱动编程机制。

VB期末考试试题及答案

二、选择题 1、菜单控件只包括一个事件，即 C ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是 A 。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句 Select * Form student 中的 *表示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是 C 。 A、Enabled B、Caption C、Default D、Font 5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是 A 。 A、Caption B、Name C、Text D、Label 6、设置一个单选按钮(OptionButton)所代表选项的选中状态，应当在属性窗口中改变的属性是 D 。 A、Caption B、Name C、Text D、Value

7、允许在菜单项的左边设置打勾标记，下面哪种论述是正确的 D 。 A、在标题项中输入&，然后打勾 B、在索引项中打勾 C、在有效项中打勾 D、在复选项中打勾 8、当执行以下过程时，在窗体上将显示 A 。 Private Sub Command1_Click( ) Print "VB"; Print "Hello! "; Print "VB" End Sub A、 VBHello!VB B、 VB Hello!VB C、 VB D、 VB Hello! VB Hello! VB 9、语句Print "The answer is:";20/4-2的结果为 B 。 A、The answer is 20/4-2 B、The answer is 3 C、The answer is "20/4-2" D、非法语句 10、下列哪个控件是容器控件 B 。 A、Image B、Picture C、ComboBox D、FileListBox 11、若要将窗体从内存中卸载出去，其实现的方法是 D 。 12、以下选项中，不是 Visual Basic控件的是 A 。 A.窗体 B.定时器 C.单选框 D.命令按钮 13、双击窗体中的对象后，Visual Basic将显示的窗口是 A 。 A.代码窗口 B．工具箱 C．项目（工程）窗口 D．属性窗口 14、可决定窗体的左上角是否有控制菜单的属性是 A 。 15、设有如下语句： Strl＝InputBox（"输人"，""，"练习"） 从键盘上输人字符“示例”后，Strl的值是 D 。 A．“输入” B．“” C．“练习” D．“示例” 16、窗体Form1的Name属性是Frm1,它的单击事件过程名是 C 。 A. Form1_Click C. Frm1_Click D. Me_Click 17、窗体的hide属性的含义是 A 。 A.隐藏 B.展现 C.装入 D.卸载 18、若要设置定时器控件的定时时间，需设置的属性是 C 。 A．Enabled B．Value C．Interval D．Text 19、能够改变复选框中背景颜色的属性是 C 。

vb练习题及答案.doc

vb 练习题及答案 【篇一：vb 习题(含答案)】 lass=txt>1 、vb 程序中，通常不会产生错误提示的是( )。（1 分） a、编译错误 b、逻辑错误 c、运行时错误 d、实时错误 2、在设计阶段，双击窗体上任一空白处，打开的窗口是( )。（1 分） a、工程资源管理器窗口 b、代码窗口 c、工具箱窗口 d、属性窗口 3、下列说法中，正确的说法是( )。（1 分） a、窗体名称和该窗体文件名必须一致 b、窗体名称和该窗体文件名 可以不相同 c、窗体名称和该窗体文件名不能使用汉字 d、窗体名称不能使用汉字、但该窗体文件名能使用汉字 4、visual basic 有完备的help 联机帮助功能，可以通过按下功能 键( )得到帮助。（ 1 分） a、f9 b 、f8 c、f1 d 、f5 5、以下( )控件可作为容器使用。（ 1 分） a、label b 、picturebox c、textbox d 、image 6、将窗体的boderstyle 属性设置为( )可使窗口不显示标题栏。（ 1 分） a、0 b 、1 c、2 d 、5 7、文本框没有( )属性（1 分） a、text b 、name c、caption d 、borderstyle 23、下列( )是不合法的常量。（ 1 分） a、100 b 、10e02 c、100.0 d 、10e0.5 24、下列对变量的定义中，定义x 为变体型变量的是( )。（1 分） a、dim x as double b 、dim x c、dim x! d 、x%=23

25、设有如下变量声明：dim testdate as date ，为变量testdate 正确赋值的表达方式是( )。（1 分） a、textdate=#1/1/2002# b 、testdate=#1/1/2002# c、textdate=date(1/1/2002) d 、 testdate=format(m/d/yy,1/1/2002) 26、在立即窗口中运行以下语句，a=beijing :b=shanghai :print a,b 对其输出结果的描述中，正确的是( )。（1 分） a、beijing 和shanghai 中间没有空格 b、beijing 和shanghai 中 间有1 个空格 c、beijing 和shanghai 中间有 6 个空格 d、beijing 和shanghai 前面有7 个空格 27、语句段a=3: b=5:t=a ：a=b: b=t 执行后( )。（1 分） a、a 值为3，b 值为3 b 、a 值为3，b 值为5 c、a 值为5，b 值为5 d 、a 值为5，b 值为3 28、下列语句中，正确的是( )。（1 分） a、if x3*y and xy then y=x^3 b 、if x3*y and xy then y=3x c、if x3*y : xy then y=x^3 d 、if x3*y and xy then y=x**3 29、下面程序段dim x%: x=5: if x then y=x+1 else y=x 运行后， y 结果是( )。（1 分） a、5 b 、6 c、1 d 、显示出错信息 30、执行语句 a = inputbox(today, tomorrow, yesterday, 5, 5) ， 将显示一个输入对话框，在对话框的输入区中显示的信息是( )。（1 分） a、today b 、tomorrow c、yesterday d 、5 31、窗体上有一个命令按钮command1, 编写如下事件过 程: private sub command1_click() :x = val(inputbox(x=)) : y = inputbox(y=) : print x + y : end sub, 单击命令按钮，先后在两个输 入对话框中输入123 和321 ，窗体显示的内容是( )。（1 分） a、444 b 、123321 c、123+321 d 、出错信息 32、执行语句msgbox aaa, 2, bbb 后，所产生的消息框的标题是 ( )。（1 分） a、aaa b 、bbb

vb综合考试试题

vb综合考试试题

1303班9月16日第一次综合考试试题 一、单选（本大题共25小题，每小题2分， 共 50分） 1. 设a=2,b=3,c=4,d=5,表达式NOT a<=c OR 4*c=b^2 AND b<>a+c的值是( )。 A、-1 B、 1 C、True D、False 2、假设A="Good Morning."，B="Afternoon,Boys."，下列表达式中结果是"Good Boys."的是_ __。 A) Left(A,5)+Right(B,5) B) Right(A,5)+Left(B,5) C) Mid(A,1,5)+Mid(B,1,6) D) Right(A,5)+Right(B,5) 3、下列叙中不正确的是（） A、变量名中的第一个字符必须是字母 B、变量名的长度不超过255个字符 C、变量名可以包含小数点或者内嵌的类型声明 字符 D、变量名不能使用关键字 2

4、下列关于变体类型的描述，其中正确的是 _______。 A. 变体是一种没有类型的数据 B. 变体的空值就表示该变体的值为0 C. 一个变量没有定义就赋值，该变量即为变体 类型 D. 变体是赋给变量某一种类型数据后，就不能 再赋给它另一类型的数值 5、执行 PRINT 18/2*3,-3^2 命令后，输出结 果为_____。 A. 3 9 B. 3 -9 C. 27 -9 D. -9 27 6、下面的_______语句可以实现：先在窗体上 输出大写字母A，然后在同一行的第10列输出 小写字母b。 A. Print "A";Tab(9);"b" B. Print "A";Tab(10);"b" C. Print "A";Space(10);"b" D. Print "A";Tab(8);"b" 3

2018-1VB程序设计课程试卷

2011-1-VB程序设计课程试卷一、单选题(每题1分,共30分) 1．一只白色的足球被踢进球门,则白色、足球、踢、进球门是______。 A．属性、对象、方法、事件B．属性、对象、事件、方法 C．对象、属性、方法、事件D．对象、属性、事件、方法 2．要对选定的多个控件调整格式,如对齐、调整间距、统一尺寸等,应使用______菜单。 A．格式B．编辑C．视图D．工具 3．要在窗体上显示图片,需设置窗体的______属性。 A．Caption B．Icon C．Picture D．Name 4．将命令按钮的______属性设置为False后,运行时该命令按钮呈灰色不可用。 A．ControlBox B．WindowState C．Visible D．Enabled 5．下列表达式中,值为True的是______。 A．Mid(“ABCD”,2,2)>Left(“ABCD”,2) B．Not(Sqr(4)-3>=-2) C．14/2\3<10 MOD 4 D．Ucase(“abcd”)>=“abcd”6．以下日期型常量合法的是______。 A．”03/25/89”B．#”03/25/89”# C．#03/25/89# D．#25/03/89# 7．表达式12000+”129”&200的值是______。 A．12129200 B．12000129200

C．12329 D．12000329 8．将文本框的______属性设置为True时,文本框可以输入或显示多行文本,且会在输入的内容超出文本框的宽度时自动换行。 A．MultiLine B．Enabled C．ScrollBars D．Max 9．任何控件都具有______属性。 A.T ext B．Caption C．Name D．ForeColor 10．若要将滚动条的最小值设为0,最大值设为255,应对其______属性进行设置。 A．Left和Top B．Width和Height C．SmallChange和LargeChange D．Min和Max 11．窗体上有一个文本框控件Textl,若已存在三个整型变量a、b、C,且三个变量的值分别为5、7、12。以下的______可以使文本框中显示的内容为：5+7=12。 A．Texll.T ext=a+b=C B．Textl.Text=“a+b=C” C．Textl.Text=a&”+”&b&”=“＆c D．Textl.Text=“a”&”+”&”b”&”=“&”c” 12．下列控件中, ______控件没有Caption属性。 A．命令按钮B．标签C．选项按钮D．文本框 13．程序运行时,若要使某一控件不可见,应将其______属性设为False。 A．Enabled B．Caption C．Visible D．Default 14．在设计阶段,双击窗体Forml的空白处,打开代码窗口,显示______事件过程模板。 A．Forml_ Click B．Forml_Load C．Form_Load D．Form_Click

vb试题及答案

VB试卷 一、单项选择题(每题2分,共40分) 1. 窗体的标题栏显示内容由窗体对象的属性决定。 A) BackColor B)BackStyle C)Text D)Caption 2. 窗体的示意图标可用属性来设置。 A) Picture B) Image C) Icon D) MouseIcon 3. 窗体的控制菜单的有无由窗体对象的属性决定。 A) ControlBox B) MinButton C) MaxButton D) BorderStyle 4. 若要取消窗体的最大化功能，则可设置属性为False来实现。 A) ControlBox B) MinButton C) MaxButton D) Enabled 5. 以下4个选项，不属于VB的工作模式。 A) 编译 B) 设计 C) 运行 D) 中断 6. 窗体的边框样式由窗体对象的属性来设置。 A) BackStyle B) BorderStyle C) WindowState D) FillStyle 7. 若要以程序代码方式设置在窗体中显示文本的字体大小，则可用窗体对象的属性来实现。 A) FontName B) Font C) FontSize D) FontBold 8. 命令按钮的标题文字由属性来设置。 A) Text B) Caption C) Name D) (名称) 9. VB是面向对象的程序设计，以下4个选项，不属于面向对象的三要素。 A) 变量 B) 属性 C) 事件 D) 方法 10. 若要将某命令按钮设置为默认命令按钮，可设置属性为True来实现。 A) Value B) Cancel C) Default D) Enabled 11. 若要使命令按钮不可见，可设置属性为False来实现。 A) Value B) Enabled C) Visible D) Cancel 12. 运行程序时，系统自动执行窗体的事件。 A) load B) click C) unload D) GotFocus 13. 若要设置文本框最大可接收的字符数，可通过属性来实现。 A) MultiLine B) Length C) Max D) MaxLength 14. 若要使某命令按钮获得控制焦点，可使用方法来设置。 A) Refresh B) SetFocus C) GotFocus D) Value 15. 若要使命令钮可响应事件，可通过设置属性的取值来实现。 A) Visible B) Enabled C) Default D) Value 16. 在运行时，若要调用某命令按钮的Click事件过程，可设置该命令按钮对象的 属性为True来实现。 A) Enabled B) Value C) Default D) Cancel 17. 标签框的边框，由属性的设置值决定。

vb程序设计试题(含答案)

第一套试题 一、选择题（每题2分，共30分） 1.在VB环境中，工程文件的扩展名是( C ) （A）.frm （B）.bas （C）.vbp （D）.frx 2.下面4项中不属于面向对象系统三要素的是( A ) （A）变量（B）事件（C）属性（D）方法 3. \、/、Mod、*这4个算述运算符中，优先级别最低的是( C ) （A）\ （B）/ （C）Mod （D）* 4.要使Print方法在Form_Load事件中起作用，要对窗体的( C )属性进行设置（A）BackColor （B）ForeColor （C）AutoRedraw （D）Caption 5.不论何控件，共同具有的属性是( B ) （A）Text （B）Name （C）ForeColor （D）Caption 6.要使Form1窗体的标题栏显示“欢迎使用VB”，以下语句正确的是( D ) （A）Form1.Caption=“欢迎使用VB”（B）Form1.Caption=ˊ欢迎使用VBˊ（C）Form1.Caption=欢迎使用VB （D）Form1.Caption=〞欢迎使用VB〞 7.VB提供了结构化程序设计的3种基本结构，这3种基本结构是( D ) （A）递归结构，选择结构，循环结构（B）选择结构，过程结构，顺序结构 （C）过程结构，输入、输出结构，转向结构（D）选择结构，循环结构，顺序结构 8.给变量赋值a=123+MID(“123456”,3,2)，a变量中的值是( D ) （A）“12334”（B）123 （C）12334 （D）157 9.下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是( D ) （A）If sex=“男”And age＜40 And InStr(duty,“教授”)＞0 Then n=n+1 （B）If sex=“男”And age＜40 And (duty=“教授”Or duty=“副教授”) Then n=n+1 （C）If sex=“男”And age＜40 And Right(duty,2)= “教授” Then n=n+1 （D）If sex=“男”And age＜40 And duty=“教授”And duty=“副教授” Then n=n+1 10.若要清除列表框的所有内容，可用来实现的方法是( C )

二级VB模拟试题1-1

二级VB模拟试题(1-1) 一、填空题（每空１分，共20分） １、ＶＢ是一种面向_____的可视化程序设计语言，采取了_____的编程机制。 ２、ＶＢ的对象主要分为_____和_____两大类。 ３、若要将窗体Form1隐藏起来，可使用方法_____；若要将窗体Form1显示出来，可使用方法_____来实现。 ４、在ＶＢ集成开发环境中，运行应用程序的方法有三种：一是_____；二是_____；三是_____。 ５、在ＶＢ中若要让某对对象获取焦点，则可通过_____方法来实现。 ６、ＶＢ提供的_____属性，用来控制对象是否可用，当属性值为_____时，表示对象可用，当属性值为_____时，表示对象不可用。 ７、ＶＢ提供的_____属性，用来控制对象是否可见，当属性值为_____时，表示对象可见，当属性值为_____时，表示对象不可见。 ８、在ＶＢ中，用来描述对象外部特征的量称之为对象的_____。 ９、为使某窗口中的命令按钮“取消(C)”具有如下特性：按“Alt＋C”键或按“ESC”键，均可代替用鼠标单击该按钮的操作，应设置该按钮的Caption属性值为_____，并且设置其_____属性值为_____。 二、选择题（每题２分，共40分） １、用于从字符串左边截取字符的函数是（） Ａ、Ltrim( )Ｂ、Trim( )Ｃ、Left( )Ｄ、Instr( ) ２、可获得当前系统日期的函数是（） Ａ、Date( )Ｂ、Time( )Ｃ、IsDate( )Ｄ、Year( ) ３、退出For循环可使用的语句为（） Ａ、Exit ForＢ、Exit DoＣ、End ForＤ、End Do ４、窗体的标题栏显示内容由窗体对象的（）属性决定。 Ａ、BackColorＢ、BackStyleＣ、TextＤ、Caption ５、程序运行时，若要通过回车键调用某命令按钮的Click事件过程，则可设置该命令按钮的（）属性值为True来实现。 Ａ、valueＢ、EnabledＣ、DefaultＤ、Cancel ６、标签框所显示的内容，由（）属性值决定。 Ａ、TextＢ、(名称)Ｃ、CaptionＤ、Alignment ７、文本框的（）属性用于设置或返回文本框中的文本内容。 Ａ、TextＢ、(名称)Ｃ、CaptionＤ、Name ８、计时器控件的（）属性用于设置Timer事件发生的时间间隔。 Ａ、StretchＢ、IntervalＣ、valueＤ、Length ９、滚动条的（）属性用于返回或设置滚动条的当前值。 Ａ、ＶalueＢ、MaxＣ、MinＤ、Data 10、若要向列表框添加列表项，可使用的方法是（） Ａ、AddＢ、RemoveＣ、ClearＤ、AddItem 11、图像框或图片框中显示的图形文件，由它们的（）性性值决定。 Ａ、DownPictureＢ、PictureＣ、ImageＤ、Icon 12、以下不属于键盘事件的是（） Ａ、KeyDownＢ、KeyUpＣ、UnloadＤ、KeyPress

VB考试题目1

一、单选题（每题1分，共76题） 1.以下关于窗体的描述中错误的是（） A. 在VB中每次运行时可以指定不同的启动窗体 B. 要让窗体以最大化方式打开，应设置MaxButton属性值为True C. 窗体第一次显示时也会发生Resize事件 D. 第一次显示时窗体的位置可以不是设计时所指定的位置 2.执行多窗体应用程序时，（） A. 打开一个窗体后，其他窗体都会被关闭 B. 允许同时打开多个窗体 C. 打开一个窗体后，其他窗体都会被隐藏起来 D. 在某一时刻只能打开一个窗体 3.程序中要在文本框文本中插入一段文字，应当使用的属性是（） A. SelText B. Name C. Text D. Caption 4. 在用户的应用程序执行期间发生，比如单击鼠标或按键盘中的键（） A. 方法 B. 属性 C. 事件 D. 工程 5.当一个工程中含有多个窗体时，其中的启动窗体是（） A. 启动VB时建立的窗体 B. 第一个添加的窗体 C. 最后一个添加的窗体

D. 在工程属性窗口中指定的窗体 6.当新建一个工程并启动Visual Basic后，工具箱中的控件是（） A. 内部控件 B. Active X控件 C. 内部控件和Active X控件 D. 内部控件或Active X控件 7.启动Visual Basic后，就意味着要建立一个新的（） A. 窗体 B. 程序 C. 工程 D. 文件 8.下面是字符串数据的类型声明字符（） A. % B. $ C. & D. ! 9.对象是将数据和操作起来的逻辑实体（） A. 封装 B. 串接 C. 连接 D. 伪装 10.下面属性用于显示对象的标题（） A. Text B. Caption C. Name(名称) D. ForeColor

vb题库及答案

| 最新VB题库及答案 一、选择题 第1部分 1、在窗体（名称为Form1）上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是 A、Private Sub Text1_Change() = "计算机等级考试" End Sub ] B、Private Sub Command1_Click() Caption = "计算机等级考试" End Sub C、Private Sub Form_Click() = "计算机等级考试" End Sub D、Private Sub Command1_Click() = "计算机等级考试" { End Sub 2、在一行内写多条语句时，每个语句之间用（）符号分隔。 A、 , B、： C、. D、； 3、下面（）是合法的变量名。 A、X_YZ B、123ABC C、INTEGER D、X-Y ] 4、下面（）是合法的字符常量。 A、 ABC$ B、“ABC” C、‘ABC’ D、 ABC 5、表达式16/4 - 2^5*8 MOD 5\2的值为（）。 A、14 B、 4 C、20 D、2 6、设a=”MicrosoftVisualBasic”，则以下使变量的b值为”VisualBasic”的语句是 A、b=Left(a,10) B、b=Mid(a,10) — C、b=Right(a,10) D、b=Mid(a,11,10) 7、设a="a"，b="b"，c="c"，d="d"，执行语句x = IIf((a < b) Or (c > d), "A",

VB考试题及答案

VB程序设计期末考试题 一、选择题 1 下列常量中，是Integer类型常量的是（ C ）。 A、123& B、-38844 C、123% D、32768 2 下面选项中()是字符连接运算符. A A、& B、And C、% D、Mod 3 下面关于VB的集成开发环境（IDE）的叙述中，不正确的是（ B ）。 A、IDE是设计、调试、运行VB程序的工具。 B、用户不能随意关闭IDE中的窗口。 C、"窗体设计" 窗口是用来设计应用程序界面（窗体）的。 D、打开 / 关闭各窗口的命令主要在IDE的"视图"菜单中。 4 len(“vb程序设计”)=( C ) 。 A、 5 B、2 C、 6 D、10 5 表达式 15 Mod 4 + 13 \ 5 * 2 的值是 D A、7 B、0 C、2 D、4 6 赋值语句A=123 + Mid$( “123456”,3,2) 执行后，A=（A）。 A、157 B、12334 C、123 D、"12334" 7 在一个语句内写多条语句时,用来分隔每条语句的符号是(C). A、, B、; C、: D、、 8 将逻辑型数据转换成整型数据时，转换规则是（ D ）。 A、将True转换为 1 ，将False转换为 0 B、将True转换为 1 ，将False转换为 -1 C、将True转换为 0 ，将False转换为 -1 D、将True转换为 -1 ，将False转换为 0 9 表达式2+3*4^5-SIN(X+1)/2中最先进行的运算是(D).

A、SIN B、4^5 C、3*4 D、x+1 10 如果x=2，则表达式x+1>2 Or sin(x)>0.9 And 3>x+3的值（ B ）。 A、不能计算 B、 True C、5 D、False 11 随机产生[10，50] 之间整数的正确表达式是（ D ）。 A、Round( Rnd*50) B、 Int(Rnd*40+10) C、Round( Rnd*51) D、 10+Int(Rnd*41) 12 每建立一个窗体,工程管理器窗口中就会增加一个(C). A、类模块文件 B、工程文件 C、窗体文件 D、程序模块文件 13 INT(100*RND(1))产生的随机整数的闭区间是(B). A、[1,100] B、[0,99] C、[0,100] D、[1,99] 14 下列数据类型中,占用内存最小的是(D). A、Integer B、Single C、Boolean D、Byte 15 VisualBasic是一种()程序设计语言.B A、过程式 B、非过程式 C、机器 D、低级 16 函数Int(10*Rnd)是在(A)范围内的整数. A、[0,9] B、[0,1] C、[1,9] D、[1,10] 17 以下合法的一组Visual Basic用户标识符是 C A、Sum 和 8abc B、a#x 和 Pi C、ForLoop 和 Total D、Const 和 DoWhile

vb经典题目及答案

1、在考生文件夹下有工程文件wy7、vbp及窗体文件wy7、frm,该程序就是不完整的,请在有？号的地方填入正确的程序代码,然后删除？及所有注释符号(即 '号),但不能修改其它部分。修改后的程序文件都保存,存盘时不得修改文件夹与文件名。 本题描述如下: 在窗体上有一个名为Text1的文本框,有三个命令按钮,名称分别就是C1、C2与C3,标题分别就是"读入"、"加密"与"存盘"。要求程序运行后,点击"读入"按钮,将文本文件in7、txt(该文件在考生文件夹下)中的文本信息读入文本框Text1中;点击"加密"按钮将Text1中的英文字母加密转换,并将转换后的结果显示到Text1中。转换方式为转换成该字母对应字母表中后两个位置的字母。例如,转换前的字母就是"a",则转换后的就是"c",转换前就是"E",转换后就是"G";点击"存盘"按钮, 则将转换后的文本框中的文本保存到out7、txt 文件中(该文件保存到考生文件夹下)。 Private Sub C1_Click() Dim strinfo As String Open "in7、txt" For Input As 1 Input #1, strinfo Close #1 Text1、Text = strinfo End Sub Private Sub C2_Click() Dim strchange As String Dim i As Integer For i = 1 To Len(Text1、Text) strchange = strchange + Chr(Asc(Mid(Text1、Text, i, 1)) + 2) Next Text1、Text = strchange End Sub Private Sub C3_Click() Open "out7、txt" For Output As 1 Print #1, Text1、Text Close #1 End Sub 2、(1)在考生文件夹下有工程文件wy5、vbp及窗体文件wy5、frm,该程序就是不完整的,请在有？号的地方填入正确内容,然后删除？及所有注释符(即'号),但不能修改其它部分。存盘时不得改变文件名与文件夹。本题描述如下: 在窗口中有一个RichText文本框控件(名称为rtx1)与一个文本框控件(名称为Text1),两个命令按钮,名称 分别为Command1与Command2,标题分别为"加入WY01、TXT"、"统计字符个数"。要求程序运行后,单击command1将考生文件夹下的wy01、txt的内容显示到rtx1中;单击"统计字符个数"按钮统计Text1中有多少个字符,将结果显示在Text1中。

vb试题及答案

一、选择题（1-30 题每小题1分，共30分，31-45题每小题2分,共30分，总计60分）要使窗体Form1的标题栏中显示“正在复制文件…”，正确的语句是：a A．Form1.Caption=“正在复制文件…” B．Form1.Title=“正在复制文件…” C．Form1.Text=“正在复制文件…” D．Form1.名称=“正在复制文件…” 如果要求设置定时器时间间隔为1秒钟，那么它的Interval属性值应该等于：a A．1000 B．100 C．10 D．1 3、下列关于控件的基本操作中，错误的是 A)当控件处于活动状态时，可以对控件进行缩放 B) 在设计阶段不能移动控件 C) Visual Basic 6.0 允许对画好的控件进行复制和删除 D) 可以通过属性窗口改变控件的位置和大小 4、用Visual Basic 开发应用程序的一般步骤有：①设置窗体和控件的属性、②编写代码、③建立用户界面，其中正确的顺序是： A) ①②③B) ①③②C) ③②①D) ③①② 5、为使文本框只能显示不能输入，即只读，应设置文本框的属性是：c A．MaxLength设置为0 B．Cancel设置为True C．Locked设置为True D．Read设置为True 6、InputBox函数返回值的类型为。B A．数值B．字符串C．变体 D．数值或字符串（视输入的数据而定） 7、为了把焦点移到某个指定的控件，所使用的方法是：A A．SetFocus B．Visible C．ReFresh D．GetFocus 8、函数String(3,”str”)的功能是：b A．把数值型数据转换成字符串 B．返回有3个字符串组成的字符串 C．从字符串中第3个字符 D．从字符串中第3个字符的位置开始取字符串 9、双击窗体中的对象后，Visual Basic将显示的窗口是：c A．项目（工程）窗口B．工具箱C．代码窗口D．属性窗口 10、用于获得字符串s最左边4个字符的函数是：a A．Left(s,4) B．Left(1,4) C．LeftStr(s) D．LeftStr(3,4) 11、以下程序段的输出结果是：d a=Sqr(3) b=Sqr(2) c=a>b Print c A．-1 B．0 C．False D．True 12、用下面语句定义的数组的元素个数是：c Dim A (-4 to 6) As Integer A．6 B．7 C．11 D．9

VB程序设计 试题与答案-1

《VB程序设计基础》试题 一、选择题：（每空 2 分，共 20 分） 1. 与传统的程序设计语言相比,Visual Basic最突出的特点是___________。 A. 结构化程序设计 B. 程序开发环境 C. 事件驱动编程机制 D. 程序调试技术 2. Visual Basic 是一种面向对象的程序设计语言，构成对象的三要素是________。 A. 属性、事件、方法 B. 控件、属性、事件 C. 窗体、控件、过程 D. 窗体、控件、模块 3. 窗体模块保存在一个扩展名为__________的文件中。 A. bas B. vbp C. vbg D. frm 4. 下面正确的赋值语句是_________。 A. x+y=30 B. y=π*r*r C. y=x+30 D. 3y=x 5. 设S=“492”，表达式Right（S,1）+Left（S,1）+Mid（S,2,1）的值为__________。 A.“492” B.“249” C.“294” D.“429” 6. 将数学表达式a≤b≤c写成Visual Basic表达式，正确的是__________。 A. a<=b<=c B. a<=b Or b<=c C. a<=b And b<=c D. a<=b Not b<=c 7.为了把焦点移到文本框，所使用的方法是___________。 A. SetFocus B.Visible C.Refresh D.GetFocus 8. INT（100*RND）产生的随机整数的闭区间是_____________。 A.[0，100] B.[1，100] C.[1，99] D.[0，99] 9. 一个数组说明为Dim a(0 to 5，1 to 5) As Integer，则该数组共有_________个 元素。 A. 5 B. 36 C. 30 D. 不确定 10. 下面过程定义语句合法的是____________。

vb考试题目

第2套 VB语言程序设计 下面是20道选择题,满分为10分,每道题的分数一样,及格分数为6分(即正确率为60%) 1、以下语句Print 3 + 4 \ 5 * 6 / 7 Mod 8的输出结果是（ B.4 ）。 A．3 B．4 C．5 D．6 请选择： A B C D 2、下面不是VB的数据类型的是（B ）。 A．Currency B．Bool C．Object D．Single 请选择： A B C D 3、下列可作为VB的变量名的是（B ）。 A．3*Delta B．Bool C．Object D．Single 请选择： A B C D

4、下面的数2.65358979335278E-06写成普通的十进制数是（B）。 A．0.0000265358979335278 B．0.00000265358979335278 C．0.000265358979335278 D．0.000000265358979335278 请选择： A B C D 5、下面的数1.21576654590569E+19写成普通的十进制数是（D ）。 A．12157665459056900 B．121576654590569000 C．1215766545905690000 D．12157665459056900000 请选择： A B C D 6、设a = 2，b = 3，c = 4，d = 5，下列表达式Not a <= c Or 4 * c = b^2 And b <> a + c的值是（ D ）。 A．-1 B．1 C．True D．False 请选择： A B C D 7、语句Print 5 * 5 \ 5 / 5的输出结果是（B ）。