填空题假定定义了一个记录类型,名为Rt,同时建立了一个名为Sp.txt的文件,然后编写如下的程序段:
Dim Rv As Rt
r1=Len(Rv)
Open"Sp.txt" For Random As # 1
x=LOF(1)
n=x/r1
执行上面的程序段后,变量n中存放的是文件{{U}} 【6】 {{/U}}中所存放的是{{U}} 【7】 {{/U}}记录类型的记录数。
填空题执行下面的程序段后,S的值为
________
。
s=5
For i=-2.6 To 4.9 Step 0.6
s=s+1
Next i
填空题在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) a=Val(1nputBox(“请输入一个整数”)) b=Val(1nputBox(“请输入一个整数”)) Print a+b End Sub 程序运行后,单击命令按钮,在输入对话框中分别输入12和34,输出结果为 【10】
填空题Name属性的含义是______,窗体的默认Name属性是______。
填空题为了能自动放大或缩小图像框中的图形与图像框的大小相适应,必须把该图片框的Stretch属性设置为______。
填空题在名称为Form1的窗体上画一个文本框,其名称为Text1,在属性窗口中把该文本框的Muhiline属性设置为True,然后编写如下的事件过程: Private Sub Form_Click( ) Open“d:/test/smText1.txt"For lnput As#1 Do While Not 【14】 Line lnput#1,aspect$ whole$=wholes+aspect$+Chr$(13)+Chr$(10) Loop Text1.Text=whole$ Close#1 Open“d:/test/smtext2.txt"For Output As #1 Print #1, 【15】 Close#1 End Sub 上述程序的功能是,把磁盘文件,mText1.txt的内容读到内存并在文本框中显示出来,然后把该文本框中的内容存入磁盘文件smtext2.txt。请填空。
填空题在面向对象的语言中,______是程序设计的基本实体。
填空题软件测试的主要和重要的测试方法是通过测试数据和{{U}} 【3】 {{/U}}的设计来实现。
填空题下列程序段运行结果是______。
Dim c As Integer, num As Integer
num=29483
Do
c=num Mod 10
Print c:
num=num /10
Loop While num<>0
填空题一个窗体对象,其最先发生的事件是______事件,最后发生的事件是______事件。
填空题为了显示一个窗体,所使用的方法为{{U}} {{U}} 6 {{/U}}
{{/U}};而为了隐藏一个窗体,所使用的方法为{{U}} {{U}} 7 {{/U}} {{/U}}。
填空题下列事件过程的功能是:建立一个名为Data1的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整。
Private Type Ang
K As Integer
Sinx As Single
Cosx AS Single
End Type
Dim Ksc As Ang
Private Sub Form _Click( )
Dim Y As Single
Open{{U}} 【14】 {{/U}}
Y=3.14159/180
For I=1 To 90
Ksc.K=I
Ksc.Sinx=Sin(I*Y)
Ksc.Cosx=Cos(I*Y)
{{U}} 【15】 {{/U}}
Next I
Clise #2
End Sub
填空题在面向对象程序设计中,从外面看只能看到对象有外部特征,而不知道也无须知道数据的具体结构以及实现操作的算法,这称为对象的______。
填空题在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个命令按钮,并编写如下事件过程: Private Sub Command1 Click() CommonDialog1.Filter="All Files(*.*)|*.*|Text Files"_ &"(*.txt)|*.txt|Batch Files(*.bat)I*.bat" CommonDialog1 Filterlndex=1 CommonDialog1.ShowOpen MsgBox CommonDialog1.File Name End Sub 程序运行后,单击命令按钮,将显示一个“打开”对话框,此时在“文件类型”框中显示的是______;如果在对话框中选择d盘temp目录下的tel.txt文件,然后单击“确定”按钮,则在MsgBox信息框中显示的提示信息是______。
填空题有以下程序: Private Sub Form_Activate() For j=1 to 3 x=3 For i=1 to 2 x=x+6 Next Next Print x End Sub 程序运行后,窗体上显示的结果为______。
填空题下列过程的功能是:用来计算并输出S=1+1/2+1/3+…+1/100的值。请完善下列程序。 Function SumD(n As Integer)As Single s=1 i=1 Do i=i+1 S=S+1/i Loop Until ______ SumD=s End Function Private Sub Form_Click( ) sum1=SumD(100) Print "sum1=" : sum1 End Sub
填空题函数Str$(256.36)的值是 【6】 。
填空题衡量软件的模块独立性使用耦合性和内聚性两个定性的度量标准,其中______是度量一个模块功能强度的一个相对指标。
填空题算法的工作量大小和实现算法所需要的存储单元分别称为算法的 【1】 。
填空题下列程序的功能是计算两个自然数的最大公约数,界面如下图所示。给定的程序不完整,将程序补充完整。PrivateSubCommand1_Click()DimxAsLong,yAsLong,iAsLongx=Val(Text1.Text)y=Val(Text2.Text)Text3.Text=Str({{U}}【13】{{/U}})EndSubFunctionfun1(aAsLong,bAsLong)AsLongDimrAsLongDimtAsLongIf{{U}}【14】{{/U}}Thent=aa=bb=tEndIfr=aModbDoWhiler<>0a=bb=rr=aModbLoop{{U}}【15】{{/U}}EndFunction
