专升本vb程序设计试题及答案

专升本vb程序设计试题及答案姓名：____________________

一、选择题（每题2分，共20分）

1.下列关于VisualBasic中模块的说法，错误的是：

A.模块是VB程序的基本组成单位

B.模块可以包含变量、常量、过程等

C.模块分为标准模块和类模块

D.模块可以独立编译

2.在VisualBasic中，下列哪个函数可以获取当前系统时间？

A.Now()

B.Time()

C.Date()

D.TimeValue()

3.以下哪个控件可以用来显示文本信息？

A.TextBox

B.Label

C.Image

D.Button

4.在VisualBasic中，以下哪个语句可以清除一个窗体的所有控件？

A.RemoveAllControls

B.ClearControls

C.ClearForm

D.Clear

5.下列关于数组说法错误的是：

A.数组是存储具有相同数据类型的元素的集合

B.数组必须声明后才能使用

C.数组可以通过下标访问元素

D.数组的大小在声明后不能改变

6.在VisualBasic中，以下哪个属性用来设置文本框中文字的字体？

A.Font

B.Text

C.Caption

D.BackColor

7.以下哪个控件可以用来显示图形？

A.PictureBox

B.Label

C.TextBox

D.Button

8.在VisualBasic中，以下哪个方法可以用来打开一个文件？

A.OpenFile

B.OpenFileDialog

C.SaveFile

D.SaveFileDialog

9.以下哪个函数可以获取当前用户名？

A.UserName()

B.CurrentUser()

C.User()

D.SystemUser()

10.在VisualBasic中，以下哪个语句可以用来判断一个变量是否为空？

A.IsNull

B.IsEmpty

C.IsNullOrEmpty

D.IsNullAndEmpty

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

1.在VisualBasic中，声明一个整型变量可以使用关键字__________。

2.在VisualBasic中，一个窗体的__________属性用来设置窗体的标题。

3.在VisualBasic中，一个文本框的__________属性用来设置文本框中的文字颜色。

4.在VisualBasic中，一个图片框的__________属性用来设置图片框中的图片。

5.在VisualBasic中，一个按钮的__________事件会在按钮被点击时触发。

6.在VisualBasic中，一个标签的__________属性用来设置标签中的文字。

7.在VisualBasic中，一个文本框的__________属性用来设置文本框中的文字对齐方式。

8.在VisualBasic中，一个组合框的__________属性用来设置组合框中的文本。

9.在VisualBasic中，一个菜单项的__________属性用来设置菜单项的标题。

10.在VisualBasic中，一个列表框的__________属性用来设置列表框中的项目。

四、编程题（每题20分，共40分）

1.编写一个VisualBasic程序，创建一个窗体，窗体上有一个文本框和一个按钮。当用户在文本框中输入文字并点击按钮时，程序将文本框中的内容转换为大写，并在另一个文本框中显示转换后的结果。

2.编写一个VisualBasic程序，创建一个窗体，窗体上有一个文本框和一个按钮。当用户在文本框中输入一个数字，点击按钮后，程序将计算并显示这个数字的阶乘。

五、简答题（每题10分，共20分）

1.简述VisualBasic中窗体和控件的基本概念及作用。

2.简述在VisualBasic中如何使用数组。

六、综合应用题（每题20分，共40分）

1.编写一个VisualBasic程序，实现一个简单的计算器。计算器包含两个文本框用于输入数值，一个按钮用于执行加法操作，一个按钮用于执行减法操作，一个按钮用于执行乘法操作，一个按钮用于执行除法操作。当用户点击相应的按钮时，程序将显示两个文本框中数值的运算结果。

2.编写一个VisualBasic程序，创建一个窗体，窗体上有一个列表框，列表框中填充有10个数字（1-10）。用户可以通过点击按钮来随机改变列表框中数字的顺序。

试卷答案如下：

一、选择题答案及解析：

1.D。模块是VB程序的基本组成单位，包含变量、常量、过程等，分为标准模块和类模块，但模块不能独立编译。

2.A。Now()函数返回当前日期和时间，Time()函数返回当前时间，Date()函数返回当前日期，TimeValue()函数将字符串转换为时间值。

3.B。TextBox控件用于输入和显示文本，Label控件用于显示文本信息，Image控件用于显示图形，Button控件用于响应用户的点击事件。

4.A。RemoveAllControls方法可以清除一个窗体的所有控件。

5.D。数组在声明后大小可以改变，但需要使用ReDim语句重新定义数组的大小。

6.A。Font属性用来设置文本框中文字的字体。

7.A。PictureBox控件用来显示图形。

8.A。OpenFile方法用来打开一个文件。

9.D。SystemUser()函数可以获取当前用户名。

10.B。IsEmpty函数用来判断一个变量是否为空。

二、填空题答案及解析：

1.Dim

2.Caption

3.ForeColor

4.Picture

5.Click

6.Caption

7.Alignment

8.Text

9.Caption

10.List

四、编程题答案及解析：

1.

```vb

PrivateSubButton1_Click()

DiminputTextAsString

DimupperTextAsString

inputText=TextBox1.Text

upperText=UCase(inputText)

TextBox2.Text=upperText

EndSub

```

解析：使用UCase函数将文本框1中的文本转换为大写，并将结果赋值给文本框2。

2.

```vb

PrivateSubButton1_Click()

DimnumAsInteger

DimfactorialAsLong

factorial=1

num=Val(TextBox1.Text)

Fori=1Tonum

factorial=factorial*i

Nexti

TextBox2.Text=factorial

EndSub

```

解析：使用Val函数将文本框1中的字符串转换为数值，然后使用循环计算阶乘，并将结果赋值给文本框2。

五、简答题答案及解析：

1.窗体是VisualBasic应用程序的基本界面，用于显示和操作控件。控件是窗体上的图形元素，用于与用户交互，如文本框、按钮、标签等。

2.在VisualBasic中，使用数组需要先声明数组，然后可以通过下标访问数组元素。数组声明时需要指定数组的大小和数据类型。

六、综合应用题答案及解析：

1.

```vb

PrivateSubButtonAdd_Click()

Dimnum1AsInteger

Dimnum2AsInteger

num1=Val(TextBox1.Text)

num2=Val(TextBox2.Text)

TextBox3.Text=num1+num2

EndSub

PrivateSubButtonSubtract_Click()

Dimnum1AsInteger

Dimnum2AsInteger

num1=Val(TextBox1.Text)

num2=Val(TextBox2.Text)

TextBox3.Text=num1-num2

EndSub

PrivateSubButtonMultiply_Click()

Dimnum1AsInteger

Dimnum2AsInteger

num1=Val(TextBox1.Text)

num2=Val(TextBox2.Text)

TextBox3.Text=num1*num2

EndSub

PrivateSubButtonDivide_Click()

Dimnum1AsInteger

Dimnum2AsInteger

num1=Val(TextBox1.Text)

num2=Val(TextBox2.Text)

TextBox3.Text=num1/num2

EndSub

```

解析：分别编写四个按钮的点击事件处理程序，根据按钮的功能进行相应的数学运算，并将结果显示在文本框3中。

2.

```vb

PrivateSubButtonShuffle_Click()

DimiAsInteger

DimtempAsInteger