vb期末理论复习资料
vb1
满分：293分
姓名：________
1、单项选择题(本题共计169分)
1、能被对象所识别的动作与可执行的活动分别称为对象的________。( )
A、方法、事件
B、事件、方法
C、事件、属性
D、过程、方法
2、一个应用程序_________窗体。( )
A、只许有一个
B、可以没有
C、应该有两个
D、可包括多个
3、对象在响应某个事件时，计算机要执行一段程序，以完成相应的操作，这样的程序片段叫做____过程。( )
A、方法
B、事件
C、调动
D、编译
4、以下关于事件的说法，正确的是________。( )
A、事件是由系统预先定义好的，能够被对象识别的动作
B、用户可以根据需要建立新的事件
C、事件的名称是可以改变的，由用户预先定义
D、不同类型的对象所能识别的事件一定不相同
5、VisualBasic中的工程文件的扩展名是____________。( )
A、.reg
B、.frm
C、.bas
D、.vbp
6、________是接收用户鼠标或键盘输入的能力。当对象具有____________时，可接受用户的输入。( )
A、事件
B、属性
C、焦点
D、对象
7、所谓____________就是使某个对象进入活动状态（又称激活）的一种操作或动作。( )
A、事件
B、属性
C、方法
D、对象
8、一只白色的足球踢进球门，则白色、足球、踢、进球门是________。( )
A、属性、对象、方法、事件
B、属性、对象、事件、方法
C、对象、属性、方法、事件
D、对象、属性、事件、方法
9、VisualBasic是一种面向________的程序设计语言。( )
A、过程
B、用户
C、方法
D、对象
10、下面________语句，可以将列表框List1中当前选定的列表项的值替换成“ABC”。( )
A、List1.AddItem“ABC”，List1.ListIndex
B、List1.Text=“ABC”
C、List1.List(List1.ListIndex)=“ABC”
D、前三项均可
11、下面所列的控件属性中，其值既能在程序设计时设定，又能在程序运行时通过赋值改变的是________。( )
A、List1.ListCount
B、Text1.Index
C、Dir1.Path
D、Label1.Visible
12、单选按钮（OptionButton）用于一组互斥的选项中。若一个应用程序包含多组互斥条件，可在不同的________中安排适当的单选按钮，即可实现。( )
A、框架控件(Frame)或图象控件(Image)
B、组合框(ComboBox)或图象控件(Image)
C、组合框(ComboBox)或图片框(PictureBox)
D、框架控件(Frame)或图片框(PictureBox)
13、以下有关对象属性的说法中正确的是________。( )
A、对象所有的属性都罗列在属性窗口列表
B、不同对象不可能有同名属性
C、不同对象的同名属性取值一定相同
D、对象的某些属性即可在属性窗口设置，也可以通过属性代码设置或改变。
14、用窗体的________属性来设置窗体的标题。( )
A、Style
B、Text
C、Caption
D、Name
15、如果要在两个菜单命令项之间加一条分隔线，可在标题文本框中键入________。( )
A、-
B、+
C、&
D、#
16、关于窗体Name属性的叙述，正确的是________。( )
A、窗体Name属性可以具有与别的公共对象相同的名字
B、窗体Name属性和变量定义一样
C、窗体Name属性最长可达255个字符
D、窗体Name属性不能具有与别的公共对象相同的名字
17、窗体有一个方法可以使窗体隐藏但不从内存中卸载，该方法是____________。( )
A、Show
B、Release
C、Hide
D、Unload
18、设在菜单编辑器中定义了一个菜单项，名为menu1。为了在运行时让该菜单项变灰，应使用的语句是____________。( )
A、menu1.Enabled=True
B、menu1.Enabled=False
C、menu1.Visible=True
D、menu1. Visible = False
19、当对象失去焦点时，将会发生____________事件。( )
A、GetFocus
B、LostFocus
C、Focus
D、SetFocus
20、要使文本框能显示多行文字，则需设定它的____________属性为True。( )
A、Caption
B、PasswordChar
C、MultiLine
D、Seleted
21、将文本框的ScrollBars属性设置为非零值，却没有效果，原因是____________。( )
A、文本框中没有内容
B、文本框的MultiLine属性值为False
C、文本框的MultiLine属性值为True
D、文本框的Locked属性值为True
22、当命令按钮的________属性被设置为True时，按[Esc]键与单击该命令按钮的作用相同。( )
A、Cancel
B、Default
C、Style
D、Picture
23、对于一个含有计时器控件的窗体，每经过一段由________属性指定的时间间隔，就会产生一个Timer事件。( )
A、Name
B、Enabled
C、Caption
D、Interval
24、只有当一个对象的________和________属性为True时，它才能获得焦点。( )
A、Enabled; Visible
B、Visible; Caption
C、Visible; Name
D、Enabled; Caption
25、下列控件中，可以接收焦点的是________。( )
A、文本框
B、图像框
C、框架
D、形状
26、在3种类型的组合框中，只有________才能接收DblClick事件。( )
A、下拉式组合框
B、简单组合框
C、下拉式列表框
D、下拉式列表框和下拉式组合框
27、在运行过程中要把某控件变灰，应把____________属性设置为False。( )
A、Default
B、Visible
C、Activate
D、Enabled
28、能够获得一个文本框中被选取文本的内容的属性是____________。( )
A、Text
B、Length
C、SelStart
D、SelText
29、某些对象有只读属性，如Name属性，这种属性在设计阶段设置，不能在运行期间改变。以下________属性为只读属性。( )
A、ControBox
B、Enabled
C、BorderStyle
D、WindowState
30、描述X、Y中只有一个小于Z的逻辑表达式是________。( )
A、X B、X C、X D、X 31、下列语句运行时系统给出错误提示的是________。( ) A、Print -32000-769 B、Print "1E2"+8 C、Print "AB" & 128 D、Print 3=2=4 32、对于某对象的SetFocus与GotFocus描述正确的是________。( ) A、SetFocus是方法，GotFocus是事件 B、SetFocus是事件，GotFocus是事件 C、SetFocus是方法，GotFocus是方法 D、SetFocus是事件，GotFocus是方法 33、有应用代码：Text1.Text="VisualBasic"，其中的Text1、Text和"VisualBasic"分别代表____。( ) A、对象、值、属性 B、对象、方法、属性 C、对象、属性、值 D、属性、对象、值 34、在使用菜单编辑器创建菜单时，可在菜单名称中首字母前插入符号________，那么在运行程序时按Alt键和该字母键就可打开该命令菜单。( ) A、下划线 B、& C、$ D、@ 35、在程序中可以通过复选框和单选框按钮的____________属性值来判断它们的当前状态它。( ) A、Caption B、Value C、Checked D、Selected 36、应用程序窗体的名称属性为Frm1，窗体上有一个命令按钮，其名称属性为Cmd1，窗体和命令按钮的Click事件过程名分别为____________。( ) A、Form_Click() Command1_Click B、Frm1_Click() Command1_Clic C、Form_Click() Cmd1_Click D、Frm1_Click() Cmd1_Click 37、在下列关于菜单的说法中，错误的是____________。( ) A、每个菜单项都是一个控件，与其他控件一样也有自己的属性和事件 B、除了Click事件之外，菜单项还能响应其他的如DblClick等事件 C、菜单项的捷径键不能任意设置 D、在程序执行时，如果菜单项的Enabled属性为False，则该菜单项变成灰色，不能被用户选择 38、在用菜单编辑器设计菜单时，必须输入的项有____________。( ) A、快捷键 B、标题 C、索引 D、名称 39、将数据项“China”添加到列表框(Listl)中成为第一项应使用____________语句。( ) A、Listl.Addltem "China",0 B、Listl.Addltem "China",1 C、Listl.Addltem 0,"China" D、Listl.Addltem 1,"China" 40、下列控件中，没有Caption属性的是____________。( ) A、框架 B、列表框 C、复选框 D、单选按钮 41、窗体Form1的名称属性是frm，它的Load事件过程名是_____。( ) A、Form-Load B、Form_Load C、frm_Load D、Me_CmdOK 42、以下有关对象属性的说法中错误的是____________。( ) A、所有的对象都具有Name(名称)属性 B、只能在执行时设置或改变的属性为执行时属性 C、对象的某些属性只能在设计时设定，不能使用代码改变 D、Enabled属性值设为False的控件对象在窗体上将不可见 43、使用____________方法，可以将列表框List1中的所有项删除掉。( ) A、List1.Txt="" B、AddItem C、RemoveItem D、Clear 44、对正实数X的第四位小数四舍五入的VB表达式是________。( ) A、0.001*Int(x+0.0005) B、0.001*(1000*x+0.5) C、0.001*Int(1000*x+5) D、0.001*Int(1000*(x+0.0005)) 45、设整型变量a、b的当前取值分别为200与20，以下赋值语句中不能正确执行的是________。( ) A、Text1=a/b*a B、Text1=a*a/b C、Text1=“200”*a/b D、Text1=a&b&a 46、函数Cint(–3.5)，Int(–3.5)，Fix(–3.5)的值分别是________。( ) A、-3，–4，–3 B、-4，–4，–3 C、-3，–4，–4 D、-4，–3，–3 47、执行语句"Print format(5459.478,"##,##0.00")"，正确的输出结果是________。( ) A、5459.48 B、5,459.48 C、5,459.478 D、5,459.47 48、下列没有类型说明符的变量是_________。( ) A、日期型 B、长整型 C、字符串型 D、货币型 49、VB表达式Sqr(a+b)^3*2中优先进行运算的是________。( ) A、Sqr函数 B、+ C、^ D、* 50、下列语句中不能正常执行的是________。( ) A、print +32758+10 B、print 5+9=15 C、print "65"+12 D、print "65"&12 51、如果一个变量未指明数据类型，那么，VB默认这个变量为______变量。( ) A、变体型 B、整型 C、公共 D、字符串型 52、在窗体Form1上画两个文本框（Name属性分别为Fext1和Text2）和一个命令按钮（Name 属性为Command1），程序如下。执行后结果为___________。 Private Sub Command1_Click() a=Text1.Text+Text2.Text Print a End Sub Private Sub Form_load() Text1.Text="123" Text2.Text="321" End Sub ( ) A、444 B、321123 C、123321 D、132231 53、要判断“月收入在2000元以上（含2000元）且5000元以下（不含5000元）”的职工，应该使用的逻辑表达式是____________。( ) A、M>2000 AND M<=5000 B、M>2000 Or M<=5000 C、M>=2000 AND M<5000 D、M>=2000 Or M<5000 54、下列程序的执行结果是____________。 x=–6^2 Print Sgn(x)+Abs(x)+Int(x) ( ) A、–36 B、–1 C、0 D、–72 55、下列语句执行后的输出结果是____________。(一个方格表示一个空格) Wage = 26 Print "工资"; Print Wage ( ) A、工资□26 B、工资□□26 C、“工资”□26 D、“工资”□□26 56、语句Print 4 + 5\6*7/8 Mod 9的值是____________。( ) A、4 B、5 C、6 D、7 57、下列____________是合法的VB变量名。( ) A、_5a B、我_AB C、5name D、Use&DASF 58、MsgBox函数返回值的类型为____________。( ) A、整体数值 B、字符串 C、变体 D、数值或字符串 59、用于字符串连接的运算符是____________。( ) A、& B、+ C、And D、A、B都可以 60、表达式(-1)*Sgn(-100+Int(Rnd*100))的值是____________。( ) A、随机数 B、0 C、1 D、-1 61、如果a是一个正实数，对x的第3位小数四舍五入的表达式是____________。( ) A、0.01*Int(a+0.005) B、0.01*Int(a+0.05) C、0.01*Int(100*(a+0.005) D、0.01*Int(100*(a+0.05)) 62、不能正确表示条件“两个整型变量X和Y之一为0，但不能同时为0”的布尔表达式是________。( ) A、X*Y=0 And (X<>0 Or Y<>0) B、( X=0 Or Y=0 ) And (X<>0 Or Y<>0) C、Not ( (X=0 Or Y=0) And (X<>0 Or Y<>0) ) D、X*Y=0 And X+Y<>0 63、函数Int(Rnd*11)+10的值的范围是____________。( ) A、[10，20] B、[0，20] C、[10，10] D、[10，11] 64、满足“当a的值是偶数时为0，是奇数时为1”的要求的表达式是____________。( ) A、a Mod 2 = 0 B、Not a Mod 2<>0 C、Not (a Mod 2) D、(a\2*2-a)=0 65、VisualBasic的一行可以写多条语句，语句之间用____________隔开。( ) A、逗号 B、分号 C、顿号 D、冒号 66、如果将布尔常量False赋值给一个整形变量，则整型变量的值为____________。( ) A、0 B、-1 C、True D、False 67、设a为Integer型变量，s为Single型变量，把3.75赋值给s后，再执行下列某一语句，则在文本框中显示的结果与执行语句a=s:Text1=a的结果相同的有________个。 ①a=Int(s):Text1=a ②a=Fix(s):Text1=a ③a=CInt(s):Text1=a ④a=Format(s,”#####”):Text1=a ( ) A、1 B、2 C、3 D、4 68、i被j整除的逻辑表达式是________________。( ) A、i/j = 0 B、i\j = 0 C、i<>0 D、i mod j = 0 69、x+y小于10且x-y要大于0的逻辑表达式是________________。( ) A、x+y<10,x-y>0 B、(x+y<10):(x-y)>0 C、x+y<10 And x-y>0 D、x+y<10 x-y>0 70、赋值语句：a=123+MID("123456",3,2)执行后，a变量中的值是____________。( ) A、"12334" B、123 C、12334 D、157 71、表达式Len("123程序设计ABC")的值是____________。( ) A、10 B、14 C、20 D、17 72、己知A$"12345678";，则表达式Val(Left(A,4)+Mid(A,4,2))的值为____________。( ) A、123456 B、123445 C、8 D、6 73、\、/、Mod、*四个算术运算符中，优先级别最低的是____________。( ) A、\ B、/ C、Mod D、* 74、表达式16/4-2^5*8/4 MOD 5/2的值为____________。( ) A、14 B、4 C、20 D、2 75、语句Print "5*20" 输出的结果是________。( ) A、"5*20" B、出现错误信息 C、5*20 D、100 76、x+y小于10且x-y大于0的逻辑表达式是________。( ) A、x+y < 10 Or x-y>0 B、(x+y)<10 : (x-y) > 0 C、x+y < 10 And x-y >0 D、x+y <10 . And. x-y >0 77、在文本框Text1中输入数字12，Text2中输入数字34，执行以下语句，只有____________。可使文本框Text3中显示46。( ) A、Text3. Text=Text1. Text & Text2. Text B、Text3. Text=Val(Text1. Text)+Val(Text2.Text) C、Text3. Text=Text1. Text+Text2.Text D、Text3. Text=Val(Text1. Text) & Val(Text2.Text) 78、在程序中将变量Inta、Bl、St、D分别定义为Integer类型、Boolean类型、String类型和Date类型，下列赋值语句中，正确的是____________。( ) A、Inta= "333" + "22" B、D=#10/05/01# C、St=5+ "abc" D、Bl=#True# 79、以下__________程序段可以实施X，Y变量值的变换. ( ) A、Y=X:X=Y B、Z=X:Y=Z:X=Y C、Z=X:X=Y:Y=Z D、Z=X:W=Y:Y=Z:X=Y 80、语句Print “Int(-13.2)=”;Int(-13.2)的输出结果为__________. ( ) A、Int(-13.2)=-13.2 B、Int(-13.2)=13.2 C、Int(-13.2)=-13 D、Int(-13.2)=-14 81、语句x=x+1的正确含义是__________. ( ) A、变量X的值与X+1的值相等 B、将变量X的值存在X+1中去 C、将变量X的值加1后赋给变量X D、变量X的值为1 82、下列语句中的语句可以用来正确地声明一个动态数组。( ) A、Private A(n) As Integer B、Dim A() As Integer C、Dim A(,) As Integer D、Dim A(1 to n) 83、在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：Private Sub Command1_Click( ) Dim a As Integer,b As Integer Do While b <100 b=b+5 a=a+b If b>20 Then Exit Do Loop Print a,b End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是_________。( ) A、50 20 B、75 25 C、50 25 D、75 20 84、有如下程序： Private Sub Command1_Click( ) score=65 select Case score Case Is<60 a$="F" Case 60 To 69 a$="D" Case 70 To 79 a$="C" Case 80 To 89 a$="B" Case else a$="A" End Select MsgBox a$ End Sub 程序运行后，消息对话框中显示的内容为_______。( ) A、A B、B C、C D、D 85、下列程序： Private Sub Form_Click( ) For j=1 To 15 a=a+j Mod 3 Next j Print a End Sub 运行后输出的结果是__________。( ) A、1 B、15 C、90 D、120 86、在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Private Sub Command1_Click( ) Static A As Integer Static B As Integer Cls B = 2 B = B+3 A= 3+A print A, B End Sub 程序运行时，3次单击命令按钮Command1后，窗体上显示的结果为___________。( ) A、3 5 B、6 6 C、9 5 D、3 3 87、在窗体中添加一个命令按钮，并编写如下程序代码： Private Sub Command1_Click( ) Dim y As Integer y = 0 Do While y<7 y=y+2 Loop MsgBox y End Sub 程序运行后，消息对话框中显示__________。( ) A、0 B、7 C、8 D、2 88、在单击窗体中的按钮Command1第3次后，如下程序打印结果是____。 Private Sub Command1_Click( ) Static a AS Integer a = a+1 Select Case a Case 1: Print "欢迎大家" Case 2 :Print "努力就能成功 Case 3: Print "希望你能通过考试" Case 4: Print "再见" End Select End Sub ( ) A、“欢迎大家” B、“努力就能成功” C、"希望你能通过考试" D、“再见” 89.下面是计算1~100奇数的和的程序，请补充完整，填空应为_______。Private Sub Command1_Click() Dim s As Long, x As Integer s = 0 For x = ____________ Step -2 s = s + x Next x Print s End Sub A. 100 To 1 B. 1 To 100 √C. 99 To 1 D. 1 To 99 90.下列程序的输出结果是____________。 Dim y As Integer y=10 Do While y<>0 y=y-1 Loop Print "y="; y(本题1分) √A. y=0 B. y=1 C. y=随机值 D. y=–1 91.以下程序的输出结果是____________。 Dim i As Integer,a As Integer Do While i<20 Do While True If i Mod 10=0 Then Exit Do Else i=i-1 End If Loop i=i+11 a=a+i Loop Print a A. 21 √B. 32 C. 33 D. 11 92.下列程序段的执行结果为____________。x = Int((69 - 60) * Rnd + 60) Select Case x Case Is >= 90 Print "优秀" Case 80 To 89 Print "良好" Case 60 To 79 Print "合格" Case Else Print "不合格" End Select A. 优秀 B. 良好 √C. 合格 D. 不合格 93、下面程序的内层循环次数是________。 For i=1 TO 3 For j=1 TO i For k=j TO 3 ... Next k Next j Next i ( ) A、3 B、14 C、9 D、21 94、结构化程序设计方法的核心是规定了三种基本结构：________结构、分支结构、循环结构。( ) A、条件 B、顺序 C、当型 D、逻辑 95、下列循环能正常结束循环的是____________。( ) A、i=5 Do i=i+1 Loop Until i<0 B、i=1 Do i=i+2 Loop Until i=10 C、i=10 Do i=i+1 Loop Until i>0 D、i=6 Do i=i-2 Loop Until i=1 96、语句If x=1Then y=1，下列说法正确的是____________。( ) A、x=1和y=1均为赋值语句 B、x=1和y=l均为关系表达式 C、x=1为关系表达式，y=1为赋值语句 D、x=1为赋值语句，y=l为关系表达式 97、在过程中有语句ForI=N1 To N2 Step N3，在该循环体内有下列四条语句，其中________会影响循环执行的次数。①N1=N1+I ②N2=N2+N3 ③I=I+N3 ④N3=2*N3 ( ) A、①② B、①②③ C、③ D、①②③④ 98、执行下面的程序，单击窗体后在窗体上显示的结果是_______ Private Sub Form_Click() Dim Str1 As String, Str2 As String Dim Str3 As String, I As Integer Str1 = "e" For I = 1 To 2 Str2 = UCase(Str1) Str1 = Str2 & Str1 Str3 = Str3 & Str1 Str1 = Chr(Asc(Str1) + I) Next I Print Str3 End Sub ( ) A、EeFF B、eEfF C、EEFF D、eeFF 99、用Msgbox "你好", vbokonly, "Hello"显示的消息对话框窗口的标题是________。( ) A、你好 B、vbokonly C、Ok D、Hello 100.执行以下语句后，a的值为____________。 Dim a As Integer a=1 Do Until a=100 a=a+2 Loop(本题1分) A. 99 B. 100 √C. 溢出 D. 101 101、表达式（7\3+1）*(18\5-1)的值是___________. ( ) A、8.67 B、7.8 C、6 D、6.67 102、 102.表达式X+1>X是_____________.(本题1分) A. 算术表达式 B. 非法表达式 C. 字符串表达式 √D. 关系表达式 103、下列有关数组的说法中，不正确的是________。( ) A、在窗体模块中不可以定义全局数据组 B、可以使用Erase语句释放所有数组所占据的存储储空间 C、语句Dim X(3.6+2)As Integer定义了一个维上界是6的一维的整型数组 D、形参数组的类型可以是定长符串类型 104、在窗体模块的通用声明处用下面的语句声明变量、数组，正确语句有________个。 ①Public A(5) As Integer ②Public N As Integer ③Public St As String ④Private b() As Integer ( ) A、2 B、3 C、4 D、1 105、对窗体编写如下代码： Option Base 1 Private Sub Command1_Click( ) a=Array(237,126,87,48,498) m1=a(1) m2=1 For i=2 To 5 If a(i)>m1 Then m1=a(i) m2=i End If Next i Print m1;m2 End Sub 程序运行后，按回车键，输出结果为_________。( ) A、48 4 B、237 1 C、498 5 D、498 4 106、在窗体上画一个命令按钮，然后编写如下事件过程： Option Base 1 Private Sub Command1_Click( ) Dim a As Variant a = Array(1,2,3,4) j = 1 For i = 4 To 1 Step -1 s = s + a(i)*j j = j * 10 Next i Print s End Sub 运行上面的程序，单击命令按钮，其输出结果是_____________。( ) A、4321 B、12 C、34 D、1234 107、程序代码如下，当单击窗体上Command1控件时，窗体上显示的结果是_________。Option Base 1 Private Sub Command1_Click( ) Dim i As Integer Dim x(3,3)As Integer For i = 1 To 3 For j = 1 To 3 x(i,j) = (i-1) * 3+j Next j Next i For i = 1 To 3 Print x(i,4-i) Next i End Sub ( ) A、1 5 9 B、1 4 7 C、3 5 7 D、3 6 9 108.运行以下程序段，输出结果是。 Dim a(1 To 10) Dim p(1 To 4) k = 5 For i = 1 To 4 p(i) = i * 2 Next i For i = 1 To 4 k = k + p(i) * 2 Next i Print k(本题1分) A. 48 B. 32 C. 30 √D. 45 109.当发生Command1_Click事件后，程序输出结果是________。Option Base 1 Private Sub Command1_Click() Dim a(4, 4) As Integer,i As Integer,s As Integer s=0 For i=1 To 4 For j=1 To 4 a(i, j) = (i-1)*4+j*2 Next j Next i For i = 1 To 4 s=s+a(i, i) Next i Print s End Sub(本题1分) A. 28 B. 32 C. 30 √D. 44 110.下列程序段的输出结果是____________。Dim i As Integer Dim a(8) As Integer y = 18: i = 0 Do a(i) = y Mod 2 i = i + 1 y = y \ 2 Loop Until y < 1 For j = i - 1 To 0 Step -1 Print a(j); Next j(本题1分) A. 1 0 0 0 √B. 1 0 0 1 0 C. 0 0 1 1 0 D. 1 0 1 0 0 111.下列程序的输出结果是____________。Dim i As Integer, k As Integer Dim a(10) As Integer, p(3) As Integer k = 5 For i = 0 To 9 a(i) = i Next i For i = 0 To 2 p(i) = a(i * (i + 1)) Next i For i = 0 To 2 k = k + p(i) * 2 Next i Print k(本题1分) A、17 B、21 C、22 D、23 112、下列程序段的执行结果是________。 Dim A(3,3) For M=1 TO 3 For N=1 TO 3 If N=M Or N=3-M+1 Then A(M,N)=1 Else A(M,N)=0 End If Next N Next M For M=1 TO 3 For N=1 TO 3 Print A(M,N); Next N Print Next M ( ) A、1 0 0 0 1 0 0 0 1 B、1 1 1 1 1 1 1 1 1 C、0 0 0 0 0 0 0 0 0 D、1 0 1 0 1 0 1 0 1 113、如下数组声明语句，则数组a包含元素的个数有____________。Dim a(3 , -2 to 2 , 5) ( ) A、120 B、75 C、60 D、13 114、如下二维数组声明语句，____________正确。( ) A、Dim a[3，4] As Integer B、Dim a(3，4) As Integer C、Dim a(n，n) As Integer D、Dim a(34) As Integer 115、Option Base 1 Private Sub Command1_Click() Dim a%(3, 3) For i = 1 To 3 For j = 1 To 3 If j > 1 And i > 1 Then a(i, j) = a(a(i - 1, j - 1), a(i, j - 1)) + 1 Else a(i, j) = i * j End If 二、选择题 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 。 第1题（1.0分）题号:227 表达式1 and 0的值【1】.答案：1). False 第2题（1.0分）题号:222 把整数0赋给一个逻辑型变量,则逻辑变量的值为【1】. 答案：1). False 第3题（1.0分）题号:60 a 和b 中有仅只有一个为1,相应的Visual Basic逻辑表达式为【1】. 答案：1). a=1 xor b=1 第5题（1.0分）题号:244 设x为一个两位数,将x个位数和十位数交换后所得两位数VB的表达式是【1】. 答案：1). (x mod 10) * 10 + int(x/10) 第7题（1.0分）题号:226 表达式32\7 MOD 3^2 的值是【1】. 答案：1). 4 第8题（1.0分）题号:288 文件按照存取方式及其组成结构可以分为顺序文件和【1】. 答案1). 随机文件或随机 第9题（1.0分）题号:319 Option Base 1的作用是确定数组的下界为【1】. 答案：1). 1 第1题（1.0分）题号:236 所有的VB 的变量,都有隐含说明字符和强调声明两种方法来定义. 答案：N 第2题（1.0分）题号:246 ActiveX控件是扩展名为*.ocx的独立文件,使用时需用 "工程"/"部件"载入或移去. 答案：Y 第3题（1.0分）题号:289 框架控件和形状控件都不能响应用户的鼠标的单击事件. 答案：Y 第4题（1.0分）题号:350 在窗体模块的声明部分中用Private声明的变量的有效范围是其 所在的工程. 答案：N 第5题（1.0分）题号:354 在框架控件上放置的控件可以移动到框架控件的外面. 答案：N 第6题（1.0分）题号:231 可以用"&","+"合并字符串,但是用在变异变量时,"+"可能会将两个数值加起来.答案：Y 第8题（1.0分）题号:247 Circle方法绘制扇形或圆弧图形时,图形的形状不仅与起始角、终止角的大小相关,而且与起始角、终止角的正或负相关.答案：Y 第9题（1.0分）题号:330 有一个程序在属性窗口中设置了它的窗体字体大小为10号,而程序代码若设置了它的窗体字体大小为20号,那么当程序运行后实际的窗体字体大小为20号.答案：Y 第10题（1.0分）题号:225 Visual Basic程序的运行可以从Main()过程启动,也可以从某 个窗体启动. 答案：Y 第1题（1.0分）题号:319 能够改变窗体边框线类型的属性是(). A:FontStyleB:BorderStyleC:BackStyleD:Bord er 答案：B 第2题（1.0分）题号:822 以下()对象不具有Clear方法. A:列表框B:组合框C:剪贴板D:图片框 答案：D 第3题（1.0分）题号:258 常量-0.00013579的科学计数法是(). A:-1,3579E+0.4B:.00013579C:-13.579E-5D:-1.3579E-0.4 答案：C 第4题（1.0分）题号:230 vb 应用程序是分层管理的,其最高的层次为(). A:工程B:模块C:窗体D:过程 答案：A 第5题（1.0分）题号:837 用户可以通过设置菜单项的()属性值为FALSE来使该菜单项不可见. A:HideB:CheckedC:VisibleD:Enabled答案：C 第6题（1.0分）题号:334 若要使标签控件显示时,不覆盖其背景内容, 姓名 班级 考号 …………………………………装……………………………………订……………………………………线……………………………固安县职业中学2016～2017学年度第一学期期中考试 计算机专业高中三年级VB 试卷 命题教师： 高丽丽 考试时间：2016年11月 一、选择题 1． Visiul Basic 的版本中，（ ）的功能最强大。 A ．学习版 B ． 基础版 C ．专业版 D ．企业版 2．标准可执行文件是（ ） A ．标准EXE B ．ActiveX EXE C ．ActiveX DLL D ．ActiveX 控件 3．Visual Basic 6.0没有下面那种版本。（ ） A ．企业版 B ．学习版 C ．工程版 D ．专业版 4．一般标准模块文件的扩展名为（ ） A ．VBP B ．VPG C ．FRM D ．BAS 5．在Visual Basic 中，数值1234&的类型是（ ） A ．整型 B ．长整型 C ．字符串型 D ．双精度型 6．退出Visiul Basic 的错误方法是（ ） A ．单击窗口右上角的关闭按钮 B ．选择“文件”菜单中 “退出”命令 C ．按快捷键Alt+Q D ．选择“文件” 菜单中 “关闭”命令 7．在正确安装Visiul Basic 6.0后，可以通过多种方式启动Visiul Basic 。以下方式中不能启动 Visiul Basic 的是（ ）。 A ．通过“开始”菜单中的“程序”命令 B ．通过“我的电脑”找到vb6.0.exe ，双击该文件名 C ．通过“开始”菜单中的“运行”命令 D ．进入DOS 方式，执行vb6.0.exe 文件 8．VB 6.0是一种面向（ ）的编程环境。 A ．机器 B ． 对象 C ．过程 D ．应用 9．工程资源管理器窗口中包含的文件类型有（ ）种。 A ．2 B ． 3 C ．4 D ．5 10．（ ）是用来控制对象的功能及操作的内部程序。 A ．属性 B ．方法 C ．事件 D ．代码 11．以下哪个不是事件产生的方式。（ ） A ．程序操作者触发 B ．由工程触发 C ．由系统触发 D ．代码间接触发 12．Option Explicit 语句不可以放在（ ）。 A ．窗体模块的声明段中 B ．标准模块的声明段中 C ．类模块的声明段中 D ．任何事件过程中 13．下面程序运行后，输出结果是（ ）。 Dim zxs As Integer zxs%=232 zxs=232 Print zxs%;zxs A ．232 232032 B ．232 232 C ．232.32 2232.32 D ．任何事件过程中 14．若希望在离开某过程后，还能保存该过程中局部变量的值，则应使用（ ）关键字在该过程定义局部变量。 A ．Dim B ．Private C ．Public D ．Static 15．在程序中分别将变量Inta 、B1、St 和D 定义为整型、布尔型、字符串型和日期型，下列赋值语句在执行时会出错的是（ ）。 A ．Inta=4.6 B ．B1=#True# C ．St=5 & 123.5 D ．D=#10 / 05 / 01# 16．在窗体模块的通用声明段中声明变量时，不能使用（ ）关键字。 A ．Dim B ．Public C ．Private D ．Static 17．下列表达式能产生1~6自然数的是（ ）。 A ．Int(Rnd(6)+1) B ．Int(Rnd*6) C ．Int(Rnd*7) D ．Int(Rnd*6+1) 18．方法Print ”10+6=”;10+6输出结果是（ ）。 A ．10+6=10+6 B ．10+6=16 C ．16=10+6 D ．Int(Rnd*6+1) 19．下列没有类型说明符的变量是（ ）。 A ．日期型 B ．长整型 C ．字符型 D ．货币型 20．VB6.0变量名abc#的类型是（ ）。 A ．字符串型 B ．单精度类型 C ．整型 D ．双精度类型 二、填空题 1．Visual 中的含义是 ，指的是开发 的方法。Basic 是指 代码，英文全称是 。 2．退出Visual Basic 可单击 ，也可选择 菜单中的 命令，或按 + 键。 3．Visual Basic 开发环境的中心部分称为 。 4．属性窗口有两种显示方式，一种是按 排序，另一种是按 排序。 5．Visual Basic 有两种运行程序的方法， 模式和 模式。 6．窗体模块的文件扩展名为 、标准模块的文件扩展名为 、类模块的文件扩展名为 。 7．在Visiul Basic 语言中，注释符为 、分行符为 、并行符为 。 九江学院期末考试复习题（政法A1111）第一套 一、判断题 1、Visual Basic程序开发的特点是面向对象的事件驱动。（√） 2、Print_Text 是一个不合法的变量名。（×） 3、窗体的AutoRedraw属性实现了屏幕图像的重建。（√） 4、设置字体大小应使用Font属性（×） 5、Sub过程可以实现嵌套调用（√） 6、IIF函数中的三个参数都不能省略。（√） 7、块结构条件语句以End If结束，而单行结构条件语句没有End IF。（√） 8、当终值小于初值时，步长为负数。（√） 9、执行While-Wend循环时，如果一开始条件就不成立，则语句块一次也不会执行。（√） 10、关于数组的引用,在程序中,凡是简单变量可以出现的地方都可以出现数组元素的引用(√) 二、单项选择题 1．Print Format（123，”####”）执行之后的结果为 A）＃123B）123C）123＃D）＃＃＃＃ 【答案】B 2．下面可以表示注释语句开头的为 A）Re B）R C）Rem D）dim 【答案】C 3．下列选项中窗体载入事件为 A）Load事件B）Click事件C）DblClick事件D）Unload事件 【答案】A 4．Timer控件可以使用下列哪种事件 A）Click事件B）Timer事件C）Dblclick事件D）Change事件 【答案】B 5．在InputBox函数中哪一个参数是必须的 A）Prompt B）Buttons C）Title D）Context 【答案】A 6．以下叙述中错误的是： A）如果过程被定义为Static类型，则该过程中的局部变量都是Static类型B）Sub过程中不能嵌套定义Sub过程 C）Sub过程可以嵌套调用Sub过程 D）事件过程可以像通用过程一样由用户定义过程名 【答案】C 7．要填加一个标准模块，可使用“_____”菜单中的“添加模块”命令。 A）文件B）视图C）工程D）工具 【答案】C 8．在块结构条件语句If-Then / Endif中 (A)必须至少有一个Elseif语句 (B )可以有任意多个ElseIf-Then语句 (C)如果没有Else语句，运行时将出现错误 VB期中考试题 一、填空题 1、Visual Basic是一种面向__________的可视化程序设计语言，采取了__________的编程机制。 2、在VB中工程文件的扩展名是____________，窗体文件的扩展名是____________，标准模块文件的扩展名 3、一个控件在窗体的位置由_______和________属性决定，其大小由__________和_________属性决定。 4、设置控件背景颜色的属性名称是______________________。 5、 x=InputBox(___ __, , ) 6、写出显示下图信息框的MsgBox函数 MsgBox( , , ) 二、选择题 1、下面不是VB工作模式的是( ) A.设计模式 B.运行模式 C.汇编模式 D.中断模式 2、可视化编程的最大优点是( ) A.具有标准工具箱 B.一个工程文件由若干个窗体文件组成 C.不需要编写大量代码来描述图形对象 D.所见即所得 3、下列不能打开属性窗口的操作是( ) A.执行“视图”菜单中的“属性窗口”命令 B.按F4键 C.按Ctrl+T D.单击工具栏上的“属性窗口”按钮 4、下列可以打开立即窗口的操作是( ) A.Ctrl+D B.Ctrl+E C.Ctrl+F D.Ctrl+G 5、Visual Basic的编程机制是( ) A.可视化 B.面向对象 C.面向图形 D.事件驱动 6、以下能够触发文本框Change事件的操作是( ) A.文本框失去焦点 B.文本框获得焦点 C.设置文本框的焦点 D.改变文本框的内容 7、应用程序设计完成后，应将程序保存，保存的过程是( ) A.只保存窗体文件即可 B.只保存工程文件即可 C.先保存工程文件，之后保存窗体文件 D.先保存窗体文件(或标准模块文件)，之后还要保存工程文件 8、任何控件都具有的属性是( ) A.TEXT B.CAPTION https://www.wendangku.net/doc/ab15733633.html, D.FORECOLOR 5、决定控件上文字的字体、字形、大小及效果的属性是( ) A.TEXT B.CAPTION https://www.wendangku.net/doc/ab15733633.html, D.FONT 9、在窗体上建立了多个控件，如TEXT、LABEL1、COMMAND1，若要使程序一运行焦点就定位在COMMAND1控件上，应将COMMAND1控件的( )设置为0 A.INDEX B.TABINDEX C.TABSTOP D.ENABLED 10、运行时，当用户向文本框输入新的内容，或在程序代码中对文本框的TEXT属性进行赋值从而改变了文本框的TEXT属性值时，将触发文本框的( )事件 A.CLICK B.DBLCLICK C.GOTFOCUS D.CHANGE 11、以下窗体名中哪些是非法的窗体名( )。 A._aform B.3frm C.f_1 D.frm 5 E.f_1* 12、一个名称为myfrm,标题属性为form1的窗体，它的单击事件名应为( )。 A. myfrm_click B.form1_click C.form_click D.me_click 13、执行下面语句：print “5*20” 的结果是( )。 A.“5*20” B.出现错误信息 C.5*20 D.100 14、下列语句代码不可正常执行的是( )。 A、Print 32765 + 3 B、Print 5 + 7 = 14 C、Print 256 / 128 D、Print "14" + 12 15、当用户单击命令按钮时，( )属性可以使得命令按钮对激发事件无效。 A. Name B.Enabled C.Default D.Cancel 16、下列语句中的( )语句可以用来正确地声明一个动态数组。 A.Private A(n) as integer B.Dim A() as integer C.Dim A(,) as integer D.Dim a(1 to n) 16、以下选顶中，不是Visual Basic 6.0默认控件名称的是 https://www.wendangku.net/doc/ab15733633.html,mand1 B.Text1 C.Option1 https://www.wendangku.net/doc/ab15733633.html,be1 17、表达式Fix(－26.99)+Int(24.56)的值为 A.－2 B.－3 C.－1 D.0 18、用下面语句定义的数组元素个数是 Dim a(－3 T0 3，2)as Integer A.6 B.12 C.14 D.21 19、在Visual Basic 6.0的立即窗口中，表达式Print 5>2的输出是 2011-2012学年第一学期算法与程序设计期末考试题 班级：姓名：分数： 一、单项选择题（每题4分） 1.算法是解决问题的( ) A.程序代码 B.方法与步骤 C.计算公式 D.最终结果 2.以下不能作为vb常量的的是( ) A.“Good Luck” B. PI C. 1.5E-3 D. 16.34 3.以下各表达式中, 计算结果为0的是( ) A. INT(12.4)+INT(-12.6) B. CINT(12.4)+CINT(-12.6) C. FIX(13.6)+FIX(-12.6) D. FIX(12.4)+FIX(-12.6) 4.设a=″Visual Basic″，下面使b=″Basic″的语句是( ) A.b=Left(a，8，12) B.b=Mid(a，8，5) C.b=Right(a，5，5) D.b=Left(a，8,5) 5.inputbox() 函数返回值类型为( ) A.数值 B.字符串 C.数值和字符串 D.变体 6.下列关于For…Next语句的说法正确的是( ) A. 循环变量、初值、终值和步长都必须为数值型 B.Step后的步长只能为正数 C. 初值必须小于终值 D.初值必须大于终值 7.下列符号中，只有( )是合法的VB变量名。 A．xy23 B．23xy C．Sub D．xy8[1] 8.数学表达式Sin30°写成VB表达式是( ) A．Sin30 B．Sin(30) C．Sin(30°) D．Sin(30*3.14/180) 9.在VB的运算中，级别最高的是( ) A．= B．And C．Or D．Not 10.判断任意3条线段a、b、c能否构成三角形的表达式为( ) A．a+b>=c Or a+c>=b Or b+c>=a B．Not(a+b 第一部分：客观题 一、单项选择题 1、在窗体模块的通用段中声明变量时，不能使用的关键字是（） A、 Dim B、 Public C、Private D、 Static 2、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是（） A、工程资源管理器窗口 B、工具箱窗口 C、属性窗口 D、代码窗口 3、若要使某可见控件获得焦点，可使用（）方法来实现。 Ａ、RefreshＢ、SetfocusＣ、GotfocusＤ、Value 4、下列不可作为VB变量名的是（） A、ABT1 B、Alpha C、ABC D、4*Delta 5、表达式 5 Mod 3+3\5*2的值是（） A、 0 B、 6 C、4 D、 2 6、下列语句中，正确的赋值语句是（） A、 i + j = 10 B、 2i = j C、 j = i + j D、 i * j = 0 7、执行下列程序段后，x的值是（）。 n = 4: x = 1: i = 1 Do x = x * i i = i + 1 Loop While i < n A、 2 B、 6 C、 10 D、 14 8、当用户在窗体上单击鼠标时，不会触发的事件是（） Ａ、ClickＢ、MouseDownＣ、MouseUpＤ、DblClick 9、下列为整型变量的是（） A、 x! B、 x# C、x$ D、 x% 10、要从For循环中直接退出循环，可使用的语句( )。 A、Exit Do B、Exit Loop C、Exit For D、Stop 11、下列逻辑表达式中，能正确表示条件“x，y都是奇数”的是（） A、x Mod 2 =1 Or y Mod 2 =1 B、x Mod 2 =0 Or y Mod 2=0 C、x Mod 2 =0 And y Mod 2=0 D、x Mod 2 =1 And y Mod 2 =1 12、在通用声明中给出Option Base 1语句，则数组a包含（）个数组元素。 Dim a(3, -2 To 1, 5) As Integer A、60 B、75 C、120 D、13 2010年vb期中考试 满分：110分 姓名：________ 1、单项选择题(本题共计40分) 1、函数Cint(–3.5)，Int(–3.5)，Fix(–3.5)的值分别是________。( ) A、-3，–4，–3 B、-4，–4，–3 C、-3，–4，–4 D、-4，–3，–3 2、在VB中，下列关于控件的属性或方法中，搭配错误的有________个。 ①Timer1.Interval ②List1.Cls ③Text1.Print ④List1.RemoveItem ⑤Vscroll1.Value ⑥Picture1.Print ( ) A、0 B、1 C、2 D、3 3、若在一个应用程序窗体上，依次创建了CommandButton、TextBox、Label1等控件，则运行该程序显示窗体时，________会首先获得焦点。( ) A、窗体 B、CommandButton C、Label1 D、TextBox 4、下面的表达试的值为真的是________。( ) A、Mid(“Visual Basic”,1,12)=Right(“Programing Language Visual Basic”,12) B、“ABCRG”> ”abcde” C、Int(134.69) > Cint(134.69) D、78.9/32.77 < = 97.5/43.97 AND –45.4 > 4.98 5、执行语句"Print format(5459.478,"##,##0.00")"，正确的输出结果是________。( ) A、5459.48 B、5,459.48 C、5,459.478 D、5,459.47 6、有如下程序代码： Private Sub Command1_Click( ) s=Sin(3.1415926/2) MsgBox s End Sub 第一部分：客观题 1、 单项选择题 1、在窗体模块的通用段中声明变量时，不能使用的关键字是（ ） A、 Dim B、 Public C、Private D、 Static 2、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是 （ ） A、工程资源管理器窗口 B、工具箱窗口 C、 属性窗口 D、代码窗口 3、若要使某可见控件获得焦点，可使用（ ）方法来实现。 Ａ、Refresh Ｂ、Setfocus Ｃ、Gotfocus Ｄ、Value 4、下列不可作为VB变量名的是（ ） A、ABT1 B、Alpha C、ABC D、4*Delta 5、表达式 5 Mod 3+3\5*2的值是 （ ） A、 0 B、 6 C、4 D、 2 6、下列语句中，正确的赋值语句是（ ） A、 i + j = 10 B、 2i = j C、 j = i + j D、 i * j = 0 7、执行下列程序段后，x的值是（ ）。 n = 4: x = 1: i = 1 Do x = x * i i = i + 1 Loop While i < n A、 2 B、 6 C、 10 D、 14 8、当用户在窗体上单击鼠标时，不会触发的事件是（ ） Ａ、Click Ｂ、MouseDown Ｃ、MouseUp Ｄ、DblClick 9、下列为整型变量的是（ ） A、 x! B、 x# C、x$ D、 x% 10、要从For循环中直接退出循环，可使用的语句( )。 A、Exit Do B、Exit Loop C、Exit For D、Stop 11、下列逻辑表达式中，能正确表示条件“x，y都是奇数”的是 （ ） A、x Mod 2 =1 Or y Mod 2 =1 B、x Mod 2 =0 Or y Mod 2=0 大一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 考试试卷 班级：学号：姓名： 123456789101112131415 一、选择题（每题两分，共十五题） 1.下列叙述中正确的是 (c) A. 只有窗体才是VB中的对象 B.只有控件才是VB中的对象 C. 窗体和控件都是VB中的对象 D.窗体和控件不是VB中的对象 2. 下列可以激活属性窗口的操作是(D) A. 用鼠标双击窗体的任何部位 B.执行“工程”菜单中的“工具箱”命令 C. 按 Ctrl+F4 键 D.按F4键 3. 下列不能打开工具箱窗口的操作是(B) A. 执行“视图”菜单中的“工具箱”命令 B.按 Alt+F8键 C. 单击工具栏上的“工具箱”按钮 D.按 Alt+V键，然后按 Alt+X键 4.假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先 应执行的操作是 (A) A. 单击窗体上没有控件的地方 B.单击任一个控件 C. 不执行任何操作 D.双击窗体的标题栏 5. 为了把窗体上的某个控件变为活动的，应执行的操作是(C) A. 单击窗体的边框 B.单击该控件的内部 C. 双击该控件 D.双击窗体 6. 确定一个控件在窗体上的位置的属性是(D) A. Width 或 Height B. Width和 Height C. Top 或 Left D. Top和 Left 7. 确定一个窗体或控件的大小的属性是(B) A. Width 或 Height B. Width和 Height C. Top 或 Left D. Top和 Left 8. 为了同时改变一个活动控件的高度和宽度，正确的操作是( B) A. 拖拉控件 4 个角上的某个小方块 B.只能拖拉位于控件右下角的小方块 C. 只能拖拉位于控件左下角的小方块 D.不能同时改变控件的高度和宽度 高级语言程序设计（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 VB6.0期中考试试题 班级：______________ 学号：_______________ 姓名：______________ 一、选择题：（共30分，每小题12分） 1、V isual Basic是一种面向( )的程度设计语言。 A、用户 B、事件 C、程序 D、对象 2、在V isual Basic6.0中规定窗体文件的扩展名是（）。 A、frm B、for C、vbp D、bas 3、在V isual Basic代码窗口中，将某一条语句加以注释和说明时，应在语句前加( ) 。 A、逗号（，） B、冒号（：） C、单引号（’） D、问号（?） 4、如果要改变窗体的标题,需要设置窗体对象的_____属性。 A、Name B、Caption C、BackColor D、BorderStyle 5、以下不是Visual Basic特点的选项是（）。 A．可视编程B．算法设计C．事件驱动D．面向对象 6、变量A！的类型是（）。 A．Single B．Integer C．String D．Boolean 7、下列类型的变量中占用字节数最小的是（）。 A．Integer B．Single C．Date D．Byte 8、当运行程序时，系统自动执行启动窗体的某个事件过程。这个事件过程是（）。 A)Load B)Click C)Unload D)GotFocus 9、下面的变量名合法的是（）。 A)k_name B)k ame C)name D)k-name 10、Visual Basic是一种面向对象的程序设计语言，构成对象的三要素是（）。 A)属性、控件和方法B)属性、事件和方法 C)窗体、控件和过程D)控件、过程和模块 11．Visual Basic6.0集成开发环境有三种工作模式，下列不属于三种工作模式之一的是（）。 A．设计模式B．执行模式 C．中断模式D．编写代码模式 试卷方案：201105 Visual Basic 期末考试方案 一、单项选择_共50题（选：20题*1’=20分） 第1题 以下有关对象属性的说法中，错误的是___________. A. 工具箱中的控件并不是VB 中所有的控件 B. 若将Frame 的Enabled 属性设置为False ，则不能使用放置在Frame 里面的控件 C. 对象的Name 属性在运行时不能改变 D. 对象的所有属性都可以在属性窗口中设置 第2题 数学表达式 ||27sin 3 y x e x +++ 的VB 算术表达式为_______ . A. Sin(27)+Sqr(x+Exp3)/(x+y) B. Sin(27*3.14159/180)+Sqr(x+Exp(3))/Abs(x+y) C. Sin(27*3.14159/180)+Sqr(x+e^3)/Abs(x+y) D. Sin(27*pi/180)+Sqr(x+Exp(3)/Abs(x+y) 第3题 下列有关对象的叙述中,正确的是______ A. 对象由属性，事件和方法构成 B. 对象的所有属性既可以在属性窗口设置，又可以在程序运行时用赋值语句设置 C. 对象的事件一定就是由VB 预先设置好的人工干预的动作 D. 对象的方法是对象响应某个事件后执行的一段程序代码 第4题 表达式CInt(4.5)+Cint(-4.51)+Int(4.9)+Int(-4.1)+Fix(-1.9)+0 Mod 2的运算结果是___. A. 1 B. -1 C. –2 D. –3 第5题 下列关于菜单的说法中,错误的是__________. A. 每一个菜单项就是一个对象，并且可设置自己的属性和事件 B. 菜单项不可以响应DblClick 事件 C. VB6.0允许创建超过四级的子菜单 D. 程序执行时，如果要求菜单项是灰色，不能被用户选择，则应设置菜单项的Enabled 属性为False 第6题 以下关于数组的说法中,错误的是__________. A. 使用了Preserve 子句的Redim 语句，只允许改变数组最后一维的上界 B. 对于动态数组, Redim 语句可以改变其维界但不可以改变其数据类型 C. Erase 语句的功能只是对固定大小的数组进行初始化 D. Lbound 函数返回值是指定数组某一维的下界 第7题 设a=3,b=2,c=1,运行print a>b>c 的结果是____________. A. True B. False C. 1 D. 出错 第8题 2010—2011年度上学期期中考试试卷 科目：VB 班级：________ 姓名：________ 得分： 一.、判断题(每题1分) 1.( )在一行中有多条语句时，逗号"," 可作为语句间的分隔符。 2.( )表达式Int(Rnd * 4 + 0.5)可能的全部值是1,2,3,4。 3.( )在标准模块的声明段定义一个全局变量时，用关键字Public来声明。 4.( )命令按钮不但能响应鼠标的单击事件，而且能响应双击事件。 5.( )定时器控件的名称为time。 6.( )窗体的加载事件是load事件。 7.( )‘A’的ASCII码值是65。 8.( )VB中运行程序的快捷键是F5。 9.( )向窗体中添加控件可双击工具栏中所要的控件。 10.( )len函数表示取字符串长度的函数。 11.( )控件的属性不可以在程序运行时动态的修改。 12.( )在VB中程序注解可以在被注释语句前加“：”。 13.( ) Click事件，就是鼠标单击事件。 14.( )在VB中，变量在使用前可以不声明。 15.( )在程序执行的过程中，变量的值始终保持不变，常量的值随时改变。 二.填空题:(每空格2分) 1.下列函数的值分别为: A.int(-6.14159) ______________ B.len([abcdefg") ______________ C.left([abcdefadfag".6) ______________ D.mid([abcdefgh".4.3) ______________ 2.VB中若要产生一消息框，可用_____________函数来实现 3.常量是指在程序运行过程中，_________________的量 4.整数类型数据分别包括整型和________________数据。 5.随机函数的函数取值范围是____________ 6.定义一个整型变量a：______________ 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试题 一、选择题（每题2分，20题，共40分。每题只有一个答案，请将最合适的答案填在题前的括号内，不选、选错、多选均不得分。） ( )1、以下不属于Visual Basic系统的文件类型的是： A．.frm B．.cls C．.bat D．.vbp ( )2、Visual Basic 是一种可视化、面向对象的程序设计语言，采取( )的编程机制。A．按模块顺序执行B．从主程序开始执行 C．事件驱动D．按过程顺序执行 ( )3、使用Visual Basic编程，我们把工具箱的工具称为： A．事件B．工具C．控件D．窗体 ( )4、下面（）是合法的变量名。 A．x_yz B．123ab C．integer D．x-y ( )5、表达式16/4-2^5*8 Mod 5\2 的值为（） A．14 B．4 C．20 D．2 ( )6、Visual Basic程序可以多条语句书写在一行，各语句之间的分隔符是： A．：（冒号）B．；（分号）C．□（空格）D．*（星号） ( )7、在Visual Basic 中最基本的对象是（）,它是应用程序的基石，它是其他控件的容器。 A．命令按钮B．文本框C．窗体D．标签 ( )8、下面定义窗体级变量a的语句中错误的是： A、Dim a% B、Private a% C、Private a As Integer D、Static a% ( )9、文本框没有（）属性 A、Endabled B、Visible C、BackColor D、Caption ( )10、要把一个命令按钮设置成不可见，应设置Visible属性值为（） A．True B．False C．Default D．Cancel ( )11、计时器控件中要求每隔0.1秒触发一次Timer事件，那么计时器控件的Interval 属性应该设置为（） A. 1 B.10 C. 100 D. 1000 ( )12、若要使逻辑表达式x>y And yVB期末考试试题及答案
vb期末考试试题
2016~2017第一学期期中考试高中三年级VB试卷
九江学院VB期末考试题目及详细答案
VB期中考试题
vb期末考试试题
VB期末考试试题及答案 (1)
2010年vb期中考试试卷及答案
VB期末考试试题
大一VB期末考试试卷及答案
初三_vb期末考试试卷+答案
VB期末试卷(A卷带答案)
VB期中考试试卷
VB期末考试题库及答案
VB期中考试试卷(Visual Basic)
大学VB期末考试试题
期中考试VB试题