文档库 最新最全的文档下载
当前位置:文档库 › vb试卷

vb试卷

vb试卷
vb试卷

一、单项选择

1.变量未赋值时,数值型变量的值为().

A:0

B:空

C:1

D:无任何值

答案:A

2..窗体的Caption属性的作用是().

A:确定窗体的名称

B:确定窗体的标题

C:确定窗体的边界类型

D:确定窗体的字体

答案:B

3.窗体设计器是用来设计().

A:应用程序的代码段

B:应用程序的界面

C:对象的属性

D:对象的事件

答案:B

4.Rnd函数不可能产生的()值.

A:0

B:1

C:0.1234

D:.00005

答案:B

5.vb 中的坐标圆点位于().

A:容器右上角

B:容器左上角

C:容器正中央

D:容器右下角

答案:B

6. vb 应用程序是分层管理的,其最高的层次为(). A:工程

B:模块

C:窗体

D:过程

答案:A

7.窗体的Enable属性的属性值是()类型的数据.

A:整型

B:字符型

C:逻辑型

D:实型

答案:C

8.INT(100*RND(1))产生的随机整数的闭区间是().

A:[0,99]

B:[1,100]

C:[0,100]

D:[1,99]

答案:A

9.表达式X+1>X是().

A:算术表达式

B:非法表达式

C:字符表达式

D:关系表达式

答案:D

10.用键盘的光标键选中某一菜单项,并按回车将触发菜单的()的事件. A:KeyPress

B:KeyDown

C:Click

D:KeyUp

答案:C

11.要清除组合框Combol中的所有内容,可以使用()语句.

A:Combo1.Cls

B:Combo1.Clear

C:Combo1.Delete

D:Combo1.Remove

答案:B

12.要强制显示声明变量,可在窗体模块或标准模块的声明段中加入

语句().

A:OptionBase0

B:OptionExplicit

C:OptionBase1

D:OptionCompare

答案:B

13.要想清除文本框中的内容则可利用()进行.

A:Caption

B:Text

C:Clear

D:Cls

答案:B

14.用语句Dim A (-3 To 5) As Integer定义的数组的元素个数是(). A:6

B:7

C:8

D:9

答案:D

二、程序填空

1.

'-------------------------------------------------------

' 功能:输入一个数,若大于0,则显示"+";若小于0,

' 则显示"-";若等于"0",则显示"零"。

'-------------------------------------------------------

Private Sub Command1_Click( )

x = Val(Text1.Text)

Select Case x

'**********SPACE**********

【?】

Label1.Caption = "+"

Case Is < 0

'**********SPACE**********

【?】

'**********SPACE**********

【?】

Label1.Caption = "零"

End Select

End Sub

答案:

1). Case Is > 0

2). Label1.Caption = "-"

3). Case 0 或Case Else 或Case Is = 0

2.

'-------------------------------------------------------

'功能:根据输入的学习成绩,分别显示优秀(90分以上), 良好

' (75分以上),及格(60分以上),不及格几个等级。

'-------------------------------------------------------

Private Sub Command1_Click()

x = Val(Text1.Text)

If x >= 90 Then

Label1.Caption = "优秀"

'**********SPACE**********

ElseIf 【?】Then

Label1.Caption = "良好"

ElseIf x >= 60 Then

'**********SPACE**********

【?】

'**********SPACE**********

【?】

Label1.Caption = "不及格"

End If

End Sub

答案:

1). x >= 75 或75 <= X

2). Label1.Caption = "及格" 或Label1 = "及格"

3). Else

3.

'-------------------------------------------------------

'功能:输入数字1-7,显示其对应是星期几(例:输入1,显示星期日, ' 如果输入其它内容,一律显示"输入错误")

'-------------------------------------------------------

Private Sub Command1_Click()

dim x as integer

dim y as string

x=val(text1.text)

'**********SPACE**********

【?】

case 1

y="今天是星期日"

case 2

y="星期一"

case 3

y="星期二"

