填空题下列程序运行后的输出结果是 (9) Private Sub f(k,s) s=1 For i=1 To k s=s*i Next End Sub Private Sub Command1_Click() Sum=0 For i=1 To 3 Call f(i,s) Sum=Sum+s Next Print Sum End Sub
填空题启动窗体在“工程属性”对话框中指定,为了打开该对话框,应执行 【7】 菜单中的 【8】 命令。
填空题在软件生命周期的各个阶段都会产生一系列的文件,如手册、数据和程序等,它们总称为 【3】 。
填空题数学公式(x+y)4的VB算述表达式是______。
填空题在窗体上画一个文本框,名称为Text1,画一个命令按钮,名称为Commandl。程序运行时,单击命令按钮,能将事先输入到文本框中的内容一个字符一个字符地写入顺序文件 test.dat中。请在空白处填上适当的内容,将程序补充完整。
Private Sub Command1_Click()
Open"c:/test.dat"For Output As #1
For I=1 to Len(Text1.text)
______
Next I
Close #1
End Sub
填空题以下所列程序的功能是:在窗体上有一个文本框控件,程序运行后,用户可以利用鼠标左键来拖动该文本框控件(注意:拖动时,文本框移动的距离和方向由鼠标指针移动的距离和方向来确定),按下鼠标右键则可以在文本框中显示出当前文本控件的位置。
Public yx As Integer
Public yy As Integer
Private Sub Form_ MouseMove(Button AS Integer,Shift As Integer,_
X As Single,Y As Single)
If Button=1 Then
Text1.Left={{U}} 【11】 {{/U}}
Text1.Top={{U}} 【12】 {{/U}}
End If
End Sub
Private Sub Form_ MouseDown (Button As Integer,Shift As Integer,_
X As Single,Y As Single)
If{{U}} 【13】 {{/U}}Then
yx=Text1.Left-X
yy=Text1.Top-Y
End If
If Button=2 Then
Text1.Text=“X坐标:”+Str(Text1.Left)+“Y坐标:”+Str(Text1.Top)
End If
End Sub
填空题在窗体上画一个列表框,然后编写如下两个事件过程:
Private Sub Form_Click()
List1.RemoveItem 1
List1.Removeltem 3
List1.RemoveItem 1
End Sub
Private Sub Form Load()
List1.AddItem "ItemA"
List1.AddItem "ItemB"
List1.AddItem "ItemC"
List1.AddItem "ItemD"
List1.AddItem "ItemE"
End Sub
运行上面的程序,然后单击窗体,列表框中所显示的项目为{{U}} 【10】 {{/U}}。
填空题在关系模型中,把数据看成是二维表,每一个二维表称为一个 (5) 。
填空题以下Prime过程,用于判断一个数是否为素数。素数是只能被1和数本身整除的自然数。一个自然数不是素数,就是合数。用被测试的数除以从2开始到该数本身的数,如果能除尽(余数为0),则为合数:如果都除不尽(余数均不为0),则为素数。请在划线处将下面过程补充完整: Function Prime(inputvar As Integer)As Integer For i= 2 To inputvar-1 If inpuwar Modi= 【13】 Then Go To comfinish End If Next i Prime=inputvar Print"素数" Go To 【14】 comfinish: Prime=inputvar Print"合数" finish: End Function
填空题在数据库管理系统提供的数据定义语言、数据操纵语言和数据控制语言中,{{U}} 【5】 {{/U}}负责数据的模式定义与数据的物理存取构建。
填空题在窗体上画两个文本框和一个命令按钮,然后在代码窗口中编写如下事件过程: Private Sub Command1_Click() Text1.Text="VB Programming" Text2.Text=Text1.Text Text1.Text="ABCD" End Sub 程序运行后,单击命令按钮,Text1文本框中显示的内容为______。
填空题数据结构分为逻辑结构与存储结构,线性链表属于
________
。
填空题在KeyDown和KeyUp事件过程中,当参数Shift的值为十进制数1,2,4时,分别代表Shift、{{U}} 【8】 {{/U}}、{{U}} 【9】 {{/U}}键。
填空题改变驱动器列表框的Drive属性值将引发卫士事件。
填空题对于输人的N个数进行快速排序算法的平均时间复杂度是{{U}} 【1】 {{/U}}。
填空题表达式Fix(-32)+Int(-24)的值为{{U}} 【7】 {{/U}}。
填空题在窗体上画一个列表框、一个命令按钮和一个标签。程序运行后,在列表框中选择一个项目,然后单击命令按钮,即可将所选择的项目删除,并在标签中显示列表框当前的项目数,下面是实现上述功能的程序,请填空。 Private Sub Form_Load() List1.AddItem"AAAAA" List1.AddItem"BBBBB" List1.AddItem"CCCCC" List1.AddItem"DDDDD" End Sub Private Sub Commandl Click() Dim L As Integer L= 【8】 If L>=0 Then List1.RemoveItem 【9】 Label1.Caption= 【10】 Else MsgBox"请选择要删除的项目" End If End Sub
填空题在名称为Form1的窗体上绘制一个文本框,其名称为Text1,在属性窗口中把该文本框的MultiLine属性设置为True,然后编写如下的事件过程: Private Sub Form Click() Open "d:/test/smtext1.txt" For Input As #1 Do While Not Line Input #1,aspects whole$=whole$+aspect$+Chr$(13)+Chr$(10) Loop Text1.Text=whole$ Close #1 Open "d:/test/smtext2.txt" For Output As #1 Print #1, ______ Close #1 End Sub 上述程序的功能是,把磁盘文件smtext1.txt的内容读到内存并在文本框中显示出来,然后把该文本框中的内容存入磁盘文件smtext2.txt。请填空。
填空题数据独立性分为逻辑独立性与物理独立性。当数据的存储结构改变时,其逻辑结构可 以不变,因此,基于逻辑结构的应用程序不必修改,称为_________。
填空题若要求输入密码时文本框中只显示“*”号,则应当在文本框的属性窗口中设置______属性。
