单选题设有如下变量声明： Dim TestDate As Date
为变量TestDate正确赋值的表达方式是
A. TestDate=#1/1/2002#
B. TestDate=#"1/1/2002"#
C. TestDate=date("1/1/2002")
D. TestDate=Format("m/d/yy","1/1/2002")
单选题以下变量名中合法的是
单选题下列选项中，为字符串常量的是( )。
单选题与数学式子对应的VisualBasic表达式是
单选题以下能够触发文本框Change事件的操作是
单选题在窗体上画1个命令按钮，名称为Command1，然后编写如下程序：
Dim Flag As Boolean
Private Sub Command1_Click()
Dim intNum As Integer
intNum=InputBox("请输入：")
If Flag Then
Printf(intNum)
End If
End Sub
Function f(x As Integer)As Integer
If X＜10 Then
Y=X
Else
Y=X+10
End If
f=Y
End Function
Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single )
Flag=True
End Sub
运行程序，首先单击窗体，然后单击命令按钮，在输入对话框中输入5，则程序的输出结果为
____
。
单选题在对象方法中，一个对象请求另一个对象为其服务的方式是通过发送{{U}} {{/U}}。
A. 调用语句
B. 命令
C. 口令
D. 消息
单选题设有如下程序段： x=2 For i=1 T0 Step 2 x=x+i Next i 运行以上程序后，x的值是
单选题下面关于多窗体操作的描述不正确的是______ 。
单选题设在当前目录下有一个名为“file.txt”的文本文件，其中有若干行文本。编写如下程序：
Private Sub Command1_Click()
Dim ch$,ascii As Integer
Open"file.txt"For Input As #1
While Not EOF(1)
Line Input #1.ch
ascii=toascii(ch)
Print ascii
Wend
Close #1
End Sub
Private Function toascii(mystr As String)As Integer
n=0
For k=1 To Len(mystr)
n=n+Asc(Mid(mystr,k,1))
Next k
toascii=n
End Function
程序的功能是______。
单选题阅读程序：Private Sub Form_ Click() a=0 For j=1 To 15 a=a+j Mod 3 Next j Print aEnd Sub 程序运行后，单击窗体，输出结果是______。
单选题设有下列通用过程：
Public Function Fun(xStr As String)As String
Dim tStr As String, strL As Integer
tStr= ""
strL=Len(xStr)
i=strL/2
DO While i＜=StrL
tStr=tStr&Mid(xStr, i+1, 1)
i=i+1
Loop
Fun=tStr&tStr
End Function
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写下列的事件过程：
Private Sub Command1_Click()
Dim S1 As String
S1="ABCDEF"
Text1.Text=LCase(Fun(S1))
End Sub
程序运行后，单击命令按钮，文本框中显示的是______。
单选题要将窗体Form1标题设为“学习VB”以下能正确实现该功能的语句为
单选题设在窗体上有个文本框，然后编写如下的事件过程： 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】，则在文本框中显示得是
单选题下面有3个程序段可以正确判断，另一个不能正确判断的是
单选题表达式Str(Len(”123”))+Str(77．71)的值是( )。
单选题执行下列语句：
strInput=InputBox("请输入字符串"，"字符串对话框"，"字符串")
将显示输入对话框。此时如果直接单击“确定”按钮，则变量strlnput的内容是______。
单选题下列程序段的执行结果为 ______。 N=10 For K=N To 1 Step-1 X=Sqr(K) X=X-2 Next K Print X-2
单选题在数据库管理技术的发展中，数据独立性最高的是( )。
单选题设：a = 3，b = 5，c = 4，d = 7，表达式 a d) Or Not( b < c)的值是