单项选择题

下列对变量的定义中，不能定义a为变体变量的是( )。

A) Dim a As Double
B) Dim a As Variant
C) Dim a
D) a=24
<上一题 目录 下一题>
热门 试题

单项选择题
下列程序的执行结果为( )。 Private Sub Command1_Click() Dim FirStr As String FirStr= abcdef Print Pat(FirStr) End Sub Private Function Pat(xStr As String) As String Dim tempStr As String, strLen As Integer tempStr= strLen=Len(xStr) i=1 Do While i＜＝Len(xStr)-3 tempStr=tempStr+Mid(xStr,i,1)+Mid(xStr, strLen -1+1,1) i=i+1 Loop Pat=tempStr End Function
A) abcdef
B) afbecd
C) fedcba
D) defabc
单项选择题
要获得当前驱动器应使用的驱动器列表框的属性是( )。
A) Path
B) Drive
C) Dir
D) Pattern
相关试题