Visual Basic程序设计模拟试题三

Visual Basic程序设计模拟试题三

一、单项选择题（每小题2分，共30分）

1．与传统的设计语言相比，Visual Basic最突出的特点是（）

A．程序开发环境 B．结构化程序设计

C．程序调试技 D．术事件驱动的编程机制

2．VB集成开发环境中，提供控件的窗口是（）。

A．工具箱 B．工具栏

C．属性窗 D．工程管理器

3．刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是（）。

A．时钟控件 B．图像框

C．框架 D．通用对话框

4．在VB6.0集成开发环境中有三种工作模式，下列不属于三种工作模式之一的是（）A．设计模式B．执行模式

C．编写代码模式D．中断模式

5．要在窗体Form1内显示“欢迎您！”，使用的语句是（）

A．Form.caption="欢迎您!" B．Form1.caption="欢迎您!"

C．Form. print "欢迎您!" D．Form1.print "欢迎您!"

6．决定标签内显示内容的属性是（）

A．Name B．Text

C．Caption D．Alignment

7．在VB中，下列合法的变量名是（）

A．4EF B．integer C．E-F D．E_F

8．如果要在文本框中键入字符时，只显示某个字符，如星号（*），应设置文本框的（）属性。

A．PasswordCha B．r Caption C．Text D．Locked

9．要使窗体在运行时不可改变窗体的大小和没有最大化和最小化按钮，只要对下列（）属性设置就有效。

A．MaxButton B．BorderSyle

C．Width D．MinButton

10．要设置命令按钮的背景图形，必须设置的两个属性是（）

A．Style和Icon B． Style和Picture

C．Caption和Picture D．Value和Icon

11．VB程序中通常不会产生错误提示的是（）。

A．编译错误B．逻辑错误

C．运行时错误D．实时错误

12．执行Form1.Scale (0, 10)-(10, -10)语句后，Form1窗体坐标系x轴和y轴的正方向是（）。

A．向右和向上 B．向左和向下

C．向右和向下 D．向左和向上

13．使用ADO数据模型时，建立Recordset和Connection对象连接的属性是（）A．Execute B．CommandType

C．ActiveConnection D．Open

14．用来从数据库表中删除记录的SQL命令是（）。

A．where B．select

C．update D．delete

15．要发送数据，通常使用Winsock控件的（）。

A．Listen方法B．GetDate方法

C．Accept方法D．SendData方法

二、填空题（每小题2分，共20分）

1.每个应用程序必须有一个唯一的文件，至少有一个文件。

2．某个程序中要用到一个二维数组，要求数组名为C，类型为整型，第一维下标从-1到3，第二维下标从0到4，则相应数组声明语句为。

3．过程级变量是指在声明的变量，窗体级或模块级变量是指窗体或模块的代码声明段用或声明的变量，在全局变量在整个应用程序中有效，一般在标准模块中使用语句声明。

4．在VB中，将Access称为，SQL Server称为，Foxpro 称为。

5．数据库应用程序属于一种非常典型的前后台软件结构，前后台之间进行通讯的主要机制称为。

6．Winsock控件主要用来编制TCP/IP或协议的通话程序。

7．变量是应用程序运行期间其值可以变化的量，如果不能适先确定变量的数据类型，则可以把它声明为数据类型。

8．执行赋值语句y = “abc”+”def”后，变量a的值是。

9．常用的VB网络编程控件主要有、和

三种。

10．通常可以将文本框控件的属性设置为False，以禁止键盘输入。如果

不希望某个控件获得焦点，则可以将它的属性设置为False。

三、阅读程序题（共25分）

阅读下列程序并写出程序运行结果

1．(6分)

Private Sub Form_Click()

Dim a As Integer

Static b As Integer

a = a + 6

b = a + b

Form1.Print "a="; a, "b="; b

End Sub

写出程序运行时连续单击三次窗体后，Form1上的输出结果。

2．(6分)

Private Sub Form_Click()

Dim c As Integer, j As Integer, k As Integer

k = 3

c = 4

For j = 1 To 6

If j > 3 Then

c = c + 6

Exit For

Else

k = k + 2

End If

Next j

Print c, k

End Sub

写出程序运行时单击窗体后，c,k的值分别是：

3. (6分)

Private Sub Command1_Click()

Dim s As Double

Dim i As Integer

s = 5

i = 1