VB期末考试试题（A卷）
一、选择题
1.要改变控件的宽度，应修改该控件的（ B ）属性。
A、TOP
B、width
C、Left
D、Height
2.将命令按钮Command1设置为不可见，应修改该命令按钮的（A）属性。
A、Visible
B、Value
C、Caption
D、Enabled
3.单机滚动条两端的任何一个滚动箭头，将触发该滚动条的（ C ）事件。
A、Scroll B 、KeyDown C、change D、Dragver
4.（ D ）对象具有clear方法。
A、图片框
B、窗体
C、复选框
D、列表框
5.中心定义图片框控件的坐标系统，可采用该图片框的
（ A ）
A、scale
B、Scale X
C、scale Y
D、setFocus
6.将通过对话框CommdDialog1的类型设置成另存为对话框，可调用该控件的（ B）方法。
A、Showopen
B、Showsave
C、ShowColor
D、ShowFont
7.形状控件所显示的图形不可能是（ D ）
A、圆
B、椭圆
C、圆角正方形
D、等边三角形
8.由Fro K=10 TO oslept 3：next K循环语句控件的循环次数是（ B ）
A、12
B、0
C、-11
D、-10
9.下列数据类型中，占用内存最大值是（ D ）
A、Boolwan
B、Byte
C、Lnteger
D、Single
10.如果在图片框上使用绘图方法绘制一个实心圆，则图片框的（ C ）属性决定了该图片的颜色。
A、BackColro
B、Forelklor
C、Fillcolor
D、Dlawstyle
一、选择题
1.要在垂直位置上移动控件，应利用控件的（C）属性。
A、Left
B、Width
C、Top
D、Height
2.要在文本框中的文本显示掩码（密码）符，在属性设置时，首先必须设置（ D）属性为False。
A、Txet
B、Enabled
C、Visible
D、Multline
3.用键盘的光标键选中某一菜单项，并按回车触发菜单的
（ C ）的事件。
A、KeyPress
B、KeyDown
C、Click
D、Keyllp
4.一下（ D ）对象不具有Clear方法。
A、列表框
B、组合框
C、剪贴框
D、图片框
5.软件列表中设定“文件列表”显示文件类型应改该控件的（ D ）属性。
A、Path
B、FileName
C、Name
D、Patterw
6．组合框有三种风格，它们由Style属性所决定，其中为
简单组合框时，Style属性值应为（ B ）
A、0
B、1
C、2
D、3
7.下列可调整图片框的大小以适合图片的属性是（ B ）
A、Stretch
B、autosize
C、picture
D、oledropmode
8.要想清除文本框中的内容则可利用（ A ）进行。
A、Caption
B、Text
C、Clear
D、Cls
9.下列表达式中，其值为0的是（ C ）
A、7/9
B、7mod 15
C、7\9
D、15 mod 9
10.求以10 为底X的常用对数的表达式为（ A ）
A、LoG（X）/LoG（10）
B、LN（X）
C、LoG（X）/LoG(E)
D、LoG（X）
二、填空题（每空2分，共20分）
1．代数式的Visual Basic 表达式是
sqr((x^3+exp(-6)*log(y))*atn(a*180)/(x*x+y*y))
2.设x=2,y=4,a=4,b=6,表达式（a>x Xor b y 3．a 和b 中有仅只有一个不为1，相应的Visual Basic逻 辑表达式为 a<>1 xor b<>1。 4．把条件为1￡ x ￡ 5 写成VB表达式为:x>=1 and x<=5。 5. 语句Line(1000,1000)-Step(2000,1500),vbRed,BF的含 义是：在窗体上绘制以角点为（2000，2000）和（4000，3500）的红色实心的矩形。 6．用随机函数产生10个100～500的整数，其表达可为：for I=1 to 10 a(i)=100+int(400*rnd) next I。 7．当x=2时，语句if x=2 then Print x=2 的结果值是True。 8. Static Private Sub cmdSum_Click() Dim Sum as integer Sum=2*Sum+1 End Sub 问：第三次单击命令按钮cmdSum后，Sum的值为：7。9．声明单精度常量g(重力加速度)代表9．8可写成：const g=。 10．欲使在自己设计VB程序运行过程中，不中止本程序的运行，同时又可调用系统中已有的应用程序c:\windows\, 可在程序代码窗口必要的地方添加语句： shell(“c:\windows\”)。 三、编程题 1随机产生n个两位正整数（n由对话框输入，切n>0)。求出其中的偶数之和，并在标签框Labol1上显示。 程序写在命令按钮Command1的click事件中。 Private Sub Command1_Click() Dim n As Integer Dim i As Integer, sum As Long n = Val(InputBox("Please input a integer", "Input N value")) For i = 1 To n rnddat = (10 + Int(90 * Rnd)) If rnddat Mod 2 = 0 Then sum = sum + rnddat End If Next i = sum End Sub 2由输入对话框中输入100个数值数据，放入数组a，将其中的整数放入数组b，然后运用选择分类将数组b中的数据按从大到小的顺序排列，并以每行5个数据在窗体上输出。注：程序写在窗体form的click事件上。 Private Sub Form_Click() Dim a(1 To 100) Dim b() as integer Dim i As Integer, j As Integer, k As Integer, pos As Integer,temp as integer For i = 1 To 100 a(i) = Val(InputBox("Please input data")) If a(i) = Int(a(i)) Then j = j + 1 ReDim Preserve b(j) b(j) = a(i) End If Next i For k = 1 To j - 1 pos = k For m = k To j If b(m) < b(pos) Then pos = m Next m If k <> pos Then temp = b(k) b(k) = b(pos) b(pos) = temp End If Next k For k = 1 To j If k Mod 5 = 0 Then Print b(k) Else Print b(k); Next k End Sub 四、程序阅读题（每小题6分，共18分） 1．程序1： Dim Y As Integer Private Stub Command_Click() Dim X As Integer X=1 Y=1 Call AA(Y+1) Z=BB(X) Print X, Y, Z End Sub Private Sub AA(ByVal Z As Integer) Y = Z + X Z = X + Y End Sub Private Function BB (ByRef Y As Integer) Y = Y + 1 BB=X + Y End Function 结果：（ 2 2 2 ） 2．程序2： private sub Form_click() N = 3 Dim A(3，3) As Integer For I = I To N For J = I To N A(I, J) = (J – l) * N + I Next J Next I For I = 2 To N For J = 1 To I – 1 TEMP = A(I, J) A(I, J) =A(J, I) A(J, I) = TEMP Next J Next I For X = 1 To N Print X, A(X, N +X - I), A(X, X) Next X End Sub 结果：（ 1 0 4 2 7 8 3 11 12 ) 3．程序3： Private Sub Form_click() Dim f1 As Integer,f2 As Integer,f3 As Integer Open "c:\"For Output As #1 f1=2:f2=3 Print #1,"NO."; 3,f1 Print #1,"NO."; 4,f2 For I=5 To 7 f3=f1+f2 Print #1,"NO.";I,f3 f1=f2 f2=f3 Next I Close #1 End Sub 写出文件的最终结果。（ 2 3 5 8 13） 五、程序填空题（每小题9分，共18分）1.从计算机输入三个数,找出中间数 Private Sub FindMidNum( ) X=INPUTBOX(“PLEASE INPUT THE FIRST NUMBER”) Y=IN PUTBOX(“PLEASE INPUT THE SECOND NUMBER) Z=INPUTBOX(“PLESSE INPUT THE THIRD NUMBER) IF（X A=X X=Y Y=A ENDIF IF （Y>=Z）THEN PRINT Y ELSEIF （X>=Z） THEN PRINT Z ELSE PRINT X ENDIF End Sub 2. 打印以下杨辉三角形 1 1 1 1 2 1 1 3 3 1 1 4 6 4 1 1 5 10 10 5 1 Dim Q() As Integer N = InputBox("PLEASE INPUT N") ReDim Q(N, N) For I = 1 To N For J = 1 To N Q(I, J) = （0） Next J Next I For K = 0 To（N – 1） Q(K + 1, 1) = 1 Print 1; For I = 1 To K Q(K + 1, I + 1) =（ Q(K, I + 1)） + Q(K, I) Print（Q(K + 1, I + 1)） Next I Print Next K VB期末考试试题（B卷） 1．下列代数式的Visual Basic表达式是（）。 二、填空 2．设x为大于零的实数，则大于x的最小奇数的Visual Basic 表达式是_ IIF(int(x) mod 2=0,int(x)+2,int(x)+1)。3． a1和a2之中有且只有一个与a3的值相等，相应的Visual Basic逻辑表达式是:__ a1=a3 xor a2=a3。若a1和a2之中没有一个与a3的值相等，则相应的表达式是：__ a1<>a3 and a2<>a3___。 4．设init的初值为10，则由下列循环语句控制的循环次数是__6__。 Do While init>=5 init=init-1 Loop 5.在Visual Basic 中，变量从它的作用范围来看，可分为_全局变量___、_模块级变量_____和___过程级变量__ 三种。6．语句(800,1000),500的含义是_以圆心为（800，1000）半径为500的圆_。 7．声明定长为10个字符变量Sstr的语句为：_Dim Sstr as String*10_。 三、程序阅读题，阅读下列程序书写结构。 程序1 Private Static Sub Command1_Click() Dim x As Integer, s As Integer x = Val(InputBox("请输入一个正整数＝")) If x < 5 Then s = s * x Else s = s + x End If = "s=" + Str(s) End Sub 程序运行时连续三次单击Command1，且设输入的数是5，2和4时，分别写出文本框的值。 结果：（s=5 s=10 s=40 ） b)程序2 Private Sub Form_Click() w = 3 For k = 2 To 6 Step 2 "w="; w, "k="; k w = w + 1 Next k "w="; w, "k="; k End Sub 写出程序运行时单击窗体后，Form１上输出结果。 结果为：（ w=3 k=2 W=4 k=4 W=5 k=6 W=6 k=8 ） c)程序3 Rem 在窗体的通用声明区声明两个模块级变量a和y Dim a As Integer, y As Integer Private Sub Form_Load() Open "c:\" For Output As #1 Close #1 End Sub Private Sub Command1_Click() Open "c:\" For Append As #1 Call aa(5) y = y + a Print #1, "y="; y, "a="; a: Close #1 End Sub Sub aa(i As Integer) x = 1 Do Until x > i a = a + x x = x + 3 Loop End Sub 写出程序运行时连续三次单击Command1后，文件的最终结果为：（ y=5 a=5 y=15 a=10 y=30 a=15 ） 五、程序填空题（每小题9分，共18分） a)程序说明:利用一个计时器、一个标签框和二个命令按钮制作一个动态秒表，如图１所示。单击“开始“命令按钮，秒表开始计时，单击“结束“命令按钮，秒表结束计时，并在标签框显示运行时间，如“运行了０小时２分１０秒“。（假设对象的属性都在程序代码中设定）。 Dim x As Long Dim h As Integer, m As Integer, s As Integer Private Sub Form_Load() = "动态秒表（小时：分：秒）" = "开始[&S]" = "结束[&E]" = 2 '居中对齐 = "0:0:0" =__1000______ = False x = 0 End Sub Private Sub Command1_Click() _=True___ End Sub Private Sub Command2_Click() = False x=_0___ = "运行了" + Str(h) + "小时" + Str(m) + "分" + Str(s) + "秒" End Sub Private Sub Timer1_Timer() x = x + 1 h=_x\3600______ m = (x Mod 3600) \ 60 s=_(x mod 3600) mod 60__ = Str(h) + ":" + Str(m) + ":" + Str(s) End Sub b)程序说明: 已知自然对数的底数e的级数表示如下: e=1+1/1!+1/2!+1/3!+......+1/n!+..... 本程序利用函数过程fact()求e，其中绝对值小于1E-8的项被忽略。 程序代码如下: Private Function fact(m As Integer) As Single ' 求Ｍ！的函数 Dim x As Single, i As Integer x = 1 for i=1 to m : x=_x*i__ :Next i fact = x End Function Private Sub Form_Click() Dim e As Single, item As Single Dim n As Integer e=1 : n=__0____ Do n = n + 1 item=__1/fact(n)____ e = e + item Loop while _item>= "e="; e End Sub 二、选择题 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 。 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 大一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) 第一部分：客观题 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期末考试试题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）。 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 √ 20**-20**学年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 【HNCE网上考试系统 v9.6】本套软件使用权属于：郑州大学 考试课程: 考试时间:100分钟考场:第一考场考试日期:2013.05.24 考号：姓名：剩余时间：99:42 保存交卷退出帮助 A B C D A B C D A B C D A B C D A B C D A B C D A B C D A 命令 B 命令 C 命令 D 命令 A B C D A B C D A B C D A B C D A B C D A B C D A B C D A 模块文件 B 件的属性 C 源文件 D 包含多个工程文件及属于该工程的其他文件 A 该窗体文件并没有被删除 B 窗体文件被删除 C 程仍然包含这个窗体 D A B C D A B C D A B C D A B C D A可以实现交换两个变量值，而S2不能 B 个变量值，而S1不能 C 现交换两个变量值 D 现交换两个变量值 A B C D A B C D A 过程调用后均不保存值 B 有变量都是Static型的变量 C 所有变量都是Private型的变量 D 所有变量都是非全局Public A 用Dim语句或Static语句声明的变量 B 明它的过程 C Static语句声明的 D 程执行完毕后就被释放了 A B C D A B C D A B C D A B C D 声明段 A B C D A B C D A B C D A B C D A B C D A B C D A 同 B Sub过程不可以 C 值，而Function过程能通过过程名返回值 D 或直接使用过程名调用，而 A工程中可以有多个窗体，但最多只能有一个窗体作为启动窗体 B 声明Public类型的变量来传递数据 C 大化、最小化或正常（保持设计时大小）等三种状态 D A 菜单 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 VB期末考试试题及答案 一、填空题 1、VB程序设计的主要特点是可视化设计和事件 编程。2、在VB中，最主要的两种对象是窗体 （form）和控件。 3、工程是构成应用程序文件的集合。 4、方法是VB提供的一种特殊子程序，用来完成一定的操作。 5、浮点类型数据包括单精度型和___双精度__数据。 6、事件是窗体或控件对象识别的__动作____。 7、可用窗体的__print_ 方法在窗体中显示文字。 8、复选框控件Value属性指示复选框处于____选中___或禁止状态(暗淡的)中的某一种。 9、在VB中，修改窗体的高度（height）和宽度（width）属性值，可改变窗体的大小。 10、双击工具箱中的控件图标，可在窗体的中央出现一个尺寸为缺省值的控件。 11、在MsgBox函数中，如果缺省title参数，则使用工程1 作为消息框的标题。 12、设x＝34.58，语句Print Format(x,“000.0”)的输出结果是34.6 。 13、在VB 中，数值型变量的初值为0 ，Varant型变量的初值 为空，布尔型变量的初值为FALSE 。 14、设置窗体的picture 属性，可在窗体上显示图片。 15、程序运行工程中，清除MP图片框中的图片应使用语句cls 。 二、选择题 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 。 VB 期末考试试卷及答案 一·选择题 1.Visual Basic是一种面向对象的程序设计语言，构成对象的三要素是（ B ） A 属性、控件和方法 B 属性、事件和方法 C 窗体、控件和过程 D 控件、过程和模块 2.所有控件都有一个共同的属性，这个属性是（ C ） A text B font C name D caption 3.下列叙述中错误的是（ A ） A工程文件扩展名是 .vbgB 标准模块文件的扩展名是 .basC窗体模块的扩展 名是 .frmD 类模块的扩展名是 .cls 4.当要编写一个新的 Visual Basic程序时，所做的第一件事是（ A ）A xx 一个工程 B 编写代码 C 设置属性 D 添加 Active X控件 5.下面控件中，没有caption 属性的是（ B ） A框架B组合框 C 命令按钮 D 复选按钮 6.在文件框中输入字符时，若只显示某个字符，如（* ），应设置属性是（B）A MultiLine B PasswordChar C Text D selText 7.若要将窗体从内存中卸载出去，其实现的方法是（ D ） A Show B Hide C Load D UnLoad 8.下列关于过程叙述不正确的是（ D ） A过程的传值调用是将实参的具体值传值传递给形参 B过程的传址调用是将实参在内存的地址传递给形参 C过程的传值调用参数是单向传递的，过程的传址调用参数是双向传递的 D无论过程传值调用还是传地址调用，参数传递都是双向的 9.某人创建 1 个工程，其中的窗体名为Form1，之后又添加了 1 个名为Form2 的窗体，并希望程序执行时先显示Form2 窗体，那么，他需要做的工作 是（ C ）A 在 Form1 的 Load 事件过程中加入语句Load Form2 B 在 Form2 的 Load 事件过程中加入语句Form2.Show C在“过程属性”对话框中把“启动对象”设置为 Form2 D在 Form2 的 TabIndex 属性设置为 1，把 Form1 的 TabIndex属性设置为 2 10.以下关于文件的叙述中，正确的是（ B ） A 以 Output 方式打开一个不存在的文件时，系统将显示出错信息 B 以Append 方式打开的文件，既可以进行读操作，也可以进行写操作 C 在随机文件在，每个记录的长度是固定的 D无论是顺序文件还是随机文件，其打开的语句和打开的方式都是完全相 同的 11.设 a=6，b=8，c=10则函数 IIf(a 如果要将窗体中的某个命令按钮设置成运行时无法显示，应该设置它的属性。 类是对象的抽象，对象则是类的具体化。在窗体上建立的一个控件称为。 能够获得一个文本框中被选取文本的内容的属性是。 以下属于Visual Basic合法的数组元素是。 设置命令按钮的属性时，只有将属性设置为1，Picture属性才有效，否则无效。 VB有三种工作模式，它们分别是___________模式。 下列函数中，________函数返回的值是数值型的。 类是对象的抽象，对象则是类的具体化。在窗体上建立的一个控件称为。 以下控件中没有Print方法是( ) 以下叙述中错误的是 ( ) A）打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件 B）保存Visual Basic程序时，应分别保存窗体文件及工程文件 C）Visual Basic应用程序只能以解释方式执行 D）事件可以由用户引发，也可以由系统引发 下列数组声明语句中的数组a包含了_________个数组元素。( ) Dim a(4,-1 to 1,0 to 3) 复选框的Value属性为0时，表示( ) 复选框的Value属性为2时，表示( ) 主过程通过参数传递将一个参数传递给子过程A，并能够通过参数传递返回一个结果，下列子过程的正确定义 以下不属于Visual Basic系统的文件类型是。 A）.frm B）.bat C）.vbg D）.vbp 按变量名的定义规则，是合法定义的变量名。 结构化程序由三种基本结构组成，下面属于三种基本结构之一的是_______ 执行以下程序段后，变量c$的值为________。 a$="Visual Basic Programming" VB期末考试试题（A卷） 一、选择题 1.要改变控件的宽度，应修改该控件的（ B ）属性。 A、TOP B、width C、Left D、Height 2.将命令按钮Command1设置为不可见，应修改该命令按钮的（A）属性。 A、Visible B、Value C、Caption D、Enabled 3.单机滚动条两端的任何一个滚动箭头，将触发该滚动条的（ C ）事件。 A、Scroll B 、KeyDown C、change D、Dragver 4.（ D ）对象具有clear方法。 A、图片框 B、窗体 C、复选框 D、列表框 5.中心定义图片框控件的坐标系统，可采用该图片框的（ A ） A、scale B、Scale X C、scale Y D、setFocus 6.将通过对话框CommdDialog1的类型设置成另存为对话框，可调用该控件的（ B）方法。 A、Showopen B、Showsave C、ShowColor D、ShowFont 7.形状控件所显示的图形不可能是（ D ） A、圆 B、椭圆 C、圆角正方形 D、等边三角形 8.由Fro K=10 TO oslept 3：next K循环语句控件的循环次数是（ B ） A、12 B、0 C、-11 D、-10 9.下列数据类型中，占用内存最大值是（ D ） A、Boolwan B、Byte C、Lnteger D、Single 10.如果在图片框上使用绘图方法绘制一个实心圆，则图片框的（ C ）属性决定了该图片的颜色。 A、BackColro B、Forelklor C、Fillcolor D、Dlawstyle 一、选择题 1.要在垂直位置上移动控件，应利用控件的（C） VB期末考试试题B卷 一、填空题 1.ＶＢ中若要产生一消息框，可用__（1）__函数来实现。 2．常量是指在程序运行过程中，其值不能改变（2）的量。 3．整数类型数据分别包括整型和（3）数据。 ４、在ＶＢ集成开发环境中，运行应用程序的方法有三种：一是_(单击“运行”菜单下的启动4)__；二是_(5) 单击工具栏上的启动 按钮_；三是_(6) 按Ｆ5键。 ５、在ＶＢ中若要让某对对象获取焦点，则可通过__ Setfocus (7)_方法来实现。 6．列表框（ListBox控件）显示项目列表(8) ，用户可从中选择一个或多个项目。 7．框架（Frame控件）可以用来(9) 对其它控件进行分组，以便于用户识别，主要用于为单选按钮分组。 ８、在ＶＢ中，用来描述对象外部特征的量称之为对象的_(10)_ 属性_。９、为使某窗口中的命令按钮“取消(C)”具有如下特性：按“Alt＋C”键或按“ESC”键，均可代替用鼠标单击该按钮的操作，应设置该按钮的Caption属性值为_取(&C) _(11)___，并且设置其__(12)__属性值为__（13）__。 10、在过程内用_（14）__声明的变量为静态变量，在执行一个过程结束时，过程中所用到的Static变量的值会保留，下次再调用此过程时，变量的初值是上次调用结束时被保留的值。 11、在模块文件中的声明部分用Global或__（15）__关键字声明的变量为全局变量。 12、在模块文件中的声明部分用__（16）__或__（17）__定义的变量为模块级变量。 13．计时器控件通过定期激活Timer事件，使得Timer控件（18）就执行一次Timer事件中的代码。 14．要获得滚动条的当前位置，可以访问通过（19）属性来实现。 15．关闭正在运行的VB窗口将自动触发的事件是（20）。 二、选择题 1．工程文件的扩展名是（ B ）。 A．vbg B.vbp C.vbw D.vbl 2.在以下窗体中没有采用的控件是（）。 A.文本框 B 垂直滚动条C．框架 D 命令 按钮 3．滚动条控件（如图所示）的Largechange属性所设置的是（）A．单击滚动条和滚动箭头之间的区域时，滚动条控件Value属性值的改变量 B．滚动条中滚动块的最大移动位置 C．滚动条中滚动块的最大移动范围 D．滚动条控件无该属性 4、用于从字符串左边截取字符的函数是（） Ａ、Ltrim( )Ｂ、Trim( )Ｃ、Left( )Ｄ、Instr( ) 5、可获得当前系统日期的函数是（A） Ａ、Date( )Ｂ、Time( )Ｃ、IsDate( )Ｄ、Year( ) 6、退出For循环可使用的语句为（） Ａ、Exit ForＢ、Exit DoＣ、End ForＤ、End Do 期期末末考考试试题题 一、单项选择题（共10分） 1．在代码中引用一个控件时，应使用控件的（ ）属性。 A ．Caption B ．Name C ．Text D ．Index 2．设变量x = 4，y = -1，a = 7，b = -8,下面表达式（ ）的值为“假”。 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产生的随机整数范围是（ ）。 A ．（10，80） B ．（10，81） C ．[10，80] D ．[10，81] 4．函数Sgn(3.1416)的返回值是（ ）。 A ．-1 B ．0 C ．1 D ．以上都不对 5．67890属于（ ）类型数据。 A ．整型 B ．单精度浮点数 C ．货币型 D ．长整型 6．下列变量名中正确的是（ ）。 A ．3S B ．Print C ．Select My Name D ．Select_1 7．下列赋值语句（ ）是有效的。 A ．sum = sum -sum B ．x+2 = x + 2 C ．x + y = sum D ．last = y / 0 8．以下的控件或方法具有输入和输出双重功能的为（ ）。 A ．Print B ．Textbox C ．Optionbutton D ．Checkbox 9．若要获得列表框中被选中的列表项的内容，可以通过访问（ ）属性来实现。 A ．Name B ．ListIndex C ．ListCount D ．Text 10．下列代码的运行结果为（ ）。 Private Sub command1_click() Dim m(10) For k = 1 To 10 m(k) = 11 – k next k 安全土木化工化学vb练习题4 满分： 111 分 姓名： ________ 1、单项选择题(本题共计60 分) (1、在过程调用中，参数的传递可以分 为 ) ________________ 和 ________________ 两种方式。 A 、按值传递 B 、按地址传递 C、按参数传递 D、按位置传递 按地址传递 按参数传递 按值传递 按参数传递 2、下面的过程定义语句中合法的是________________________。() A 、 Sub Procl (ByVal n () ) B 、Sub Procl ( n ) As Integer C、 Function Procl (Procl ) D、 Function Procl (ByVal n ) 3、在参数传递过程中，使用关键字________________ 来修饰参数，可以使之按值传递。( ) A 、 ByVal B 、ByRef C、 Value D、 Reference (4、要想在过程调用后返回两个结果，下面的过程定义语句合法的 是 ) ________________ 。 A 、 Sub Procl ( ByVal n , ByVal m) B 、Sub Procl ( n , ByVal m) C、 Sub Procl ( n , m) D、 Sub Procl ( ByVal n , m) 5、通用过程可以通过执行“工具”菜单中的____________ 命令来建立。( ) A、添加过程 B、通用过程 C、添加窗体 D、添加模块 6、可以在窗体模块的通用声明段中声明的是________________ 。( ) A、全局变量 B、全局常量 C、全局数组 D、全局用户自定义类型 7、当运行程序时，系统自动执行启动窗体的____________ 事件过程。( ) A 、 Load B、Click C、 UnLoad D、 GotFocus VB期末考试试卷及答案 一·选择题 1.Visual Basic是一种面向对象的程序设计语言，构成对象的三要素是（ B ） A属性、控件和方法 B属性、事件和方法 C窗体、控件和过程 D控件、过程和模块 2. 所有控件都有一个共同的属性，这个属性是（ C ） A text B font C name D caption 3. 下列叙述中错误的是（ A ） A 工程文件扩展名是.vbg B 标准模块文件的扩展名是.bas C 窗体模块的扩展名是.frm D 类模块的扩展名是.cls 4. 当要编写一个新的Visual Basic程序时，所做的第一件事是（ A ） A 新建一个工程 B 编写代码 C 设置属性 D 添加Active X控件 5. 下面控件中，没有caption属性的是（ B ） A 框架 B 组合框 C 命令按钮 D 复选按钮 6. 在文件框中输入字符时，若只显示某个字符，如（*），应设置属性是（ B ） A MultiLine B PasswordChar C Text D selText 7. 若要将窗体从内存中卸载出去，其实现的方法是（ D ） A Show B Hide C Load D UnLoad 8. 下列关于过程叙述不正确的是（ D ） A 过程的传值调用是将实参的具体值传值传递给形参 B 过程的传址调用是将实参在内存的地址传递给形参 C 过程的传值调用参数是单向传递的，过程的传址调用参数是双向传递的 D 无论过程传值调用还是传地址调用，参数传递都是双向的 9. 某人创建1个工程，其中的窗体名为Form1，之后又添加了1个名为Form2的窗 体，并希望程序执行时先显示Form2窗体，那么，他需要做的工作是（ C ） A 在Form1的Load事件过程中加入语句Load Form2 B 在Form2的Load事件过程中加入语句Form2.Show C 在“过程属性”对话框中把“启动对象”设置为Form2 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 mand1_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、 boBox D、 11、若要将窗体从内存中卸载出去,其实现得方法就是 D 。 安全土木化工化学vb练习题4 满分：111分 姓名：________ 1、单项选择题(本题共计60分) 1、在过程调用中，参数的传递可以分为________________和________________两种方式。() A、按值传递按地址传递 B、按地址传递按参数传递 C、按参数传递按值传递 D、按位置传递按参数传递 2、下面的过程定义语句中合法的是________________________。() A、SubProcl(ByValn()) B、SubProcl(n)AsInteger C、FunctionProcl(Procl) D、FunctionProcl(ByValn) 3、在参数传递过程中，使用关键字________________来修饰参数，可以使之按值传递。() A、ByVal B、ByRef C、Value D、Reference 4、要想在过程调用后返回两个结果，下面的过程定义语句合法的是________________。() A、SubProcl(ByValn,ByValm) B、SubProcl(n,ByValm) C、SubProcl(n,m) D、SubProcl(ByValn,m) 5、通用过程可以通过执行“工具”菜单中的____________命令来建立。() A、添加过程 B、通用过程 C、添加窗体 D、添加模块 6、可以在窗体模块的通用声明段中声明的是________________。() A、全局变量 B、全局常量 C、全局数组 D、全局用户自定义类型 7、当运行程序时，系统自动执行启动窗体的____________事件过程。() A、Load B、Click C、UnLoad D、GotFocusVB期末考试试题及答案
vb期末考试试题
大一VB期末考试试卷及答案
VB期末考试试题
大学VB期末考试试题
电大VB期末考试
【期末复习】计算机VB期末考试试题及答案
VB期末考试模拟题1讲解
VB期末试卷(A卷带答案)
VB期末考试试题及答案
VB期末考试试卷及答案.doc
VB期末考试复习题目
VB期末考试试题(A、B卷)[1]
VB期末考试试题 B卷
Vb期末考试题
南京工业大学VB期末考试模拟题6
VB期末考试考卷及答案
VB期末考试试题及答案
南京工业大学VB期末考试模拟题6
相关主题
文本预览