填空题在用通用对话框的ShowOpen显示“打开”文件对话框时,指定其中的文件类型为文本文件的格式为{{U}} 【6】 {{/U}}。
填空题面向对象的程序设计方法中涉及的对象是系统中用来描述客观事物的一个______。
填空题当对象得到焦点时,会触发 【10】 事件,当对象失去焦点时将触发 【11】 事件。
填空题在长度为n的顺序储的线性表中删除一个元素,最坏情况下需要移动表中的元素个数为______。
填空题________
是一种信息隐蔽技术,目的在于将对象的使用者和对象的设计者分开。
填空题{{U}}【5】 {{/U}}的功能是用于显示当前过程中的有关信息,当测试一个过程时,可在其中输入代码并立即执行。
填空题While………Wend循环对条件进行测试,如果条件一开始就不成立,则______。
填空题窗体上有一个命令按钮,数据文件data.txt的内容如下: "语文" "2001", 87 "数学" "2002", 75 "英语" "2003", 92 "体育" "2004", 66 Type bs aa As String * 2 bb As String * 4 cc As Integer End Type Private Sub command1_Click( Dim xs As bs Dim fl As Integer fl = FreeFile Open "d:/data.txt" For Input As #fl Do While Not EOF(fl) Input #fl, xs. aa, xs .bb, xs.cc List1.AddItem xs.bb List1.AddItem xs.aa List1.AddItem xs.cc Loop Print EOF(fl) Close End Sub 问:在列表框中第一行、第三行、第四行的内容是 【12】 、 【13】 、 【14】 。窗体上打印出的是 【15】 。
填空题在窗体上画一个命令按钮,然后编写如下事件过程: 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 程序运行后,单击命令按钮,输出结果是______。
填空题执行以下语句后,输出的结果是{{U}} 【13】 {{/U}}、{{U}} 【14】 {{/U}}。
A$="Good"
B$="Morning"
Print A$+B$
Print A$&B$
填空题在窗体上画一个名为Command1的命令按钮,然后编写如下程序: Private Sub Command1_Click() Dim i As Integer Sum=0 n=InputBox("Enter a number") n=Val(n) For i=1 To n Sum= (13) Next i Print Sum End Sub Function fun(t As Integer) As Long p=1 For i=1 To t p=p*i Next i (14) End Function 以上程序的功能是,计算1!+2!+3!+…+n!,其中n从键盘输入,请填空。
填空题GUI是指______。
填空题下面是用冒泡法将5个整数按升序排列,请将程序补充完整。
Sub GASR()
Dim m
m=Array(10,1,5,6,7)
For i=0 To 3
For j=______
If m(i) >=m(j) Then
______
m(i) =m(j)
m(j) =t
End If
Next j
______
For i=0 To 4
Print m(i)
Next i
End Sub
填空题结构化程序设计力祛的主要原则可以概括为自顶向下、逐步求精、{{U}} 【2】 {{/U}}和限制使用goto语句。
填空题面向对象的程序设计主要的优点包括与人类习惯思维方法一致、稳定性好、可重用性好、 【2】 和可维护性好等5个方面。
填空题在窗体上画一个命令按钮,然后编写如下程序: (假定变量x是一个窗体级变量) Dim x As Integer Sub inc(a As Integer) x=x+a End Sub Private Sub Command1_Click() inc 2 inc 3 inc 4 Print x; End Sub 程序执行后,单击Command1命令按钮,输出的结果是 【11】 。
填空题设在工程中有一个标准模块,其中定义了如下记录类型: Type Books Name As String*10 telNum As String*20 End Type 在窗体上添加一个名为Command1的命名按钮,要求当执行事件过程Command1_Click时,在顺序文件 Person.txt中写入一条记录。请在 【14】 中填入适当的内容,将程序被补充完整。 Private Sub Command1_Click( ) Dim B As 【14】 Open"c:/person.txt"For Output As #1 B.Name=Input Box(“输入姓名”) B.TelNum=InputBox(“输入学号”) Write#I,B,Name,B.TelNum Close #1 End Sub
填空题窗体上有一个名称为Text1的文本框和一个名称为Command1、标题为“计算”的命令按钮,如图所示。函数fun及命令按钮的单击事件过程如下,请填空。PrivateSubCommand1_Click()DimxAsIntegerx=Val(InputBox("输入数据"))Text1=Str(fun(x)+fun(x)+fun(x))EndSubPrivateFunctionfun(ByRefnAsInteger)IfnMod3=0Thenn=n+nElsen=n*nEndIf______nEndFunction当单击命令按钮,在输入对话框中输入2时,文本框中显示的是______。
填空题在窗体上建立一个单选钮组Option1和一个图片框Picture1,如下图所示。当选择不同的单选钮时,图片框中填充不同的图案,请填写程序的空白处,使程序完整。PrivateSubOption1_Click(________)DimH,WPicture1.ClsPicture1.FillStyle=________W=Picture1.ScaleWidth/2H=Picture1.ScaleHeight/2Picture1.Circle(W,H),W/2EndSub
填空题一个算法的空间复杂度是指该算法所耗费的{{U}} 【1】 {{/U}}。
