填空题有如TNP定义类型及操作语句：
Type Student
SNo As String
SName As String
IAge As Integer
End Type
Dim Stu As Student
With Stu
.SNo="200609001"
.SName="陈果果"
.IAge=19
End With
执行MsgBox Stu.IAge后，消息框的输出结果是______。
填空题在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Do Until b ＜ 0 a = InputBox( "输入a的值" ) a = Val(A) b = InputBox( "输入b的值" ) b =VM(B) a=a+b Loop Print a End Sub程序运行后，依次输入5,4,3,2,1,0,-1,-2,则输出结果是 【15】 。
填空题下面程序段的运行结果是{{U}} 【14】 {{/U}}。
Option Base 1
Private Sub swap(a()As InteSer)
For I=1 to 10/2
t=a(i)
a(i)=a(10-1+1)
a(10-1+1)=t
Next1
End Sub
Private Sub Form_Click()
Dim x(10)As Integer
For I=1 to 10
x(i)=I*2
Next1
Swap x()
For1=1 to 10
Print x (i)
Next I
End Sub
填空题假定w、x、y、z、m均为int型变量，有如下程序段： w = 1; x = 2; y = 3; z = 4; m = (w＜x)? w:x; m = (m＜y)? m:y; m = (m＜z)? m:z;运行程序后，m的结果是______。
填空题在窗体中添加一个命令按钮Command1和一个文本框Text1，编写如下代码： Private Sub Command1_Click() Dim x As Integer，y As Integer，z As Integer a=5，b=10，c=0 Me!Text1=" " Call p1(a,b,c) Me!Text1=12 End Sub Sub pl(XxAs Integer，y As Integer，z As Integer) z=x+y End Sub 程序运行后，文本框中应显示的内容为______。
填空题执行下面的程序段后，变量S的值为{{U}} 【13】 {{/U}}。
S=5
For i=2.6 To 4.9 Step 0.5
S=S+1
Next i
填空题建立了一个窗体，窗体中有一命令按钮，单击此按钮，将打开一个查询，查询名为”qT”，如果采用VBA代码完成，应使用的语句是 【9】 。
填空题排序时如果选取了多个字段，则结果是按 【6】 开始排序的。
填空题二维表中的一行称为关系的一个{{U}} 【6】 {{/U}} 。
填空题一个算法应该具有下面三个重要的特性：可行性、 【1】 、有穷性。
填空题全面支持软件开发过程的软件工具集合称为______。
填空题软件调试的方法包括：强行排错法、 【2】 和原因排除法。
填空题在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程。 Private Sub Command1_Click() Dim i As Integer Dim city As Variant city=Array("北京"，"上海"，"天津"，"重庆") For i=0 To 2 city(i)=city(i+1) Next i MsgBox city(2) End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是______。
填空题在创建报表的过程中，可以控制数据输出的内容、输出对象的显示或打印格式，还可以在报表制作的过程中，进行数据的{{U}} 【7】 {{/U}}。
填空题下面程序的运行结果为 【9】 。 x+-2.3 y=125 z=Len (Str＄(x)+Str＄(y)) Print 2
填空题已经设计出一个表格式表单窗体，可以输出学生表的相关字段信息。请按照以下功能补充设计：改变当前记录，消息框弹出提示“是否删除该记录?”，单击“是”按钮，则直接删除该当前记录；单击“否”按钮，则什么都不做。其效果图如下：单击“退出”按钮，关闭窗体。PrivateSubbtnCancel_Click()DoCmd.CloseEndSubPrivatesub(13)()IfMsgBox("是否删除该记录?",vbQuestion+vbYesNo,"确认")=(14)Then(15)EndIfEndSub
填空题运行下面程序，其输出结果(str2的值)为 【13】 。Dim strl, str2 As StringDim i As Integerstr1="abcdef"For i= 1 To Len(str1)Step2 str2=UCase(Mid(str1，i，1))+str2NextMsgBox str2
填空题Visual Basic中，允许一个变量未加定义直接使用，这样VB即把它当做变体类型的变量。若使用Dim语句定义这种类型的变量，则在As后面应使用{{U}} 【7】 {{/U}}关键字。
填空题VBA的运行机制是 【7】 。
填空题如果希望按满足指定条件执行宏中的一个或多个操作，这类宏称为{{U}} 【9】 {{/U}}。