填空题以下程序用宋输出20个在开区间(10,87)中的随机整数R,每行输出4个整数。请完善下列程序。
Private Sub Command1_Click()
For I = 1 To 10
R ={{U}} 【9】 {{/U}}
Print R;
If I Mod 4=0 Then Print
Next I
End Sub
填空题模块独立性概念是模块化、抽象, 【4】 这些软件工程基本原理的直接产物。
填空题在窗体上画一个名称为Lablel的标签和一个名称为Listl的列表框。程序运行后,在列表框中添加若干列表项。当双击列表框中的某个项目时,在标签Labell中显示所选中的项目,如图所示。请在______处填入适当的内容,将程序补充完整。PrivateSubFormload()Listl.AddItem“北京”List1.AddItem“上海”List1.AddItem“河北”EndSubPrivateSub______()Labell.Caption=______EndSub
填空题假定建立了一个工程,该工程包括两个窗体,其名称(Name属性)分别为Form1和Form2,启动窗体为 Form1。在Form1画一个命令按钮Command1,程序运行后,要求当单击该命令按钮时,Form1窗体消失,显示窗体Form2,请在 【14】 和 【15】 处将程序补充完整。 Private Sub Command1_Click() 【14】 Form1 Form2. 【15】 End Sub
填空题在窗体上画一个命令按钮Command1,然后编写如下程序:
Private Sub Command1_Click()
Dim arr()As Integer
ReDim arr(3)
For i=0 To 3
alt(i)=i
Next i
x=InputBox("请输入一个数字:")
If Val(x)>4 Then
Re Dim arr(4)
arr(4)=x
End If
Me.Print(arr(4)-arr(3))
End Sub
程序运行后,单击命令按钮,在输入对话框中输入12,输出结果为{{U}} 【10】 {{/U}}。
填空题新建一个工程,内有两个窗体,窗体Form1上有一个命令按钮Command1,单击该按钮,
Form1窗体消失,显示Form2窗体,程序如下:
Private Sub Command1_Click()
______
Form2______
End Sub
试补充完整。
填空题表达式"12345"<>"12345"&"ABC"的值是______。
填空题在窗体上画一个名称为Label1的标签和一个名称为list1的列表框。程序运行后,在列表框中添加若干列表项。当双击列表框中的某个项目时,在标签kabel1中显示所选中的项目,如图所示。请在{{U}}【14】{{/U}}和{{U}}【15】{{/U}}处填入适当内容,将程序补充完整。PrivateSubForm_load()List1.Addltem"北京"List1.Addltem"上海"List1.Addltem"河北"EndSubPrivateSub{{U}}【14】{{/U}}()Label1.Caption={{U}}【15】{{/U}}EndSub
填空题二叉树是结点的有限集合,这个有限集合或者为{{U}} 【1】 {{/U}},或者由一个根结点及两棵不相交的二叉树组成,分别作为根的左子树和右子树。
填空题结构化程序设计的基本原则包括______、逐步求精、模块化和限制使用goto语句。
填空题软件工程研究的内容主要包括: 【4】 技术和软件工程管理。
填空题下列程序段的输出结果为______。
Dim S1(5)As Integer,S2(5)As Integer,S3(5)As Integer
N=4
ForI=1 To N
S1(I)=I
L=N+i-I
S2(I)=L
NextI
S3(5)=0
ForK=1 To N
S3(K)=S1(K)*S2(K)
S3(5)=S3(5)+S3(K)
NextK
PrintS1(3)=S1(5);S1(2)
PrintS2(4)=S3(1);S3(5)
填空题设有以下函数过程: Functio fun(m As Integer) As Integer Dim k As Integer, sum As Integer sum=0 For k=m To 1 Step -2 sum = sum+ k Next k fun=sum End Function 若在程序中用语句s=fun(10)调用此函数,则s的值为 ______。
填空题以下语句的输出结果 【1】 。 S$= "China" S$= "Shanghai"。 Print S$
填空题在面向对象方法中,允许作用于某个对象上的操作称为 【4】 。
填空题以下程序代码实现单击命令按钮Command1时生成20个(0,100)之间的随机整数,存于数组中,打印数组中大于50的数,并求这些数的和。 Private Sub Command.Click() Dim arr(1 To 20) For i=1 To 20 arr(i)= (14) Text1.Text=Text1.Textx Sum= (15) End If Next x Print Tab(20);"Sum=";Sum End Sub
填空题在Visual Basic 程序启动运行中设置一个封面窗口,显示一些有意义的信息,要求显示时间5秒。
Sub dlys(ByVal n As Single)
Dim tl As Single
Dim t2 As Single
t1 = Timer
Do
t2 = Timer
If t2 < t1 Then t2 = t2 + 86400
If t2 - tl > n Then Exit Do
{{U}} 【12】 {{/U}}
Loop
End Sub
Sub main( )
Form2. Show
dlys{{U}} 【13】 {{/U}}
{{U}} 【14】 {{/U}}
Form1. Show
End Sub
填空题语句x=InptuBox("请输入数据"),则X的数据能成为______类型的数据。
填空题一个项目具有一个项目主管,一个项目主管可管理多个项目,则实体“项目主管”与实体“项目”的联系属于
________
的联系。
