填空题为了在运行时将“d:/pic”文件夹下的图形文件“a.jpg”装入图片框Picture1，所使用的语句为
________
。
填空题在窗体上画一个文本框，名称为Text1，然后编写如下程序：
Private Sub Form_Load()
Open "d:\temp\dat.txt" For Output As #1
Text1.Text=" "
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii=13 Then
If UCase(Text1.Text)= 【 】Then
Close #1
End
Else
Write #1，【 】
Text1.Text=" "
End If
End If
End Sub
以上程序的功能是：在D盘temp文件夹下建立一个名为dat.txt的文件，在文本框中输入字符，每次按回车键都把当前文本框中的内容写入文件dat.txt，并清除文本框中的内容；如果输入“END”，则不写入文件，直接结束程序。请填空。
填空题窗体中有图片框(Pieture1)和计时器(Timer1)两个控件。运行程序时，将图片加载到图片框中，然后图片框以每2秒钟一次的速度向窗体的右下角移动，每次向左，向右移动100twip。请填空。 Private Sub Form_ Load() Picture1_icture=LoadPicture(“c:/pic/mouth.ico”) 【6】 .Interval=2000 End Sub Private Sub Timer1_ Timer() Static x，y As Integer x=x+100 y=y+100 Pictuer1.Move [x, y] End Sub
填空题在窗体上有二个名称为Command1的命令按钮和一个名称为Text1的文本框。程序运行后,Command1为禁用(灰色),此时如果在文本框中输入字符,则命令按钮Command1变为可用。请填空。
Private Sub Form_Load()
Commandl.Enabled=False
End Sub
Private Sub Text1【 】()
Commandl.Enabled=True
End Sub
填空题以下程序段执行后y的值是 【7】 。 x=8.6 y=int(x+0.5) print y
填空题窗体KeyUp事件过程如下，启动程序后按小写字母“a”，输出结果为______。 Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer) Print Chr(KeyCode) End Sub
填空题下列语句的输出结果是{{U}} 【6】 {{/U}}。
Print Format(Int(12345.6789* 100＋0.5)/100，"0000,0.00")
填空题软件工程的出现是由于 【2】 。
填空题假定建立了一个工程，该工程包括两个窗体，其名称(Name属性)分别为Form1和 Form2，启动窗体为Form1。在Form1上画一个命令按钮Command1，程序运行后，要求当单击该命令按钮时，Form1窗体消失，显示窗体Form2，请将下面的程序补充完整。 Private Sub Command1_click() 【14】 Form1 Form 2. 【15】 End Sub
填空题表示“A和B之一为零但不同时为零”的VB表达式为{{U}} 【3】 {{/U}}。
填空题在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程： Private Sub Form_Click( ) Text1.Text=“VB程序设计” End Sub PrivmeSubText1_Change() Picture1.Print"VB Programming" End Sub 程序运行后，单击窗体，则在文本框中显示的内容是 【7】 ，而在图片框中显示的内容是 【8】 。
填空题Visual Basic提供的对数据文件的三种访问方式为随机访问方式、______ 和二进制访问方式。
填空题一个消息由三个部分组成：接收消息的对象的名称、______和零个或多个参数。
填空题关系式x≤-5或x≥5所对应的布尔表达式是{{U}} 【6】 {{/U}}。
填空题Visual Basic中的控件分为3类，它们是标准控件、
________
和可插入对象。
填空题数据库系统的主要特点为数据集成性、数据的高______和低冗余性、数据独立性，以及数据统一管理和控制。
填空题测试的目的是暴露错误，评价程序的可靠性；而{{U}} 【2】 {{/U}}的目的是发现错误的位置并改正错误。
填空题在窗体上有两个文本框Text1、Text2和一个命令按钮Cmd1，单击命令按钮Cmd1所对应的事件过程：
Private Sub Command1_Click()
Text1.Text="ABC"
Text2.Text="VB"
Text1.Text="欢迎您!"
End Sub
启动程序，并单击Cmd1后，在两个文本框中所显示的内容分别是{{U}} 【1】 {{/U}}和{{U}} 【2】 {{/U}}。
填空题以下程序的执行结果是 【8】 。 a=15.5635 b=Int(a*100+0.5)/100 Print b
填空题下列程序的功能是：单击窗体时随机生成20个两位数依次赋值给一个由20个元素组成的数组，然后把数组反序存放，再输出。
Option Base 1
Private Sub Form Click()
Dim a(20)As Integer，i As Integer
Dim t As Integer，j As Integer
Randomize
For i=1 To 20
a=10+Int(90*Rnd)
Print a(i)；
Next
Print
i=1:{{U}} 【4】 {{/U}}
Do While i＜j
t=a(i):{{U}} 【5】 {{/U}}a(j)=t
i=i+1: j=j-1
Loop
For i=1 To 20
Print a(i);
Next i
Print
End Sub