单选题Randomize语句的功能是
单选题为达到把a、b中的值交换后输出的目的，某人编程如下： Private Sub Command1_Click() a％=10：b％=20 Call swap(a，b) Print a，b End Sub Private Sub swap(ByVal a As Integer，ByVal b As Integer) c=a：a=b：b=c End Sub 在运行时发现输出结果错了，需要修改。下面列出的错误原因和修改方案中正确的是
单选题在窗体上有两个文本框控件，名称分别为Text1和Text2，以下程序实现的功能是希望在文本框Text1中输入字符时，输入的字符也将出现在Text2文本框中。运行时的程序界面如图20-1所示，下划线处应填()。图20-1PrivateSubText1__________()Text2.Text=Text1.TextEndSub
单选题通用对话框Filter属性的作用是( )。
单选题在 Visual Basic中，要将一个窗体从内存中释放，应使用的语句是（ ）。
单选题如果将命令按钮的访问键设置为“D”，以下不会触发命令按钮Click事件的操作是
单选题窗体上有一个名称为Shape1并显示为圆的形状控件(其Width和Height属性值相等)，一个名称为Timer1的计时器，并有下面程序代码：Dim r As Single，flag As Integer Private Sub Timer1_Timer()Private Sub Form_Load() If flag=0 Thenr=Shape1．Width Shape1．Width=Shape1．Width-10Timer1．Enabled=True If Shape1．Width＜=100 ThenTimer1．Interval=500 flag=1End Sub End IfElseShape1．Width=Shape1．Width+10If Shape1．Width＞=r Thenflag=0End IfEnd IfEnd Sub运行程序后产生的结果是
单选题为了同时改变一个活动控件的高度和宽度，正确的操作是
单选题如果一个变量未经定义就直接使用，则该变量的类型为____________。
A.Integer
B.Byte
C.Boolean
D.Variant
单选题在窗体上画一个命令按钮，然后编写下列程序： Private Sub Command1 click( ) Dim a As Single，b As Single a=6:b=2 RC a，b Print a，b End Sub Sub RC(x As Single，y As Single) i=x x=i/y y=i Mod y End Sub
单选题设A="12345678"，则表达式Val(Len(A,4)+Mid(A,4,2))的值为______。
单选题使“计算机技术”在当前窗体上输出的语句是（ ）。
单选题在窗体上画一个名称为Command1的命令按钮和三个名称分别为Label1、Label2、Label3的标签，然后编写如下代码： Private x As Integer Private Sub Command1_Click() Static y As Integer Dim z As Integer n=10 z=n+z y=y+z x=x+z Label1.Caption=x Label2.Caption=y Label3.Caption=z End Sub 运行程序，连续三次单击命令按钮后，则三个标签中显示的内容分别是( )。
单选题窗体上有一个名称为Command1的命令按钮，其事件过程如下： Private Sub
Command1_Click() Dim i As Integer, j As Integer,
k As Integei Dim s As Double
s=0:i=1:j=0:k=-1 Do While
i＜6 s=s+k*(j/i)
i=i+1 j=j+1
k=-k Loop
Print s End Sub
以上程序所计算的表达式是______。
A.1/2-2/3+3/4-4/5
B.-1/2+2/3-3/4+4/5
C.1-1/2+2/3-3/4+4/5
D.-1+1/2-2/3+3/4-4/5
单选题窗体上有1个名称为Text1的文本框；1个名称为Timer1的计时器控件，其Interval属性值为5000，Enabled属性值是True。Timer1的事件过程如下： Private Sub Timer1_Timer() Static flag As Integer Ifflag=0 Then flag=l：flag=-flag End If If flag=l Then Text1．ForeColor=＆HFF＆'＆HFF＆为红色 Else Text1．ForeColor=＆HC000＆'＆HC000＆为绿色 End If End Sub 以下叙述中正确的是
单选题下列选项中不符合良好程序设计风格的是______。 A) 数据说明的次序要规范化 B) 程序中要有必要的注释 C) 对所有输入的数据都要进行检查，确保数据的合法性 D) 程序的效率第一，清晰第二
单选题有如下事件过程：
Function UNC (ByVal x As Integer，ByVal y As Integer) As Integer
Do While y＜＞0
sic=x/y
x=y
y=sic
Loop
UNC=x
End Function
以下是该函数的调用过程，该程序的运行结果是( )。
PriVate Sub COmmand1_Click()
Dim a As Integer
Dim b As Integer
a=12
b=2
x=UNC (a，b)
Print x
End Sub
单选题数据库系统的核心是( )。
单选题在程序运行期间，如果拖动滚动条上的滚动框，则触发的滚动条事件是 ______。A) Move B) Change C) Scroll D) GetFocus
单选题窗体上有名称为Command1的命令按钮，其事件过程如下：
Option Base I
Private Sub Command1_Click()
Dim a
Dim b(10)As Integer
a=Array(2,4,7,3,9,6)
For i=LBound(a) To UBound(a)
b(i)=a(i)+i
Sum=Sum+b(i)
Next i
Print Sum
End Sub
运行程序，单击命令按钮时，窗体上显示的是______。