1，Sub subP(b() As Integer)

For i = 1 To 4

b(i) = 2 * i

Next i

End Sub

Private Sub Command1_Click()

Dim a(1 To 4) As Integer

a(1) = 5

a(2) = 6

a(3) = 7

a(4) = 8

subP a()

For i = 1 To 4

Print a(i);

Next i

End Sub

运行上面的程序，单击命令按钮，输出结果为______。

2 4 6 8

2,函数过程F1的功能是：如果参数b为奇数，则返回值为1，否则返回值为0。以下能正确实现上述功能的代码的是______。Function F1(b As Integer)

If b Mod 2 = 0 Then

F1 = 0

Else

F1 = 1

End If

End Function

Visual Basic程序中不能使用Return语句来返回一个函数的值。要返回一个函数的值，需要把这个值赋值给函数名。Select Case语句中的测试表达式只能是数值表达式或字符串表达式

3,在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：

Option Base 0

Private Sub Command1_Click()

Dim city As Variant

city = Array("北京","上海","天津","重庆")

Print city(1)

End Sub

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

上海Option Base语句和数组的使用

Option Base语句，在模块级别中使用，用来声明数组下标的缺省下界。缺省值为0

用Array函数在给数组赋值，默认的数组下标从0开始，如果想使下标从1开始，则应执行：Option Base 1

该题中，数组的下标从0开始，故ARRAY(1)=上海

4, Left属性是对象的左边界与容器对象的左边界之间的距离。若窗体上的图片框中有一个命令按钮，则此按钮的Left属性是指_按钮左端到图片框左端的距离。

Pattern属性返回或设置一个值，该值指示在运行时显示在FileListBox控件中的文件类

型。

5，TextBox控件有时也称作编辑字段或者编辑控件，显示设计时用户输入的、或运行时在代码中赋予控件的信息。

为了在TextBox控件中显示多行文本，要将MultiLine属性设置为True。如果多行TextBox没有水平滚动条，那么即使TextBox调整了大小，文本也会自动换行。为了在TextBox上定制滚动条组合，需要设置ScrollBars属性。

如果文本框的MultiLine属性设置为True而且它的ScrollBars没有设置为None(0)，则滚动条总出现在文本框上。

如果将MultiLine属性设置为True，则可以在TextBox内用Alignment属性设置文本的对齐。如果MultiLine属性是False，则Alignment属性不起作用。

6，Unload语句、Show方法

Unload语句用来将指定窗体从内存中清除。

格式：Unload 窗体名称

Show方法用来显示一个窗体。

格式：窗体名称.Show [模式]

参数"模式"用来确定显示窗体的状态，可以取值0或1 。

取值为0（0值是缺省值）则窗体是"无模式"窗体，当该窗体显示出来时，不但可以对该窗体进行操作，还可以对其他显示出来的窗体进行操作；取值为1则窗体是"模式"窗体，当该窗体显示出来时，只能对该窗体进行操作，只有当该窗体关闭后，才能对其他窗体进行操作。

7，在窗体上画一个列表框，然后编写如下两个事件过程：

Private Sub Form_Click()

list1.RemoveItem 1

list1.RemoveItem 3

list1.RemoveItem 2

End Sub

Private Sub Form_Load()

list1.AddItem "itemA"

list1.AddItem "itemB"

list1.AddItem "itemC"

list1.AddItem "itemD"

list1.AddItem "itemE"

End Sub

运行上面的程序，然后单击窗体，列表框中所显示的项目为itemA、______。

.removitem用以从ListBox或ComboBox控件中删除一项，或从MSFlexGrid控件中删除一行。不支持命名参数。

语法

object.RemoveItem index（位置代码不是文本）

.additem用于将项目添加到ListBox或ComboBox控件，或者将行添加到MSFlexGrid控件。不支持命名参数。

语法

object.AddItem item, index

本题首先在列表框加入itemA~itemE，然后首先去掉"itemB"，然后去掉"itemE"，最后去掉"itemD"。

8，程序运行后，在四个文本框中各输入一个整数（如图1所示），然后单击命令 按钮，即可使数组按降序排序，并在文本框中显示出来

（

图1

Private Sub Sort(a() As Integer)

Dim Start As Integer, Finish As Integer

Dim i As Integer, j As Integer, t As Integer

Start = LBound(a)（返回数组某维的下界值）

Finish = UBound(a)（返回数组某维的上界值）

For i = Finish To 2 Step -1

For j = 1 To Finish - 1

If a(j) < a(j + 1) Then

t = a(j + 1)

a(j + 1) = a(j)

a(j) = t

End If

Next j

Next i

End Sub

 

