填空题将语句"MsgBox msg,type"中的"type"参数设置为2,则单击命令按钮会弹出一个对话框,其中的按钮有______、______和______。
填空题在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,然后编写如下事件过程:
Private Sub Command1_Click()
Dim inData As String
Text1.Text=""
Open"d:/myfile.txt" For{{U}} 【14】 {{/U}}As#1
Do While{{U}} 【15】 {{/U}}
Input #1,inData
Text1.Text=Text1.Text+inData
Loop
Close#1
End Sub
程序的功能是,打开D盘根目录下的文本文件myfile.txt,读取它的全部内容并显示在文本框中。请填空。
填空题在窗体中添加一个命令按钮,然后编写如下代码:
Private Sub Command1_Click()
a=InputBox("请输入一个整数")
b=InputBox("请输入一个整数")
Print Val(a)+Val(b)
End Sub
程序运行后,单击命令按钮,在输入对话框中分别输入21和45,输出结果为{{U}} 【10】 {{/U}}。
填空题下列程序的功能是:找出给定的12个数中最大的一个数,然后输出这个数以及它在原来12个数中的位置。请填空。 Option Base 1 Private Sub Form_Click() Dim x x=Array(57,-9,17,42,-31,46,11,8,6,-4,3,90) Max=1 For k=2 To 10 Step 1 lfx(k)>x(Max)Then ______ End If Next k y=______ Print Max,y End Sub
填空题顺序存储方法是把逻辑上相邻的结点存储在物理位置{{U}} 【4】 {{/U}}的存储单元中。
填空题以下程序的功能是:生成20个200到300之间的随机整数,输出其中能被5整除的数并求出它们的和。请填空。 Private Sub Command1_Click( ) For i=1 To 20 x=Int( 【6】 *100+200) If 【7】 =0 Then Print x S=S+ 【8】 End lf Next i Print"Sum=";S End Sub
填空题若已在窗体中加入一个通用对话框,要求在运行时,通过ShowOpen打开对话框时只显示扩展名为.doc的文件,则对通用对话框的Filter属性正确的设置是 (14) 。
填空题有如下程序,该程序的执行结果是 【6】 。 Private Sub Command1_lick() For i= 1 To 4 x= 4 For j =1 To 3 x =3 For k=1 To 2 X= K+5 Next k Next j Next i Print x End Sub
填空题要想在文本框中显示垂直滚动条,必须把______属性设置为2,同时还应把MultiLine属性设置为True。
填空题在面向对象方法中,类之间共享属性和操作的机制称为 【2】 。
填空题以下程序用来计算由键盘输入的N个数中正数之和,负数之和,正数的个数,负数的个数。其中用C累加负数之和,IC累加负数的个数,D累加正数之和,ID累加正数的个数。
Privae Sub Commandl_Click
N=10
C=0:IC=0:D=0:ID=0
For =1 To N
A=Val(1nputBox(“请输入A”))
IFA<0 Then C=C+A:IC=IC+1
lf A>O Then D={{U}} {{/U}}
Next K
Print"负数的个数为:",IC
Print"负数的和为:",C
Print"正数的个数为:",ID
Print"正数的和为:",D
End Sub
填空题下面是程序是计算给定函数的值,自变量x,y的值用InputBox函数输入,函数如下: 程序不完整,请填空,将程序的补充完整 OptionExplicit DimxAsSingle DimyAsSingle DimzAsSingle PrivateSubCommand1_Click________ x=Val(InputBox("x=")) y=Val(InputBox("y=")) PrivateSubCommand2_Click________ If 【13】 Then z=x^2+y^2 ElseIf 【14】 Then z=x^2-2*y^2 【15】 z=y^2-3*x^2 EndIf Form1.Print"当x,y的值为:";x,y Form1.Print"f(x,y)的值为:":z Endsub
填空题菜单编辑器可分为3个部分,即数据区、______和菜单项显示区。
填空题在窗体中添加一个命令按钮,然后编写如下代码: Private Sub Command1_Click() a=InputBox("请输入一个整数") b=InputBox("请输入一个整数") Print Val(a)+Val(b) End Sub 程序运行后,单击命令按钮,在输入对话框中分别输入21和45,输出结果为 【10】 。
填空题菜单编辑器的“名称”选项对应于菜单控件的______属性。
填空题在窗体上画两个文本框和一个命令按钮,然后在代码窗口中编写如下事件过程: Private Sub Command1_Click() Text1.Text="VB Programming" Text2.Text=Text1.Text Text1.Text="ABCD" End Sub 程序运行后,单击命令按钮,两个文本框中显示的内容分别为 (8) 和 (9) 。
填空题为了选择多个控件,可以按住______键,然后单击每个控件。
填空题假定有一个名为pic2.gif的图形文件,要在运行期间把该文件装入一个图片框(Picturel),应执行的语句是______。
填空题表达式“12+34”的值是 【6】 ,表达式“12”&“34”的值是 【7】 。