高校等考试题天天练二级VB]11月4日
|
知识点：程序问答（四） 本应用程序包含一个窗体Form1和一个标准模块Module1。窗体中三个文本框构成控件数组Text1，自左至右依次为Text1(0)、Text1(1)、Text1(2)。标题为“升序排序”的命令按钮的单击事件为： Private Sub Command1_Click() Dim a(2) For i = 0 To 2 a(i) = Text1(i).Text Next i Call abc(a(0), a(1), a(2)) Print a(0), a(1), a(2) End Sub 标准模块Module1内容如下： Sub abc(a, b, c) If a > b Then swap a, b If b > c Then swap b, c If a > b Then swap a, b End Sub Private Sub swap(x, y) If x > y Then t = x: x = y: y = t End Sub 问题5：运行程序时，如图所示输入三个数据后单击命令按钮，窗体上将显示什么结果？ 问题6：如果要求显示结果 3 22 111 （按数值升序排序），应修改命令按钮单击事件中的哪一行？如何修改？(只允许修改一行) 问题7：请分别指出自定义过程abc和swap的作用域。 相关资料 |
