填空题在窗体上画1个命令按钮，其名称为Command1，然后编写如下事件过程： PriVate Sub
Commandl_CUck() Dimalt(1 To 100)As Integer
Fori=1 To 100
arr(i)=Int(Rnd*1000) Nexti
Max=arr(1) Min=arr(1) Fori=1
To 100 If{{U}} [12] {{/U}}Then
Max=arr(i) End
If If{{U}} [13] {{/U}}Then
Min=arr(i) End
If Nexti
Print"Max="；Max，"Min="；Min End Sub
程序运行后，单击命令按钮，将产生100个1000以内的随机整数，放入数组alt中，然后查找并输出这100个数中的最大值Max和最小值Min，请填空。
填空题排序是计算机程序设计中的一种重要操作，常见的拌序方法有插入排序、______和选择排序。
填空题将C盘根目录下的图形文件moon.jpg装入图片框Picture1的语句是 【6】 。
填空题能判断是否到达文件尾的函数是
________
。
填空题Visual Basic 6.0分为3种版本，这3种版本是______、______和______。其中，最完整的是______。
填空题假定一个文本框的Name属性为Text1，为了在该文本框中显示“Hello!”，所使用的语句为 【6】 。
填空题工程中有Form1、Form2两个窗体。Form1窗体外观如下图左图所示。程序运行时，在Form1中名称为Text1的文本框中输入一个数值(圆的半径)，然后单击命令按钮“计算并显示”(其名称为Command1)，则显示Form2窗体，且根据输入的圆半径计算圆的面积，并在Form2的窗体上显示出来，如下图右图所示。如果单击命令按钮时，文本框中输入的不是数值，则用信息框显示“请输入数值数据”。请填空。PrivateSubCommand1_Click()IfText1.Text=""ThenMsgBox"请输入半径!"ElseIfNOtIsNumeric(______)ThenMsgBox"请输入数值数据!"Elser=Val()Form2.show______.Print"圆的面积是"＆3.14*r*r＆EndIfEndSub
填空题下列程序的输出结果为【 】。
num=2
While num<=3
num=num+1
Print num
Wend
填空题下列程序的运行结果是 【6】 。 X=96 Y=10 X=X Mod Y^2 X=X/4 Print X
填空题设当前日期为2007年12月27日，星期四，则执行下面语句后的输出结果为______。 Print Day(Now) Print Month(Now) Print Year(Now) Print Weekday(Now)
填空题要想在文本框中显示垂直滚动条，必须将 【10】 属性设置为2，同时还应将MultiLine属性设置为True。
填空题在属性窗口中，有些属性具有预定值，在这些属性上双击属性值可以______。
填空题表达式3^2 Mod 36/ 2^5的值是{{U}} 【6】 {{/U}}
填空题下列程序的功能是：将数据1，2，…，8写入顺序文件Num.txt中，请补充完整。 Private Sub Form_Click() Dim i As Integer Open "Num.txt"For Output As#1 For i=1 To 8 (15) Next Close#1 End Sub
填空题启动窗体在{{U}} 【15】 {{/U}}对话框中指定。
填空题编写如下通用过程： Sub proc(By Val Rum As Long，ByRef ren As Long) Dim k As Long K=1 hum=Abs(NUN) Do While num k=k*(num Mod 10) num=num/10 Loop ren=k End Sub 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Dim m As Long, r As Long n=InputBox("请输入一个整数") n=CLng(n) proc n, r Print r End Sub 程序运行后，单击命令按钮，在输入对话框中345，输出结果是______。
填空题如右图所示的二叉树，若按后序遍历，则其输出序列为______。
填空题下列程序段用于实现以下功能：随机产生一个100以内的整数，从键盘上输入一个数，计算机提示输入的数是否与随机整数一样。请填空。 Private Sub Command1_Click() RANDOMIZE a = 【1】 Do Input "请输入一个数字:", n If n = a Then Print "Good!" 【2】 ElseIf n＞a Then Print "大了" Else Print "小了" End If Loop End Sub
填空题创建一个命令单击事件，该事件在单击命令按钮后，打开Form 2窗体，并要求Form 2窗体打开后，Form 1窗体既不清除也不显示，程序代码如下，请补充完整。
Private Sub Command1_ Click()
Form2. ______
Form1. ______
End Sub
填空题新建一个工程，内有两个窗体，窗体Form1上有一个命令按钮Command1，单击该按钮，Form1窗体消失，显示Form2窗体，程序如下：
Private Sub Command1_Click() {{U}} {{U}}
12 {{/U}} {{/U}} Form2.{{U}} {{U}}
13 {{/U}} {{/U}} End Sub 试补充完整。