case 4

y= "星期三"

case 5

y="星期四"

case 6

'**********SPACE**********

【?】

case 7

y= "星期六"

'**********SPACE**********

【?】

y = "输入错误"

end select

Text2.Text = y

End Sub

答案:

1). select case x

2). y="星期五"

3). Case Else

4.

'下面的程序段用于打印出以下图形

'

' *

' ***

' *****

' *******

' *****

' ***

' *

'

'------------------------------------------------------- Private Sub Form_Click()

Dim i%, j%, k%

For i = 3 To 0 Step -1

For j = 0 To 2 * i

Print " ";

Next j

'**********SPACE**********

For k = 5 To 【?】

Print "*";

Next k

Print

Next i

For i = 0 To 3

For j = 0 To 2 * i + 2

'**********SPACE**********

【?】

Next j

For k = 0 To 4 - 2 * i

Print "*";

Next k

'**********SPACE**********

【?】

Next i

End Sub

答案:

1). 2★*★i★-★1★Step★-1

2). Print " "; 或? " ";

3). Print 或?

三、程序设计

1. '-------------------------------------------------

'题目:(事件)单击窗体。

' (响应)求从100到1000之间所有是3的倍数的数之' 和,当和大于3000时,停止计算并输出和。请将结果输' 出到窗体上,并存入所给变量SUM中。使用for...next语' 句完成程序

'-------------------------------------------------

'注意:请在指定的事件内编写代码。

'-------------------------------------------------

答案:----------------------

Dim i As Integer

sum=0

for i=100 to 1000

if i mod 3=0 then

sum=sum+i

if sum>3000 then

exit for

endif

endif

i=i+1

next

Print sum

----------------------

2.

'题目:(事件)双击窗体。

' (响应)求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

----------------------

3.

'题目::编写函数fun,函数的功能是:计算并输出给定

' 整数n的所有因子之和(不包括1与自身)。规定

' n的值不大于1000?

' 例如:n的值为855时,应输出704。

'-------------------------------------------------

'注意:请在指定的事件内编写代码。

'-------------------------------------------------

答案:----------------------

Dim s, i As Integer

For i = 2 To n - 1

If n Mod i = 0 Then

s = s + i

End If

Next

Fun = s

----------------------

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试卷合集

2010─2011学年第一学期 《VB程序设计》课程考试试卷( A卷: 共6页) 专业:全校的开课专业统考考试方式:闭卷学分:4 考试时间:120分钟 注意:1. 姓名、序号必须写密封线内的指定地方; 2. 答案必须填写在随试卷一起提供的专用答题纸上,否则无效。 一、选择题(每题2分,共20分) (1) 在以下VB窗口中,可以用来调试简单程序的窗口为:( )。 A) 属性窗口 B) 代码窗口 C) 工程管理器窗口D)立即窗口 (2) 若要使某个命令按钮不可操作,应将其( )属性的值设置为False。 A) Enabled B) Visible C) Name D) Caption (3) 当程序运行时,系统自动执行启动窗体的()事件过程。 A) Load B) Click C) CLS D) Print (4) 设整型变量x,y,z的初始值均为0,下列哪个选项可以在程序中作为一个语句行,并使x的值变为5 ,y的值变为15,z的值变为3。 A) x=5,y=15,z=3 B) x=5;y=15;z=3 C) x=5:y=15:z=3 D) x=5 y=15 z=3 (5) VB中的四种运算符的优先级由高到低的排列顺序是:() A) 算术运算、关系运算、字符连接运算、逻辑运算 B) 算术运算、字符连接运算、关系运算、逻辑运算 C) 算术运算、关系运算、逻辑运算、字符连接运算 D) 算术运算、逻辑运算、关系运算、字符连接运算 (6) 利用随机函数产生一个[10,99]区间内的正整数的式子为:( )。 A) Int(10+Rnd*99) B)Int(Rnd*10+99) C)Int(10+Rnd*89) D)Int(10+Rnd*90) (7)下面程序段运行后,显示的结果是:( )。 Dim x% : x=1 : If x Then Print x+1 else Print x-1 A) 0 B) 1 C) 2 D) 程序出错 (8)下面的程序段用于求变量x和y中的大者m,不正确的是:( )。 A) m=IIf(x>y,x,y) B) if(y>x) Then m=y else m=x C) m=x : if(my) Then m=y (9) 下面的程序段用于定义一维数组M,不正确的是:( )。 A) Dim M%(1 to 10) B) Dim N% : N=10 : Dim M%(N) C) Dim M%(0 to 10) D) Const N%=10 : Dim M%(N) (10) 下面是定义Function过程或Sub过程的第一条语句,正确的是:( )。 A) Private sub sub1(ByVal n%()) B) Private sub sub2(ByVal n%) as Integer C) Function fun1(ByVal fun1%) as Integer D) Function fun2%(ByVal n%)

