填空题在程序的空白行处填写适当的语句,完成下列功能:依次自动将列表框List2中所有列表项目移入列表框List1中,并将移入List1中的项目从List2中删除。
Do While List2 ListCount
______
List2. Removeltem 0
Loop
填空题以下语句的输出结果是 【8】 。 S$="China" S$="Beijing" print S$
填空题以下程序的功能是:把顺序文件smtext1.txt的内容全部读入内存,并在文本框Text1中显示出来。请填空。 Private Sub Command1_Click() Dim inData As String Text1.Text=" " Open"smtext1.txt" (13) As (14) Do While (15) Input #2 ,inData Text1.Text=Text1.Text&inData Loop Close #2 End Sub
填空题表达式Fix(-32.68)+Int(-23.02)的值为 【10】 。
填空题在执行KeyPress事件过程时,KeyAscii是所按键的 (13) 值。对于有上档字符和下档字符的键,当执行KeyDown事件过程时,KeyCode是 (14) 字符的ASCII值。
填空题下列事件过程的功能是:通过Form _ Load事件给数组赋初值为35、48、15、22、67,Form_Click事件找出可以被3整除的数组元素并打印出来。请在空白处填人适当的内容,将程序补充完整。 Dim Arr ( ) Private Sub Form _ Load( ) 【8】 End Sub Private Sub Form _ Click( ) 【9】 If Int(x/3)=x/3 Then Print x End If Next x End Sub
填空题读下列程序: Pfivme Sub Form_Crick() Stmic X(4) As Integer Fori=1 To 4 x(i)=x(i)+i*3 Nexti Print Fori=1 To 4 Print"x(";i;")=":x(i); Nexti End Sub 该程序在运行了三次后,其最终结果是______。
填空题根据数据的编码方式,文件分为______和______。
填空题扩展名为.bas的文件称为______。
填空题下列程序计算Sn的值。Sn=a+aa+aaa+…+aaa…a,其中最后一项为n个。 例如:a=5,n=4时,则Sn=5+55+555+5555。请在空白处填入适当的内容,将程序补充完整。 Private Sub Command1_Click() Dim a As Integer,n As Integer,Cout As Integer Dim Sn As Long,Tn As Long Cout=1 Sn=0 Tn=0 a=InputBox("请输入a的值:") n=InputBox("请输入n的值!") Do Tn=Tn*10+a Sn=Sn+Tn Cout=Cout+1 ______ Debug Print a,n,Sn End Sub
填空题下列软件系统结构图的宽度为{{U}}【1】{{/U}}。
填空题算法一般都可以用选择结构、循环结构和{{U}} 【3】 {{/U}}结构组合而成。
填空题假定有以下当循环:
While Not条件
循环体
Loop
则执行循环体的“条件”是
________
。
填空题可以把具有相同属性的一些不同对象归类,称为{{U}} 【3】 {{/U}} 。
填空题设窗体上有一个名称为Combo1的组合框,并有以下程序: Private Sub Combo1_KeyPress(KeyAscii As Integer) If (9) =13 Then '回车符的ASCII码是13 For k=0 To Combo1.ListCount-1 If Combo1.Text=Combo1.List(k) Then combo1.Text="" Exit For End If Next k If Combo1.Text<> "" Then Combo1.AddItem (10) End If End If End Sub 程序的功能是:在组合框的编辑区中输入文本后按回车键,则检查列表中有无与此文本相同的项目,若有,则把编辑区中的文本删除,否则把编辑区中文本添加到列表的尾部,请填空。
填空题滚动条的最小值属性是______,最大值属性是______。
填空题程序执行结果S的值是{{U}} 【11】 {{/U}}。
Private Sub Command1_Click()
i=0
Do
i=i+1
s=i+s
Loop Until i>=4
Print s
End Sub
填空题窗体上有名称为Command1的命令按钮。事件过程及2个函数过程如下: Private Sub Command1_Click() Dim x As Integer,y As Integer,z x=5 y=8 z=fy(y) Print fx(fx(x)),y End Sub Function fx(ByVal a As Integer) a=a+a fx=a End Function Function fy(ByRef a As Integer) a=a+a fy=a End Function 运行程序,并单击命令按钮,则窗体上显示的2个值依次是 (7) 和 (8) 。
填空题对测试阶段中没有发现的错误所进行的测试、诊断、定位、纠错以及验证修改的回归测试过程称为{{U}} 【4】 {{/U}}性维护。
填空题在两种基本测试方法中,
________
测试的原则之一是保证所测模块中每一个独立路径至少要执行一次。