第二篇：VB上机第一大题总结

1、1）窗体和文本框 2）图像框和命令按钮2、1）形状控件和窗体 2）弹出式菜单3、1）框架和复选框 2）图片框4、1）组合框 2）文本框和命令按钮5、1）复选框数组 2）文本框和命令按钮6、1）命令按钮 2）列表框和水平滚动条7、1）标签和命令按钮 2）文本框和单选按钮8、1）文本框和命令按钮 2）文本框和命令按钮9、1）命令按钮 2）标签和水平滚动条10、1）文本框和水平滚动条 2）命令按钮11、1）单选按钮 2）下拉式菜单12、1）文本框和命令按钮 2）图片框13、1）图片框 2）文本框和命令按钮14、1）下拉式菜单 2）文本框15、1）文本框 2）文本框和命令按钮16、1）下拉式菜单 2）列表框17、1）文本框和命令按钮 2）下拉式菜单18、1）下拉式菜单和文本框 2）列表框和文本框19、1）下拉式菜单 2）列表框20、1）图片框和下拉式菜单 2）列表框21、1）通用对话框和命令按钮 2）文本框和命令按钮22、1）计时器 2）文本框和图片框23、1）水平滚动条 2）下拉式菜单24、1）标签和文本框 2）图片框25、1）复选框数组 2）下拉式菜单和文本框26、1）标签、文本框和命令按钮 2）图片框和命令按钮 27、1）标签和文本框 2）图片框和命令按钮 28、1）标签、文本框和命令按钮 2）水平滚动条和垂直滚动条29、1）标签、文本框和命令按钮 2）文本框和水平滚动条30、1）标签、文本框和命令按钮 2）文本框和水平滚动条31、1）复选框数组 2）水平滚动条和命令按钮32、1）标签和命令按钮 2）水平滚动条和文本框33、1）文本框 2）图像框和命令按钮34、1）下拉式菜单 2）文本框35、1）通用对话框 2）命令按钮36、1）文本框 2）命令按钮37、1）命令按钮 2）标签38、1）窗体和标签 2）水平滚动条和命令按钮39、1）水平滚动条和窗体 2）文本框40、1）单选按钮 2）垂直滚动条和命令按钮41、1）标签 2）图像框和

命令按钮42、1）图片框 2）通用对话框43、1）文本框 2）列表框44、1）列表框 2）弹出式菜单和命令按钮45、1）框架和命令按钮 2）文件系统控件46、1）标签和水平滚动条 2）形状控件和命令按钮47、1）标签和窗体 2）文本框和水平滚动条48、1）框架和单选按钮 2）形状控件和命令按钮49、1）图片框 2）下拉式菜单和命令按钮50、1）命令按钮 2）下拉式菜单和形状控件51、1）框架和单选按钮 2）形状控件和命令按钮52、1）形状控件 2）标签和命令按钮53、1）文本框和窗体 2）标签、文本框和命令按钮54、1）形状控件 2）计时器、标签和命令按钮55、1）组合框 2）文本框和命令按钮 56、1）标签和窗体 2）文本框和命令按钮57、1）图片框 2）标签、文本框和命令按钮58、1）框架、单选按钮和复选框 2）文本框和命令按钮59、1）框架和复选框 2）标签和命令按钮60、1）标签和列表框 2）图片框和命令按钮61、1）窗体和命令按钮 2）形状控件和列表框62、1）命令按钮和窗体 2）形状控件和列表框63、1）文本框 2）标签和命令按钮64、1）命令按钮数组 2）文本框和命令按钮65、1）下拉式菜单 2）图像框和命令按钮66、1）形状控件和窗体 2）列表框和水平滚动条67、1）标签和水平滚动条 2）形状控件和计时器68、1）通用对话框 2）下拉式菜单69、1）列表框 2）标签和命令按钮70、1）图片框 2）列表框和命令按钮71、1）形状控件的文本框 2）标签72、1）下拉式菜单和列表框 2）通用对话框73、1）命令按钮数组和文本框 2）标签74、1）下拉式菜单 2）文本框和单选按钮75、1）命令按钮 2）命令按钮和通用对话框76、1）水平滚动条 2）形状控件和命令按钮77、1）开关控件和窗体 2）命令按钮和窗体78、1）文本框 2）形状控件79、1）下拉式菜单 2）单选按钮和水平滚动条80、1）形状控件 2）列表框和文本框81、

1）文本框 2）文本框和水平滚动条82、1）标签 2）单选按钮和文本框83、1）文本框和命令按钮 2）列表框、文本框和水平滚动条84、1）文本框和命令按钮 2）标签和列表框85、1）文本框 2）图像框和命令按钮