大学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.wendangku.net/doc/7f8250810.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、菜单控件只包括一个事件,即 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基本概念试卷含答案

Visual Basic 基本概念 一、 单选题 1. Visual Basic是一种面向对象的可视化程序设计语言,采取了_______的编程机制。 A) 从窗体开始执行 B) 按书写顺序执行 C) 从主程序开始执行 D) 事件驱动 2. 在Visual Basic中最基本的对象是_________,它是应用程序的基石,是其他控件的容器。 A) 文本框 B) 窗体 C) 标签 D) 命令按钮 3. 有下面的程序代码:Command1.Caption ="确定",则Command1,Caption 和"确定"分别代表 _________。 A) 对象,属性,值 B) 对象,方法,值 C) 对象,值,属性 D) 属性,对象,值 4.多窗体程序是由多个窗体组成的,在缺省的情况下,VB应用程序执行时,总是把_________指定为启动窗体。 A) 不包含任何控件的窗体 B) 设计时的第一个窗体 C) 包含控件最多的窗体 D) 命名为Form1的窗体 5.VB是一种面向对象的程序设计语言,下面_________不是面向对象包含的三要素。 A) 变量 B) 事件 C) 属性 D) 方法6.VB 6.0集成开发环境中不能完成的功能是_______。 A)输入编辑源程序 B)编译生成可招待程序 C)调试运行程序 D)自动生成查找并改正程序中的错误 7.下列关于VB编程的说法中不正确的是_______。 A)属性是描述对象特征的数据 B)事件是能被对象识别的动作C)方法指示对象的行为 D)VB程序采用的运行机制是面向对象 8.关于面向对象的描述中,不正确的是_______。 A)对象就是自定义结构变量 B)对象代表正在创建的系统中的一个实体 C)对象是一个特征和操作的封装体 D)对象之间的信息传递是通过消息进行的 9.以下叙述错误的是________。 A)打开一个工程文件时,系统自动装入与该工程有关的窗体文件 B)打开一个窗体文件时,系统自动装入与该窗体有关的工程文件 C)保存VB应用程序时,应分别保存窗体文件和工程文件 D)事件可以由用户激发,也可以由系统激发 10.VB6.0集成开发环境不包括________窗口。

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期末考试试卷及答案

大一VB期末考试试卷及答案 1.在代码中引用一个控件时,应使用控件的( b )属性。 A.Caption B.Name C.Text D.Index 2.设变量x = 4,y = -1,a = 7,b = -8,下面表达式( a )的值为“假”。 A.x+a <= b-y B. x > 0 AND y < 0 C.a = b OR x>y D. x+y > a+b AND NOT (y < b) 3.表达式Int(Rnd*71)+10产生的随机整数范围是( c )。 A.(10,80) B.(10,81) C.[10,80] D.[10,81] 4.函数Sgn(3.1416)的返回值是( c )。 A.-1 B.0 C.1 D.以上都不对 5.67890属于( d )类型数据。 A.整型 B.单精度浮点数 C.货币型 D.长整型 6.下列变量名中正确的是( d )。 A.3S B.Print C.Select My Name D.Select_1 7.下列赋值语句( a )是有效的。 A.sum = sum -sum B.x+2 = x + 2 C.x + y = sum D.last = y / 0 8.以下的控件或方法具有输入和输出双重功能的为( b )。 A.Print B.Textbox C.Optionbutton D.Checkbox 9.若要获得列表框中被选中的列表项的内容,可以通过访问( d )属性来实现。 A.Name B.ListIndex C.ListCount D.Text 10.下列代码的运行结果为( b )。 Private Sub command1_click() Dim m(10)

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考试题及答案

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期末考试

