单选题在窗体上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属性为Command1)，然后编写如下事件过程： Private Sub Command1_Click() x=0 Do While x＜50 x＝(x+2)*(x+3) n=n+1 Loop Text1.Text=Str(n) Text2.Text=Str(x) End Sub 程序运行后，单击命令按钮，在两个文本框中显示的值分别为( ) A．1和0 B．2和72 C．3和50 D．4和168
单选题以下不能输出“Program”的语句是
单选题有以下函数过程： Function Gys(ByVal x As Integer，ByVal y As Integer)As Integer Do While y＜ >0 Remender=x Mod v x=y Y=Reminder Loop Gys=x End Function 以下是调用该函数的事件过程，该程序的运行结果是 Private Sub Command1_Click( ) Dim a As Integer Dim b As Integer a=50 b=10 x=Cys(a，b) Print x End sub
单选题以下叙述中错误的足
单选题在窗体上画一个名称为Timer1的计时器、一个名称为Command1的命令按钮和一个名称为Labell的标签。程序如下： Private Sub Command1_Click() Timer1．Enabled=True Timer1．Interval=1000 End Sub Private Sub Timerl_timer() Labell．Caption=Time End Sub 当运行程序后，单击命令按钮，将在标签中显示的内容为
单选题开发大型软件时，产生困难的根本原因是( )。
单选题如果要将窗体中的某个命令按钮设置成无效状态，应该设置命令按钮的哪一个属性?
单选题下列工具中，不属于结构化分析的常用工具的是{{U}} {{/U}}。
A. 数据流图
B. 数据字典
C. 判定树
D. N-S图
单选题编写如下程序：Private Sub Command1_Click() Dim k As Integer x = 1 For k = 1 To 3 x = x * fun(k) Next k Print xEnd SubFunction fun(x As Integer) As Integer Static a a = a + 1 fun = a * xEnd Function程序运行后，单击命令按钮Command1，输出结果为
单选题当控件的( )属性设置为1时，可进行自动拖放。
单选题为了取消窗体的最大化功能，需要把它的一个属性设置为False，这个属性是
单选题要获得当前驱动器，应使用驱动器列表框的属性是______。 A) Path B) Drive C) Dir D) Pattern
单选题下列叙述正确的是
A. 复选框的Value属性用来表示复选框的状态，它的取值为True或False
B. 复选框的Value属性为True时，表示选中该复选框
C. 复选框的Value属性为False时，表示未选中该复选框
D. 复选框的Value属性有三种取值
单选题编写如下程序：
Private Sub Form_Click()
Print "Welcome!"
End Sub
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Print "欢迎!"
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Print "热烈欢迎!"
End Sub
程序运行后，单击窗体，输出结果为______。
单选题某人编写了向随机文件中写一条记录的程序，代码如下： Type RType Name As
String*10 Tel As String*20 End Type
Private Sub Command1_Click() Dim p As
RType p.Name＝InputBox("姓名") p.Tel＝InputBox("电话号") Open"Books.dat"
For Random As #1 Put #1,,p Close #1 End Sub
该程序运行时有错误，修改的方法是______。
A.在类型定义“Type RType”之前加上“Private”
B.Dim p As RType必须置于窗体模块的声明部分
C.应把Open语句中的For Random 改为 For Output
D.Put语句应该写为Put #1,p.Name,p.Tel
单选题设在窗体上有个文本框，然后编写如下的事件过程： Private Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer) Const Alt=4 Const Key_F2=&H71 altdown%=(Shift And Alt)＞0 f2down%=(KeyCode=Key_F2) If altdown% And f2down% Then Text1.Text="BBBBB" End If End Sub 上述程序运行后，如果按[Shift+F2]，则在文本框中显示的是
单选题设有以下定义语句： Private Type point x As Integer y As Integer End Type Dim a As point 下面语句中正确的是
单选题设置定时器控件的Interva1属性为2000，Enabled属性为True，并且有下面的事件过程，程序运行时计算机将发出( )次Beep声。 Sub Timer1_Timer() Beep End Sub
单选题数据独立性是数据库技术的重要特点之一。所谓数据独立性是指( )。
单选题设a="a"，b="b"，c="c"，d="d"，执行语句x=Iif((a＜b)Or(c＞d)，"A"，"B")后，x的值为______。(2005年4月)