Visual Basic 6.0 程序设计题型示例

P1 = X+Y End Function

Private Function P2 (X As Integer, Y As Integer ) As Integer P2 = 2 * X + Y End Function

当单击1次和单击2次命令按钮后，文本框Text1和Text2的值分别是（ ） A．24 24 B．24 48

C．44 88 D．10 10 58 58 99．有如下函数过程：

Function fun (a as integer, n as integer ) as integer Dim m as integer While a >=n a =a – n M = m + 1 Wend Fun = m

End Function

该函数的返回值是（ ） A．a乘以n的乘积 B．a加n的和 C．a减n的差

D．a除以n的商（不含小数部分）

100．编写了一个能够返回数组a中10个数中最大的函数过程，代码如下： Function Maxval (a() As Integer ) As Integer Dim max max = 1

For k = 2 to 10

If a (k) >a (max) Then Max = k End if Next k

Maxnal = max End Function

程序运行时，发现函数过程的返回值是错的，需要修改，下列修改方案中正确的是（A．语句max = 1 应改为 max = a（1）

B．语句for k=2 to10 应改为 for k= 1 to 10

C．if语句中的条件a（k）>a (max)应改为a（K）>max D．语句Max Value = max 应改为 Max Value = a（max）

101．设计了下列函数fun，功能是返回整型参数a中的数值的位数： Function fun （a As Integer） As Integer Dim n% n = 1

While a \\10>=0 n = n +1 a = a\\ 10 Wend

） Fun = n

End function

在调用该函数时发现返回的结果不正确，函数需要修改，下列修改方案中正确的是（ ） A．把语句 n=1 改为 n=0

B．把循环条件 a\\10>= 改为 a\\10>0 C．把语句a = a\\ 10 改为 a= a mod 10 D．把语句fun = n 改为 fun = a

102．下列关于过程叙述不正确的是（ ）

A．过程的传值调用是将实参的具体指传递给形参

B．过程的传址调用是将实参在内存的地址传递给形参

C．过程的传值调用参数是单向传递的,过程的传址调用参数是双向传递的 D．无论过程传值调用还是过程传址调用，参数传递都是双向的 103．假定有下列两个过程：

Private Sub PPP(a As Single, b As Single) a = a + b Print a, b b = a + b Print a, b End Sub

Private Sub Form_Activate() x = 18

Call PPP((x), (x)) Print x End Sub

则下列说法中不正确的是（ ）

A．形参是a和b，两个实参（x）和（x）允许重名 B．形参是a和b，实参（x）表示地址方式调用 C．形参是a和b，实参（x）表示是非地址方式调用 D．形参是a和b，两个实参（x）和（x）不允许重名

104．为达到把a、b中的值交换后输出的目的，编程如下： Private Sub command1_Click() a% = 20 b% = 10

Call swap(a, b) Print a, b End Sub

Private Sub swap(ByVal a As Integer, ByVal b As Integer) c = a a = b b = c End Sub

在运行时发现输出结果错了，需要修改。下面列出的错误原因和修改方案中正确的是（ A．请用swap过程的语句错误，应改为Call swap a，b B．输出语句错误，应改为Print ＂ａ＂，＂ｂ＂

C．过程的形式参数有错，应改为swap（ByRef a As Integer，ByRef b As Integer） D．Swap中3条赋值语句的顺序是错误的，应改为a=b：b=c：c=a

） 105．要想在过程调用后返回两个结果，下面的过程定义语句合法的是（ ） A．Sub PP（ByVal X，ByVal Y） B．Sub PP（x，ByVal y） C．Sub PP(ByVal X,y) D．Sub PP(x,y)

106．下面哪种情况不会导致逻辑错误的是（ ） A．变量类型错误 B．语句的次序不对 C．除数为零

D．循环中起始值和终止值不正确 107．以下叙述中正确的是（ ）

A．窗体的Name属性指定窗体的名称，用来标识一个窗体 B．窗体的Name属性的值是显示在窗体标题栏中的文本 C．可以在运行期间改变对象的Name属性的值 D．对象的Name属性值可以为空

108．以下关于窗体的描述中，错误的是（ ）

A．执行Unload form1语句后，窗体form1消失，但仍在内存中 B．窗体的Load事件在加载窗体时发生

C．当窗体的Enabled属性为Flase时，通过鼠标和键盘对窗体的操作都被禁止 D．窗体的Height和Width属性用于设置窗体的高和宽 109．如果要改变窗体的标题，则需要设置的属性是（ ） A．Caption B．Name

C．BackColor D．BorderStyle

110．窗体的边框类型BorderStyle属性默认是Sizable，表示（ ） A．窗体没有边框

B．窗体是固定单边框 C．固定对话框

D．窗体边框是可调整的

111．下列说法错误的是（ ）

A．Caption为只读属性，运行时对象的Caption属性值不能改变 B．设置Height或Width的数值单位为twip，是1点的1/20 C．Icon属性用来设置窗体最小化时的图标 D．用来激活属性窗口大的快捷键是F4键 112．下列说法错误的是（ ）

A．默认情况下，属性Visible的值是True

B．如果设置控件的Visible的属性为False，则运行时控件会隐藏 C．Visible的值可设为True或者False

D．设置Visible属性同设置Enabled属性的功能是相同的，都是使控件处于失效状态 113．为了装入一个Visiual Basic应用程序，应当（ ） A．只装入窗体文件（.frm） B．只装入工程文件（.vbp）

C．分别装入工程文件和标准模块文件（.bas） D．分别装入工程文件、窗体文件和标准模块文件 114．假定窗体的名称为“Form1”，则把窗体的标题设置为“hello world”的语句是（）

A．Form1=＂hello world＂

B．Form1．Caption=＂hello world＂ C．Form1．Text=＂hello world＂ D．Form1．Name=＂hello world＂

115．在窗体中放置控件，对该控件的操作错误的是（ ） A．单击窗体上没有控件处，可把活动控件变成不活动控件 B．双击任一个控件内部，可激活该控件的代码窗口 C．双击一个控件内部，可把活动控件变为不活动控件 D．拖动一个活动控件四周的控制小方块可缩放控件

116．为了使一个窗体从屏幕上消失但仍在内存中，所使用的方法或语句为（ ） A．Show B．Hide C．Load D．Unload

117．若要将一个窗体从内存中清除，应该使用的方法是（ ） A．Show B．Unload C．Load D．Hide

118．要从自定义对话框Form2中退出，可以在该对话框的“退出”按钮click事件过程中使用（句

A．Form2.Unload B．Unload Form2 C．Hide.Form2 D．Form2.Hide

119．以下叙述中错误的是（ ） A．双击鼠标可以触发Dblclick事件

B．窗体和控件的事件的名称可以由编程人员设定 C．移动鼠标时，会触发MouseMove事件 D．控件的名称可以由编程人员设定

120．要使窗体Form1显示出来，应该使用（ ） A．Load form1 B．Show．form1 C．Form1 load D．Form1 Show

121．以下叙述错误的是（ ）

A．一个工程中只能有一个Sub Main过程

B．窗体的Show方法的作用是将指定的窗体装入内存并显示该窗体 C．窗体的Hide方法和Unload方法的作用完全相同。

D．若工程文件中有多个窗体，可以根据需要指定一个窗体为启动窗体。 122．下列说法错误的是（ ） A．方法是对象的一部分

B．在调用方法时，对象名是不可缺少的 C．方法是一种特殊的过程或函数。

D．方法的调用格式和对象的属性的使用格式不同

123．下列关于属性、方法、事件概念的描述错误的是（ ）

）语