更多"假定有如下的程序段：Dim intVarAs Integer intv"的相关试题:
[单项选择]执行以下程序段
Dim x As Integer， i As Integer
x=0
For i=20 To Step -2
x=x+i/5
Next i
后，x的值为
A. 16
B. 17
C. 18
D. 19
[填空题]已知如下程序段：
Dim MyNumber
MyNumber=2+2
执行以上程序段后，MyNumber为______。
[填空题]已知如下程序段：
Dim MyInt As Integer
Dim MyLen
MyLen=Len(MyInt)
执行以上程序段后，MyLen为______。
[填空题]已知如下程序段：
Dim MyChar
MyChar=Chr(97)
执行以上程序段后，MyChar=______。
[填空题]已知如下程序段：
Dim MyChar
MyChar=Chr(37)
执行以上程序段后，MyChar=______。
[填空题]下列程序是用来计算1+2+3……+10的程序段，请补充该程序。
Dim i, s, k As Integer
s =0: k = 0
For 【9】 To 1
k=k+1
s=s+ k
Next i
Print s
[单项选择]有如下程序段：
Dim str As String*10
Dim i
Str1="abcdefg"
i=12
len1=Len(i)
str2=Right(str1, 4)
执行后，len1和str2的返回值分别是______。
A. 12，abcd
B. 10，bcde
C. 2，defg
D. 0，cdef
[填空题]已知如下程序段：
Dim SearchString，SearchChar，MyPos
SearchString="XXpXXpXXPXXP"
SearchChar="P"
MyPos=Instr(4，SearchString，SearchChar，1)
执行以上程序段后，MyPos为______。
[填空题]已知如下程序段：
Dim MyNumber
MyNumber=Int(99.8)
执行以上程序段后，MyNumber为______。
[填空题]已知如下程序段：
Dim MyNumber
MyNumber=Fix(99.2)
执行以上程序段后，MyNumber为______。
[填空题]已知如下程序段：
Dim LowerCase，UpperCase
LowerCase="Hello World 1234"
UpperCase=UCase(LowerCase)
执行以上程序段后，Uppercase为______。
[填空题]已知如下程序段：
Dim MyString，LastWord
MyString="Mid Function Demo"
LastWord=Mid(MyString，14，4)
执行以上程序段后，LastWord为______。
[填空题]已知如下程序段：
Dim AnyString，MyStr
AnyString="Hello World"
MyStr=Left(AnyString，7)
执行以上程序段后，MyStr为______。
[填空题]已知如下程序段：
Dim MyString，TrimString
MyString="＜-Trim-＞"
TrimString=LTrim(RTrim(MyString))
执行以上程序段后，TrimString=______。
[填空题]有如下程序段：
Dim Number，Digits，MyString
Number=53
IfNumber＜10 Then
Digits=2
Else
Digits=3
End If
将该程序段中的If语句用单行格式应该写成______。
