填空题对软件是否能达到用户所期望的要求的测试称为{{U}} 【4】 {{/U}}。
填空题浮点数由3部分组成，即符号、 【7】 和尾数。
填空题在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后编写如下两个事件过程：
Private Sub Command1_Click1()
S$=InputBox("请输入一个字符串")
Text1.Text=S$
End Sub
Private Sub Text1_Change()
Label1.Caption=UCase(Mid(Text1.Text,7))
End Sub
程序运行后，单击命令按钮，将显示一个输入对话框，如果在该对话框中输入字符串“VisualBasic”，则在标签中显示的内容是______。
填空题在窗体上画 1 个文本框，名称为 Text1，然后编写如下程序：
Private Sub Form_Load()
Open "d:/temp/dat.txt" For Output As #1
Text1.Text = "" End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer) If _________= 13 Then
If UCase(Text1.Text) = _________Then
Close #1
End
Else
Write #1, _________
Text1.Text = ""
End If
End If
End Sub
以上程序的功能是，在D盘temp目录下建立1个名为dat.txt的文件，在文本框中输入字符，每
次按回车键（回车符的ASCII码是13）都把当前文本框中的内容写入文件dat.txt，并清除文 本框中的内容；如果输入"END"，则结束程序。请填空。
填空题下面程序用来计算：PrivateSubCommand1_Click()A=Val(Text1.Text)B=Val(Text2.Text)SelectCaseACase{{U}}【11】{{/U}}N=A+BCaseIs=5N=B/ACaseIs＜5N=0EndSelectText3.Text=NEndSub
填空题数据模型是数据库系统中用于提供信息表示和操作手段的结构形式。实际数据库系统中斯支持的数据模型主要有层次模型、网状模型和{{U}} 【5】 {{/U}}3种。
填空题在窗体上设计两个复选框，一个显示粗体，另一个显示斜体，通过对复选框的选择，在一个文本框中显示相应效果的文本，请完成下列程序。 Private Sub Form. Load() Check1. Caption="显示粗体" Check2. Caption="显示斜体" Text1. Text="May you a happy day!" End Sub Private Sub Check1 Click0 If______=1 Then Text1. FontBold=True Else Text1. FontBold=False EndIf End Sub Private Sub Cbeck2_Click() If Check2. value=1 Then Text1. ______ Else Text1. ______ End If End Sub
填空题在单链表中，要删除一个指定的结点，必须要找到该结点的 【1】 。
填空题语句Form2.Show0表示 【10】 ； 语句Form3.Show1表示 【11】 ；
填空题用户可以用{{U}} 【6】 {{/U}}语句定义自己的数据类型。
填空题下列函数调用时弹出的对话框中按钮的个数为{{U}} 【3】 {{/U}}。
MsgBox("程序非法!"，vbAbortRetryIgnore，"消息提示：")
填空题若A=20，B=80，C=70，D=30，则表达式A+B＞160 Or(B*C＞200And Not D＞60)的值是______。
填空题在名称为Forml的窗体上绘制一个文本框，其名称为Text1，在属性窗口中把该文本框的MultiLine属性设置为True，然后编写如下的事件过程： Private SUb Form_CnCk() Open"d:/tes/smtext1.txt"For Input AS #1 Do While Not EOF(1) Line Iput #1,aspect$ whole$=whole$+aspect$+Chf$(13)+Chr$(10) Loop Text1.Text=whole$ Close #1 Open"d:/test/smtext2.txt"For OutpUt As #1 Print #1,______ Close #1 End Sub 上述程序的功能是，把磁盘文件smtext1.txt的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件smtext2.txt。
填空题软件测试是保证软件质时的重要手段，而软件测试的主要的测试数据和 【3】 的设计来实现。
填空题以下程序的功能是：把当前目录下的顺序文件smText1. txt的内容读入内存，并在文本框Text1中显示出来。请填空。 Private Sub Command1_Click() Dim inData As String Text1. Text="" Open". /mText1. txt" 【14】 As 1 Do While 【15】 Input #1, inData Text1. Text=Text1. Text & inData Loop Close #1 End Sub
填空题算法一般都可以用选择结构、循环结构和 【3】 结构组合而成。
填空题窗体上有一个名称为Combo1的组合框，其初始内容为空，有一个名称为Command1、标题为“添加项目”的命令按钮，程序运行后，如果单击命令按钮，会将给定数组中的项目添加到组合框中，如图所示，请填空。OptionBase1PrivateSubCommand1_Click()DimcityAsVariantcity=______("北京","天津","上海","武汉","重庆","西宁")Fori=______ToUBound(city)Combo1.AddItem______NextEndSub
填空题在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Dim a(1 To 10) Dim p(l 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 = I To 3 k = k + p(i)* 2 Next i Print k End Sub 程序运行后，单击命令按钮，输出结果是 【13】 。
填空题下面程序运行后，单击命令按钮，输出的结果是______。 Private Sub Command1_Click() Dim a%(1 To 5),1%,s# For i=1 To 5 a(i)=i Next s=Fun(A) Print“s=”；s； End Sub Function Fun(a() As Integer) Dim t#,i% t=1 For i=LBound(A) To UBound(A) t=t*a(i) Next Fun=t End Function
填空题设A=27，则Hex(A)={{U}} [8] {{/U}}，Oct(A){{U}} [9]
{{/U}}。