VB6.0总复习题

VB6.0总复习题 一、基本概念

1、在设计窗体时双击窗体的任何地方，可以打开的窗口是（代码窗口,而F4键不能打开） 2、以下说法正确的是（一个窗体对应一个窗体文件 ）。工程文件的扩展名是 .vbq 3、设置窗体最小化时的图标可通过（Icon ）属性来实现 p18表2-1

4、如果要实现当鼠标暂时停留在一命令按钮上时，显示提示信息，应设置此命令按钮的（ ToolTipText ）属性。

5、如果要实现窗体从内存中卸载，其实现的方法是（UnLoad ）。

6、当文本框的MaxLength属性值取（ 0 ）时，该文本框能容纳的字符数最多。 7、焦点：使文本框获得焦点的方法是（SetFocus ）。

8、当运行程序时，系统自动执行启动窗体的某个事件过程。这个事件过程是（GotFocus）GotFocus 事件过程用以指定当控件或窗体首次接收焦点时发生的操作。 9、若使用Textbox控件时，为对用户输入的内容立即进行检查，就对Textbox控件的（Change）事件编程。

10、所有控件都具备的属性是（Name）。

11、命令按钮 对象不支持DblClick事件。

12、下列4个选项中，不是VB数值常量的是（2E1.4 ）。 13、变量名不合法的是（M-d ）,合法的是（k_name ） 14、表达式\的值是（ \” ）。

15、VB6.0中执行时出现错误的是（x = Sqr(-4) x = Exp(800) ） 16、Sgn(x)的值为-1，则x的值是（小于0的数 ）。

// Sgn(x): 返回自变量x的符号，即当x为负数时，返回-1；当x为0时，返回 0;当x为正数时，返回1

17、VB的叙述中正确的是（数组下标的下界在默认情况下从0开始 ）。

18、VB的叙述中不正确的是（使用ReDim语句可以改变数组的类型 ）。

19、在VB中声明了Variant变量，但未赋值，则系统默认其初始化值为（Empty）p40。

20、确定字符串str2在字符串str1中起始位置的函数是（Instr）p46。 21、表达式# 9/10/2009 – 5 的运算结果是（2009-9-5 ）p49。 22、表达式Int ( Rnd * 30 + 2 )的取值范围为（[2，31] ）。 23、运行下面的程序后，单击命令按钮，则在窗体上输出（ ）。

Print Format( 4123.479，\ 412347.9% ==（以百分号显示 ）

24、关于MsgBox函数的说法中，正确的是MsgBox函数的第三个参数是Title，表示对话框的标题显示在对话框窗口顶部的标题栏区 p63

25、对象.cls方法对（ 窗体、图片框 ）控件有效。P18 26、若想使时钟控制每隔0.25秒触发一次Timer( )事件，则可将Interval属性值设为（250 ）。

27、（窗体、图形框、框架 ）组中的所有控件，可以在用户界面上作为其他控件的容器。

28、若希望分成两组使用多个Option Button控件，能完成这一功能的控件是( Frame) P96 p106;

29、在窗体上画一个名称为Check1的复选框，在程序运行的过程中，若选中复选框，则Check1.Value的值是（ 1 ）。 30、每次单击滚动条两端箭头时，滚动条输出的变化值是5，应设置它的（SmallChange ）属性。

31、引用列表框List1最后一个数据项应使用（List1.List(List1.ListCount - 1) ）。 32、窗体的MouseDown事件过程:

1

Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single ) 有4个参数，关于这些参数，正确的描述是（通过Button参数判定当前按下的是哪一个鼠标键 ）。

二、读程序运行写结果

1、Do Until…Loop循环命令的功能是（ ）。

（执行前先判断是否不满足条件，若不满足才进入循环）

2、将当前页面跳转到\的ASP代码是（Response.Redirect \ ）。

A、Response.Goto \ B、Request.Goto \C、Response.Redirect \ D、Request.Redirect “Test.asp”

3、执行下列程序，单击命令按钮后在窗体上输出结果是（ ）。

Private Sub Command1_Click( ) Dim A As Integer A% = 456 : A = 232.45 B = 235

