vb制作一个多窗体排序的功能

'修改兆蠢滚如下：档友

Public Sub Sort(a() As Integer)

Dim n As Integer, t As Integer

n = UBound(a())

For i = 1 To n - 1

For j = i + 1 To n

If a(i) >a(j) Then

t = a(i): a(i) = a(j): a(j) = t

End If

Next j

Next i

End Sub

Private Sub Form_Load()

Me.Show

'这里应该族余还有对a数组赋值的代码

Call Sort(a())

Dim i As Integer

For i = 0 To UBound(a())

Picture1.Print a(i)

Next i

End Sub

该工程文件中有两个窗体form1、form2，要求将form2设为启动窗体。运行时，单击form2上的“显示”按钮，则显示出form1窗体，单击form1的“隐藏”按钮，则form1窗体消失。

form2的“显示”按钮代码：

form1.Show

单击form1的“隐藏”按钮，则form1窗体消失。代码：

form1.hide

以下数列：1,1,2,3,5,8,13,21，……，的规律是从第3个数开搏宴始，每个数是它前面两个数之和。按如下界面设计基粗银，运行时，选中一个单选按钮后，单击“计算“按钮，则计算出上述数列的第n项的值，并显示在文本框中，n是选中的单选按钮后面的数值。（提示，计算结果较大，使用长整型变量）。

Dim a As Long '长整型变量

Dim i, j, k

i = 1

j = 1

a = 0

Text1 = ""

If Option1.Value = True Then '30

For k = 3 To 30

a = i + j

i = j

j = a

Next k

Text1 = "" & a

Exit Sub

End If

If Option1.Value = 1 Then '33

For k = 3 To 33

a = i + j

i = j

j = a

Next k

Text1 = "" & a

Exit Sub

End If

If Option1.Value = 1 Then '35

For k = 3 To 35

a = i + j

i = j

j = a

Next k

Text1 = 凳卖"" & a

Exit Sub

End If

一。判断题。

1. 方法是VB 对象可以响应的用户 *** 作 F

2. 事件过程由某个用户事件或系统事件触发执行，它不能被其他过程调用 F

3. 在sub过程中，可以用return语句退出sub过程 F

4. 利用private const 声明的符号常量，在代码中不可以再赋值 T

5. 可以用“&”，“+”合并字符串，但是用在变异变量时，“+”可能会将两个数值加起来 T

6. Variant 是一种特殊的数据类型，variant类型变量可以存储除了定长字符串数据以及自定义类型外的所有系统定义类型的数据。Variant类型变量还可以具有empty，error和null等特殊值 T

7. vb若同一个工程有许多窗体，可以指定任何一窗体为启始窗体 F

8. variant是一种数据类型，因此只能存放象其他数据类型一样，无特殊值 F

9. 当定时器控件的interval属并册性值设置为0时，会连续不断的激发timer事件 F

10. 在vb中，计时器定期激活timer事件，使timer中的代码执行一次 T

11. 有一个程序在属性窗口中芹戚设置了它的窗体字体大小为10号，而程序代码若设置了它的窗体字体大小为20号，那么当程序运行实际的窗体字体大小为20号 T

12. 单击并拖曳工具箱中所需的控件到窗体上即可完成添加控件任务 F

13. 在VB6.0中命令按钮不仅响应Click事件，而且响应dbclick事件 F

14. 在VB中将一些绝首宏通用的过程和函数编写好并封装作为方法供用户直接调用 T

15. 标签控件可以用来让用户输入数据 F

16. 在标准模块的声明部分中用public声明的变量的有效范围是其所在的工程 T

17. Visual_basic是合法的变量名 T

18. 过程中的静态变量是局部变量，当过程再次被执行时，静态变量初值是上一次过程调用后的值 T

19. VB若同一个工程中有多窗体，可以指定任一窗体为启始窗体 F

20. textbox与label有许多共同特点，他们都能显示和输入文本 F

21. Visual Basic程序的运行可以从main（）过程启动，也可以从某个窗体启动 T

22. 某一过程中的静态变量在过程结束后，静态变量及其值可以在其他过程中使用 F

23. VB允许用户使用type语句在窗体模块的通用声明中自己定义数据类型 T

24. VB是一种面向对象的程序设计语言 T(这么有争议的题也敢出)

25. 如果没有使用public，private或者friend，sub过程在缺省情况下是公用的 F

26. 计算机在处理数据时必须将其装入内存，在高级语言中通过内存单元来访问其中的数据，命名的内存单元就是常量或变量 T

不敢保证全对,都忘了.

---