更多"设有变量声明为“Dim aDate As Date”，则为变量aDat"的相关试题:
[单项选择]设有变量声明为“Dim aDate As Date”，则为变量aDate正确赋值的表达方式是( )。
A. aDate=#8/2008#
B. aDate=#“8/8/2008”#
C. aDate=Date(“8/8/2008”)
D. aDate=Format(“m/d/yy”，”8/8/2008”)
[单项选择]设有变量声明为“Dim aDate As Date”，则为变量aDZe正确赋值的表达方式是( )。
A. aDate=#8/2008#
B. aDate=#"8/8/2008"#
C. aDate=Date("8/8/2008")
D. aDate=Format("m/d/yy","8/8/2008")
[单项选择]设有变量声明为“Dim aDate As Date”，则能为变量aDate正确赋值的表达方式是( )。
A. aDate=#8/2008#
B. aDate=#"8/8/2008"#
C. aDate=Date("8/8/2008")
D. aDate=Format("m/d/yy"，"8/8/2008")
[单项选择]设有变量声明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")
[单项选择]设有如下变量声明
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")
[单项选择]设有如下程序：
Private Sub Commandl_click（ ）
Dim c As Integer,d As Integer
c=4
d=InputBox("请输入一个整数")
Do While d＞0
If d＞c Then
c=c+1
End If
d=InputBox("请输入一个整数")
Loop
Print c+d
End Sub
程序运行后，单击命令按钮，如果在输入对话框中依次输入1、2、3、4、5、6、7、8、9、 0，则输出结果是
A) 12 B) 11 C) 10 D) 9
[单项选择]设有如下程序：
Private Sub Form_Click（ ）
Dim i As Integer, x As String, y As String
x="ABCDEFG"
For i=4 To 1 Step-1
y=Mid(x, i, i)+y
Next i
Print y
End Sub
程序运行后，单击窗体，输出结果为( )。
A. ABCCDEDEFG
B. AABBCDEFG
C. ABCDEFG
D. AABBCCDDEEFFGG
[单项选择]设有如下变量声明：
Dim TestDate As Date
为变量Test Date正确赋值的表达方式是 ______。
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")
[单项选择]设有如下变量声明：
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")
[单项选择]设有如下变量声明：
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")