2847VisualBasic程序设计-0006 试卷总分:100 答题时间:60分钟 客观题 单项选择题(共16题,共48分) 1. 在正确安装Visual Basic6.0后,可以通过多种方法启动Visual Basic ,以下方式中不能启动Visual Basic的是()。 D 进入DOS方式,执行vb6.exe 2. 在VB6.0集成开发环境中有三种工作模式,下列不属于三种工作模式之一的是()。 D 编写代码模式 3. 下列不正确的赋值语句是()。 B x + y = 15 4. MsgBox函数的返回值的类型是()。 A 整型 5. 下列关于属性设置的叙述错误的是()。 A 控件具有什么属性是VB预先设计好的,用户不能改变 6. 在Visual Basic中,如果一个变量未作类型声明而直接使用,则该变量的数据类型是()。 C 变体类型 7. 对于窗体级变量,下列说法中错误的是()。 C 所在窗体的子程序不能访问用Private定义的窗体级变量 8. 在Visual Basic中,下列优先级最高的是()。 A * 9. 在VB工程中,可以作为启动对象的是()。 D Sub Main过程或任何窗体 10. 在设计菜单时,如果要在菜单中加入一个菜单分隔条,则菜单分隔条的标题必须设置为()。 B 减号(-) 11. Dim A(1 To 6, 6) As String定义的数组包含的元素个数是()。 C 42 12. 以下关于过程和过程参数的描述中,错误的是()。 C 只有函数过程能够将过程中处理的信息传回到调用的程序中

13. 在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框。当改变当前驱动器时,目录列表框应该与其同步改变。设置两个控件同步的命令放在一个事件过程中,这个事件过程是( )。 B Drive1 Change 14. 重新定义图片框控件的坐标系统,可采用该图片框的方法是()。 A Scale 15. 如果希望返回远程机器的IP地址,可以使用Winsock控件的()属性。 C RemoteHostIP 16. Access数据库文件的扩展名是()。 D mdb 判断题(共14题,共28分) 1. 新建工程时系统会自动将窗体标题设置为Form1。 T √ 2. 每个对象都有一系列预先定义好的对象事件,但要使对象能响应具体的事件,需要编写该对象相应的事件过程。 T √ 3. 在程序中Name 属性作为对象的标识被引用,不会显示在窗体上,而控件上显示的内容由Caption属性决定。 T √ 4. Timer控件在程序运行时是可见的。 F × 5. 任何一种循环都必须有起始语句和终端语句。 T √ 6. If x >y Then Max=x Else Max=y 程序段是求两个数中的最大数。 T √ 7. 移动框架时框架内的控件也跟随移动,所以框架内各控件的Left与Top属性值也随之改变。 F × 8. 列表框控件中最后一项的序号等于ListCount属性减1。 T √ 9. 用Private、Static定义过程只能被定义它的窗体模块及标准模块中的语句、过程调用。 T √

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期末试卷(A卷带答案)

