填空题在窗体上有一个列表，然后编写如下两个事件过程： Private Sub Form_Click() List1.RemoveItem 1:List1.RemoveItem 2 List1RemoveItem 3 End Sub Private Sub Form_Load() List1.AddItem"ItemA":List1.AddItem"ItemB'P List1.AddItem"ItemC ':List1.AddItem"ItemD" List1.AddItem"ItemE” End Sub 运行上面的程序，然后单击窗体，列表框中显示的项目是 (7) 。
填空题在窗体上画一个命令按钮和一个文本框，然后编写命令按钮的Click事件过程。程序运 行后，在文本框中输入一串英文字母（不区分大小写），单击命令按钮，程序可找出未 在文本框中输入的其他所有英文字母，并以大写方式降序显示到Text1中。例如，若在 Text1中输入的是abDfdb，则单击Command1按钮后Text1中显示的字符串是 ZYXWVUTSRQPONMLKJIHGEC。请填空。
Private Sub Command1_Click()
Dim str As String, s As String, c As String str = UCase(Text1)
s = ""
c = "Z"
While c >= "A"
If InStr(str, C）= 0 Then s = _________
End If
c = Chr$(Asc( C）_________ ) Wend
If s <> "" Then
Text1 = s
End If
End Sub
填空题有如下事件过程： Private Sub Form_Active() Dim Score(1 to 3)As Integer Dim i As Integer Dim t As Variant For i=3 To 1 step-1 Score(i)=2*i Next For Each t In Score Print t Next End Sub 程序运行后窗体上显示的值为______。
填空题能够将文本框控件隐藏起来的属性是 (6)
填空题窗体有名称为Command1的命令按钮及名称为Text1、能显示多行文本的文本框。程序运行后，如果单击命令按钮，则可打开磁盘文件c:/test.txt，并将文件中的内容(多行文本)显示在文本框中。下面是实现此功能的程序，请填空。 Private Sub Command1_Click() Text1=" " Number=FreeFile Open"c:/test.tXt"For Input As Number Do while Not EOF(______) Line Input # Number,s Text1.Text=Text1.Text+______+Chr(13)+Chr(10) Loop Close Number End Sub
填空题为了使标签能自动调整大小以显示全部文本内容，应把标签的{{U}} 【7】 {{/U}}属性设置为True。
填空题对下列二叉树进行中序遍历的结果为 (3) 。
填空题在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() Dim n As Integer n=Val(InputBox("请输入一个整数:")) If n Mod 3=0 And n Mod 2=0 And n Mod 5=0 Then Print n+10 End If End Sub 程序运行后，单击命令按钮，在输入对话框中输入60，则输出结果是______。
填空题随机文件使用Put语句写数据，使用 【14】 语句读数据。
填空题测试的目的是暴露错误，评价程序的可靠性；而{{U}} 【4】 {{/U}}的目的是发现错误的位置并改正错误。
填空题有以下程序： Private Sub Form_Activate() Fori=1 to 3 x=3 For i=i to 2 x=x+6 Next Next Print X End Sub 程序运行后，窗体上显示的结果为 (10)
填空题在窗体模块的声明段中用Public定义的变量可以在 (10) 模块中使用，而用Dim或Private关键字定义的变量可以在 (11) 模块中使用。
填空题同时按下______和“方向箭头”键也可以移动控件的位置。
填空题设有以下的循环：要求程序运行时执行3次循环体。请填空。 x=1 DO x=x+2 Print x Loop Until______
填空题在窗体上画一个命令按钮，其名称为Command1，然后编写如下程序：
Function M(x As Integer, y As Integer)
M=IIf(x＞y, x, y)
End Function
Private Sub Command1_Click()
Dim a As Integer, b As Integer
a=100
b=200
Print M(a, B)
End Sub
程序运行后，单击命令按钮，输出结果为{{U}} 【15】 {{/U}}。
填空题下列程序实现的功能是：当在窗体上单击时，把C盘根目录下的文件a1.txt，复制到 D盘，并取名为a2.txt。 Private Sub Form_Click() Dim Ch As String Open "c:/a1.txt" For 【8】 As #10 Open "d:/a2.txt" For Output As #20 Do While 【9】 Line Input #10, Ch 【10】 Loop Close #10 Close #20 End Sub
填空题如果要将某个菜单项设计为分隔线，则该菜单项的标题应设置为______。
填空题数据库系统中实现各种数据管理功能的核心软件称为
________
。
填空题在窗体上面两个名称分别为Command1和Command2、标题分别为“初始化”和“求和”的命令按钮。程序运行后，如果单击“初始化”命令按钮，则对数组a的各元素赋值；如果单击“求和”命令按钮，则求出数组a的各元素之和，并在文本框中显示出来，如下图所示。请填空。OptionBase1Dima(3，2)AsIntegerPrivateSubCommandl_Click()Fori=1To3Forj=1To2[9]=i+jNextjNextiEndSubPrivateSubCommand2_Click()Forj=1To3Fori=1To2s=s+a(j，i)NextiNextjText1.Text=[10]EndSub
填空题为了选择多个控件，可以按住 【6】 键，然后单击每个控件。