Print A%，A

End Sub

（232 232 ） 4、执行以下程序段

a$ = “abbacddcba”

For i = 6 To 1 Step -2 X = Mid(a,i,i) Y = Left(a,i) Z = Right(a,i)

Z = UCase(X & Y & Z) Next i Print Z

输出结果为（ BBABBA ）。

5、在一个列表框List1中已按序放入ONE、TWO、THREE、FOUR、FIVE、SIX 6个字符

串数据项，执行下面的程序后： Private Sub Form_Click( ) For i = 1 To 3

List1.RemoveItem i Next i End Sub

列表中的数据项是（ ONE、THREE、FIVE ）。 6、执行下面的程序后，x的值为（ ）。

x ＝ 50

For i = 1 To 20 Step 2 x = x + i \\ 5 Next i （66） 7、如下程序：

2

Private Sub Form_Click( ) c = 4

x = Val(InputBox(\请输入一个数\ While x <> -999

If x > c Then c = x

x = Val(InputBox(\请输入一个数\Wend

Print c; Abs(x)

End Sub

运行后，单击窗体并输入9，8，2，-999，输出的结果是（9 999 ）。 8、在窗体上画两个名称分别是Text1、Text2的文本框和一个名称为Command1的命令按钮，

然后编写如下事件过程：

Private Sub Command1_Click( )

Dim x As Integer, n As Integer x = 1

n = 0

Do While x < 20 x = x * 3

n = n + 1

Loop

Text1.Text = Str(x) Text2.Text = Str(n) End Sub

程序运行后，单击命令按钮，在两个文本框中显示的值分别是（27和3 ）。 9、如下程序：

For i = 1 To 3

For j = 5 To 1 Step -1 Print i * j Next j Next i

运行程序，则语句Print i * j的执行次数及i、j的值分别是（15 4 0 ）。 10、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：

Option Base 1

Private Sub Command1_Click() Dim a

a= Array(1,2,3,4,5) For i=1 To UBound(a)

a(i) = a(i) + i - 1 Next i Print a(3) End Sub

程序运行后，单击命令按钮，则在窗体上显示的内容是（ 5 ）。

二、填空题（共30空，每空1分，共计30分）

3

1、VB提供了结构化程序设计的3种基本结构，这3种基本结构是______、______和_______。

（顺序结构 选择结构 循环结构）

2、__________方法可以清除列表框的所有内容。 （ clear）

3、 E盘根目录下的一个名为pic1.gif的图形文件，要在运行期间把该文件装入一个图片框（Picture1），应执行的语句是_____。（Picture1.Picture = LoadPicture(\4、在程序运行期间，如果拖动滚动条上的滚动块，则触发的滚动事件是__________。 （Scroll）

5、VB中，若要设定每个数组默认的下界固定为1，其声明的语句是________。 （Option Base 1）

6、InputBox函数返回值的类型为__字符串___，MsgBox函数返回值的类型为_____数值。

（字符型；数值型）

7、对于窗体上的菜单按钮，如果不允许进行操作，应通过___属性进行设置。

（Enabled）

8、要将数学表达式Sin3(x+y)+4e2写成VB表达式，正确的形式是___。 （ sin(x+y)^3+4*exp(2)

9、在VB中，若要改变动态数组的大小，且保留数组中的数据，应在ReDim语句后加关键字______。（Preserve）

10、执行语句s = Len(\可视化Basic\后，s的值是_____。（5） 11、已知 a = -5.5，则Int(a) = __，Fix(a) = ____，Cint(a) = ____。 （ -6 -5 -6）

12、设x = 3，y = 2，z = 1，表达式x < y And (Not y > z) Or z < x的值是_______。 （true）

13、设有如下程序

Private Sub Form_Click( )

Dim a As Integer, s As Integer n = 6：s = 0 Do

n = n – 1 s = s + n

Loop until n < 0 Print s End Sub

以上程序运行后，单击窗体，输出结果为_____。 （ 14）

14、下面程序的功能是：输出100以内能被3整除且个位数为4的所有整数。请在下划线处填入适当内容，将程序补充完整。 Private Sub Command1_Click( ) For i = 0 To _____ j = i * 10 + 4

If ______ Then Print j End If Next i

4

End Sub

（9；j Mod 3 = 0）

15、命令按钮Command1_Click事件中的程序为： Private Sub Command1_Click( )

Static a As Integer, b As Integer a = 1 a = a + 5 b = 5 + b Print a，b End Sub

程序运行时，单击命令按钮两次后，窗体上显示的结果为_____和_____。 （ 6 5; 6 10）

16、以下程序判断从文本框Text1中输入的数据，如果该数据满足条件（除以3余2，并且除以5余3），则输出该数据；否则，选中文本框Text1中的内容，请在下划线处填空，将程序补充完整。

Private Sub Command1_Click( ) x = Val(Text1.Text) If __________ Then Print x Else

Text1.SelStart = 0

Text1.SelLength = __________ End If End Sub

（ x mod 3=2 and x mod 5=3; len(text1.text)

17、程序的功能是：用Array()函数建立一个含有8个元素的数组，然后查找并输出该数组

中元素的最大值。请填空。 Option Base 1

Private Sub Command1_Click() Dim arr1, max As Integer

arr1 = __________(12,435,76,24,78,54,866,43) __________ = arr1(1) For i = 1 To 8

If arr1(i) > max Then __________ Next i

Print \最大值是：\；max End Sub

（ array; max; max=arr1(i)）

18、在窗体上画一个标签（名称为Label1）和一个计时器（名称为Timer1），写如下几个

事件过程。程序运行后，单击窗体，将在标签中显示当前时间，每隔1s变换一次，请填空。

Private Sub Form_Load( ) Timer1.Enabled = False

Timer1.Interval = __________

5

End Sub

Private Sub Form_Click( ) Timer1.Enabled = __________ End Sub

Private Sub Timer1_Timer( ) Label1.Caption = __________ End Sub

（100; true;time()） 19、补充下面的程序代码，单击窗体上的命令按钮Command1时，窗体上的文本框对象Text1

隐藏，再次单击Commadn1，又重新显示。 Private Sub Command1_Click( ) Text1.Visible = __________ End Sub

（not text1.visible）

20、如下程序：

Private Sub Command1_Click( ) x1 = InputBox(\请输入\ Print x1 + 111; x1 + \End Sub 运行程序，单击命令按钮并输入111，则在窗体上输出结果是（222 111111 ）。

三、判断题（共10题，每题1分，共计10分。你认为正确的，用“√”表示，你认为错

误的，用“×”表示）

1、如果用户在键盘上按下一个键，则会产生一个单击事件。 （ 错 ） 2、InputBox函数和MsgBox函数一样，返回的是字符串。 （ 错 ） 3、变量名的第一个字符必须是字母。 （ √ ）

4、改变窗体的标题也就是改变其属性窗口的name属性。 （ 错 ） 5、滚动条的Value属性用来返回或设置滚动块在滚动条中的位置。 （√ ） 6、通过设置对象的Index属性值可以改变Tab键的顺序。 （ 错 ）

7、在定义了一个函数后，可以像调用任何一个VB内部函数一样使用它，可以在表达式、语句或函数中引用它。 （√ ）

8、在VB中，运算级从高到低的顺序是：算术运算、字符连接运算、关系运算、逻辑运算。（√ ） 9、在程序执行的过程中，变量的值始终保持不变，常量的值随时改变。 （错 ）

10、CheckBox控件是用来做单项选择而OptionButton是用来做多项选择的。（ 错 ） 11、框架移动时框架上的控件也会随着框架一起移动。 （ √ ） 12、表达式x \\ 2 ＝ 0可以判断x是否为偶数。 （ 错 ） 13、文本框只有Text属性而没有Caption属性。 （ √ ）

14、对象的任何属性既可以通过属性窗口设定，也可以通过程序语言设定。 （错 ） 15、Print方法可以输出多个表达式值，若使用标准格式输出，各表达式的分隔符号是冒号。

（ 错 ）

6

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说综合文库VB6.0总复习题在线全文阅读。