填空题若要添加CommonDialog控件，则应从“工程”菜单中选定“部件”，在“部件”对话框的“控件”选项卡中选择______，将控件添加到工具箱中。
填空题如果在D盘当前文件夹下已2经存在名为PIC．day的顺序文件，那么执行语句Open "D:/PIC．dat" For Append As #1 之后将{{U}} 【7】 {{/U}}。
填空题由Visual Basic系统事先设定的，能被对象识别和响应的动作称为 【6】 。
填空题在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() Dim a(10)As Integer For i=1 To 10 a(i)=i Next Call swap (______) For i=1 To 10 Print a(i) Next End Sub Sub swap(b()As Integer) n=______ For i=1 To n/2 t=b(i) b(i)=b(n) b(n)=t ______ Next End Sub 上述程序的功能是，通过调用过程swap，调换数组中数值的存放位置，即a(1)与a(10)的值互换，a(2)与a(9)的值互换。请填空。
填空题语句PopupMenu PMENU，4 Or 2，，，PMENU3K中：
其中PMeNU表示{{U}} 【14】 {{/U}}
填空题数据库模型提供了两个映像功能，第一种映像使得数据存储结构改变时，逻辑结构不变，因而相应的应用程序也不变，这就是它们的 【5】 独立性。
填空题在Select case 结构中，使用“To表达式”来指定一个范围时，必须把{{U}} 【15】 {{/U}}的值写在前面。
填空题算法的基本特征是可行性、确定性、{{U}} 【1】 {{/U}}和拥有足够的情报。
填空题设有如下程序 Private Sub Search(a()As Variant,By Val key As Variant,index%) Dim I% For I=LBound(a) To UBound(a) If key=a(I) Then Index=I Exit Sub End If Next I Index=-1 End Sub Private Sub Form_Load() Show Dim b() As Variant Dim n As Integer b=Array(1,3,5,7,9,11,13,15) Call Search(b,11,n) print n End Sub 程序运行后，输出结果是______。
填空题Visual Basic中允许出现的数为______。
±25.74 3．47E-10 .368 1.87E+50
10^(1.256) D32 2.5E 12E3
34.75D+6 0.258
填空题在窗体上画一个标签、一个计时器和一个命令按钮，其名称分别为Label1、Timer1和Command1，如下图左图所示。程序运行后，如果单击命令按钮，则标签开始闪烁，每秒钟“欢迎”二字显示、消失各一次，如下图右图所示。以下是实现上述功能的程序，请填空。PrivateSubFormLoad()Label1.Caption="欢迎"Timer1.Enabled=FalseTimer1.Interval=______Command1.Caption="开始闪烁"EndSubPrivateSubTimer1_Timer()Label1.Vjsiblc=______EndSubPrivateSubCommand1_Click()______EndSub
填空题排序是计算机程序设计中的一种重要操作，常见的排序方法有插入排序、 【1】 和选择排序等。
填空题下列程序实现的功能是：当在窗体上单击时，把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 20End Sub
填空题窗体、图片框或图像框中的图形通过对象的{{U}} 【9】 {{/U}}属性设置。
填空题本程序的功能是利用随机函数模拟投币，方法是：每次随机产生一个0或1的整数，相当于一次投币，1代表正面，0代表反面。在窗体上有三个文本框，名称分别是Text1、Text2、Text3，分别用于显示用户输入投币总次数、出现正面的次数和出现反面的次数，如图所示。程序运行后，在文本框Textl中输入总次数，然后单击“开始”按钮，按照输入的次数模拟投币，分别统计出现正面、反面的次数，并显示结果。以下是实现上述功能的程序，请填空。PrivateSubCommand1_Click()Randomizen=CInt(Text1.Text)n1=0n2=0Fori=1Tor=Int(Rnd*2)Ifr=Thenn1=n1+1Elsen2=n2+1EndIfNextText2.Text=n1Text3.Text=n2EndSub
填空题下列程序弹出对话框中按钮的个数为 (14) 。 MsgBox”确认！",vbAbortRetryingore+vbMsgBoxHelpButton+vblnformation,"提示；”
填空题假定建立了一个工程，该工程包括两个窗体，其名称(Name属性)分别为Form1和Form2，启动窗体为 Form1。在Form1中画一个命令按钮Command1，程序运行后，要求当单击该命令按钮时，Form1窗体消失，显示窗体Form2，请将程序补充完整。 Private Sub Command1_Click() 【8】 Me Form2． 【9】 End Sub
填空题为了把寻个Visual BASIC应用程序装入内存，只要装入
________
文件即可。
填空题设有如下通用过程：
Public Sub Fun(a()，ByVal x As Integer)
For i=1 To 5
x=x+a(i)
Next
End Sub
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下的事件过程：
Private Sub Command1_Click()
Dim arr(5)As variant
For i=1 To 5
arr(i)=i
Next
n=10
Call Fun(arr()，n)
Text1.Text=n
End Sub
程序运行后，单击命令按钮，则在文本框中显示的内容是{{U}} 【8】 {{/U}}。
填空题如果不指明函数过程参数的类型，则该参数的数据类型为
________
。