高级语言程序设计(VB)试卷(A卷) 注意事项:1、本试卷共页,满分为100 分,考试时间为110 分钟。 2、标准答题卡使用2B铅笔涂写;文字题答题时请使用蓝、黑钢笔或圆珠笔, 不得使用红颜色墨水笔。 一、单项选择题(每空1分,共30分) (请将答案按照题干上【】内的序号涂写“标准答题卡”,否则不得分) 1.在VB 6.0中,扩展名为.vbp的文件称为【1】。 A) 工程文件B) 窗体文件C) 类模块文件D) 标准模块文件 2.在VB 6.0集成开发环境的设计模式下,用鼠标双击窗体上的某个对象后,打开的窗口是【2】。 A) 代码窗口B) 窗体设计窗口 C) 属性窗口D) 工程资源管理器窗口 3.设有变量定义语句Dim a%,则变量a的数据类型是【3】。 A) 整型B) 单精度类型C) 双精度类型D) 字符串类型4.下列表达式中,值为False的是【4】。 A) "AB"<"abc"B) "ABC" = UCase("abc") C) "ABCD"<"abc"D) Mid("ABCD",3,1)=Left("ABCD",3) 5.函数InStr("ABCDEF", "CD")的值是【5】。 A) 2B) 3C) True D) CDEF 6.下列程序运行后,单击窗体,输出结果是【6】。 Private Sub Form_Click() Dim a As Integer, b As Integer

a = 3 b = 5 Print a + b; a & b End Sub A) 8 8 B) 35 35 C) 8 35 D) 35 8 7.下列程序运行后,单击窗体,输出结果是 【7】 。 Private Sub Form_Click() a = 3: b = 7 a = a + b : b = a – b : a = a - b Print a; b End Sub A) 4 3 B) 7 3 C) 3 7 D) 10 7 8.下面程序段所表示的数学关系式是 【8】 。 If (a < b) Then If d = c Then x = 1 Else x = 2 End If A) ? ??≠≥=<=)(2) c (1 d c b a d b a x 且且 B) ? ??≠<=<=)(2) c (1 d c b a d b a x 且且 C) ?? ?≥=<=)(2) c (1b a d b a x 且 D) ?? ?≠=<=) (2) c (1 d c d b a x 且 9.下列程序运行后,单击窗体,输出结果是 【9】 。 Private Sub Form_Click() s = 0: k = 1 Do s = s + k: k = k + 1 Loop Until k <= 5 Print s End Sub A) 15 B) 10 C) 1 D) 0 10.下列程序段的输出结果是 【10】 。 For k = 4 To 2 Step -2 m = k

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期末考试试题

VB期末考试试题A卷 一、填空题 1、VB程序设计的主要特点是(1)和(2)。 2、在VB中,最主要的两种对象是(3)和(4)。 3、工程是构成应用程序文件的(5)。 4、方法是VB提供的一种(6),用来完成一定的操作。 5、浮点类型数据包括单精度型和___(7)__数据。 6、事件是窗体或控件对象识别的___(8)____。 7、可用窗体的___(9)_ 方法在窗体中显示文字。 8、复选框控件Value属性指示复选框处于____(10)___或禁止状态(暗淡的)中的某一种。 9、在VB中,修改窗体的(11)和(12)属性值,可改变窗体的大小。 10、双击工具箱中的控件图标,可在窗体的(13)出现一个尺寸为缺省值的控件。 11、在MsgBox函数中,如果缺省title参数,则使用(14)作为消息框的标题。 12、设x=34.58,语句Print Format(x,“000.0”)的输出结果是(15)。 13、在VB 中,数值型变量的初值为(16),Varant型变量的初值为(17),布尔型变量的初值为(18)。 14、设置窗体的(19)属性,可在窗体上显示图片。 15、程序运行工程中,清除MP图片框中的图片应使用语句(20)。 二、选择题 1、菜单控件只包括一个事件,即(1),当用鼠标单击或键盘选中后按“回车”键时触发该事件,除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是(2)。 A、滚动框处于最右位置时,一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时,滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时,滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句 Select * Form student 中的 *表示(3)。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中,不属于标签的属性是(4)。 A、Enabled B、Caption C、Default D、Font 5、要求改命令按钮显示的文本,应当在属性窗口中改变的属性是(5)。

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),两个命令按钮,

相关文档