填空题有如下程序： DefStr X-Z X="123" Y="456" Z=X+Y Print Z End 运行后，输出结果是______。
填空题程序如下：
Private Sub Form_Click()
Const PI=3.14159
Dim r As Single，S As Single
R=InputBox("请输入圆的半径"，"输入数据"，"50")
S = PI*r*r
Print "S="；Format(S，"###，###.##")
End Sub
程序运行后，单击窗体，将显示一个输入对话框，输入数据35，单击“确定”按钮后，输出结果为{{U}} 【9】 {{/U}}。
填空题在进行模块测试时，要为每个被测试的模块另外设计两类模块：驱动模块和承接模块(桩模块)。其中 【3】 的作用是将测试数据传送给被测试的模块，并显示被测试模块所产生的结果。
填空题下列语句段在运行时的显示结果是______。 Cls x=10.34+8 Print Len(x)
填空题在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Fori=1 To 4
K=4
For j=1 To 3
K=3
For k=1 To 2
K=X+6
Next k
Next j
Next i
Print X
End Sub
程序运行后，单击命令按钮，输出结果是{{U}} 【14】 {{/U}}。
填空题在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1)，然后编写如下两个事件过程：
Private Sub Command1_Click()
a = Text1.Text + Text2.Text
Print a
End Sub
Private Sub Form_Load()
Text1.Text = " "
Text2.Text = " "
End Sub
程序运行后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入1234和4321，然后单击命令按钮，则输出结果为
________
。
填空题以下程序用来建立一个5×5矩阵，该矩阵两条对角线上的元素为1，其余元素为0，请补充完该程序。该程序运行结果如下图所示。PrivateSubformClick()Dims(5,5)AsIntegerforN=1To5forM=1To5if【13】Or【14】thenS(N,M)=1ElseS(N.M)=0EndifNextMNextNforN=1To5for【15】Picture1.PrintTab(M*3);s(N,M);NextMPrintNextNEndSub
填空题在数据库理论中，数据物理结构的改变，如存储设备的更换、物理存储的更换、存取方式等都不影响数据库的逻辑结构，从而不引起应用程序的变化，称为{{U}} 【4】 {{/U}}。
填空题以下程序段中Do...Loop 循环执行的次数为 【9】 。程序执行完毕后，n的值为 【10】 。 Private Sub Command1_Click() n =5 Do If n Mod 2= 0 Then n =n /2 Else n =n* 3 + 1 End If Loop Until n=1 End Sub
填空题在窗体画一个命令按钮，然后编写如下事件过程： Private Sub Command1_CIick() Dim a(1 To 10) Dim p(1 To 3) k=5 For i =1 To 10 a(i)=i Next i For i=1 To 3 p(i)=a(i*i) Next i For i=1 To 3 k=k+p(i)*2 Next i Print k End Sub程序运行后，单击命令按钮，输出结果是 【8】 。
填空题在程序的每个空白处填写一条适当的语句，使程序完成相应的操作。程序实现的功能是：窗体上有文本框Text1和若干复选框，其中复选框Check1设置文本框Text1显示的文本是否加下划线。Check1的单击事件过程如下：
Private Sub Check1_Click()
If______ Then
Text1.FontUnderline=Tree
ElseIf______Then
Text1.FontUndefiine=False
End If
End Sub
填空题设有程序： Option Base 1 Private Sub Command1_Click() Dim arrl, Max As Integer arrl=Array(12, 435, 76, 24, 78, 54, 866, 43) 【8】 =arrl(1) For i=1 To 8 If arrl(i)＞Max Then 【9】 Next i Print "最大值是:" ; Max End Sub 以上程序的功能是，用Array函数建立一个含有8个元素的数组，然后查找并输出该数组中元素的最大值。请填空。
填空题执行下面程序，第一行输出结果是{{U}} {{/U}}，第二行输出结果是{{U}} {{/U}}。 Option Explicit Private Sub Form_Click() Dim A As Integer A=2 Call Subl(A) End Sub Private Subl(x As Integer) x=x*2+1 If x＜10 Then Call Subl(x) End If x=x*2+1 Print x End Sub
填空题在窗体上画一个名称为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=Ubound(b)
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)的值互换，……。请填空。
填空题在Visual Basic的中断模式下，要想“逐语句”调试程序，可按{{U}} 【9】 {{/U}}键；要想“逐过程”调试程序，可按{{U}} 【10】 {{/U}}键。
填空题为了在运行时把d:/pic文件夹下的图形文件a.jpg装入图片框Picture1，所使用的语句为{{U}} 【8】 {{/U}}。
填空题窗体的对象名用______表示。
填空题软件测试用例包括输入值集和______值集。
填空题问题处理方案的正确而完整的描述称为【5】。
填空题当数据的物理结构(存储结构)改变时，不影响数据库的逻辑结构，从而不致引起应用程序的变化，这是指数据的{{U}} 【5】 {{/U}}。