更多"设有如下程序段： Dim a(10) For Each x In "的相关试题:
[单项选择]有如下程序段：
Dim str As String * 10
Dim i
str1 = "abcdefg"
i = 12
len1 = Len(i)
sir2 = Right(str1, 4)
执行后，len1和str2的返回值分别是( )。
A. 12,abcd
B. 10,bcde
C. 2,defg
D. 0,cdef
[单项选择]有如下程序段：
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 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 I As Integer
I=Int(-3.25)
执行后，I的返回值是
A. -3
B. -4
C. 3
D. 3.25
[单项选择]有如下程序段：
Private Sub Form_Click（ ）
Dim m,n As Integer
m=InputBox("请输入M的值")
m=Val(m)
m1=m
n=InputBox("请输入N的值")
n=Val(n)
n1=n
Do While n＜＞0
remin=m Mod n
m=n
n=remin
Loop
Print m1, n1,m
End Sub
程序运行后，单击窗体，在输入对话框中分别输入16和24，则程序在窗体上的输出结果为______。
A. 16 24 4
B. 16 24 8
C. 24 16 6
D. 24 16 8
[单项选择]
设有如下程序段：
int i=5；
for（；i<=10；）i++；
执行完这段程序后，i的值是（）
A. 5
B. 6
C. 10
D. 11
[填空题]设有如下程序段：
a$=“BejingShanghai”
b$＝Mid(a$，InStr(a$，“g”)+1)
执行上面的程序段后，变量b$的值为 【1】 。
[单项选择]设有如下的程序段：
char str[]="HelloWorld"；
char*ptr；
ptr=str；
执行上面的程序段后，*(ptr+10)的值为( )。
[单项选择]设有如下变量声明：
Dim TestDate As Date
为变量TestDate正确赋值的表达式是( )。
[填空题]
设有如下程序段：
a$=“BejingShanghai”
b$＝Mid(a$，InStr(a$，“g”)+1)
执行上面的程序段后，变量b$的值为 【1】 。
[单项选择]
设有如下程序
Option Base 1
Private Sub Form_Click( )
Dim a(5) As String , i As Integer
For i=1 To 5
a(i)=Chr(Asc(“A”)+i)
Call f(a,i)
Next i
End Sub
Sub f(ta（ ） As String , n As Integer)
Dim i As Integer
For i=1 To
Print ta(i);
Next i
End Sub
对上述程序，以下叙述中正确的是（）。
A. 程序有错，因为在过程f的定义中数组参数格式不正确
B. 程序可正常运行，输出内容的第一行是一个字母“A”
C. 程序可正常运行，输出内容的第一行是一个字母“B”
D. 程序可正常运行，输出内容的第一行是数字65
[单项选择]设有如下程序：
Private Sub Cimmand1_Click（ ）
Dim sum As Double，x As Double
Sum=0
n=0
For i=1 To 5
x=n/i
n=n+1
sum=sum+x
Next i
End Sub
该程序通过For循环来计算一个表达式的值，这个表达式是
A. 1+1/2+2/3+3/4+4/5
B. 1+1/2+1/3+1/4+1/5
C. 1/2+2/3+3/4+4/5
D. 1/2+1/3+l/4+1/5
[单项选择]设有如下程序：
Private Sub Command1_Click（ ）
Dim sum As Double, x As Double
sum=0
n=0
For i=1 To 5
x=n/i
n=n+1
sum=sum+x
Next
End Sub
该程序通过For循环计算—个表达式的值，这个表达式是 ______。
A. 1+1/2+2/3+3/4+4/5
B. 1+1/2+2/3+3/4
C. 1/2+2/3+3/4+4/5
D. 1+1/2+1/3+1/4+1/5
[单项选择]设有如下程序段：
x=2
For i=1 To 10 Step 2
x=x+i
Next
运行以下程序后，x的值是( )。
A. 26
B. 27
C. 38
D. 57
[单项选择]
设有如下程序段：
int i=15；
while（i<15）i++；
则以下描述中正确的是（）
A. 循环体语句执行15次
B. 这是一个死循环
C. 循环体语句一次也不执行
D. 循环体语句只执行一次
[单项选择]设有如下程序段：
x=2
For i=1 to 10 Step 2
x=x+i
Next
运行以上程序后，x的值是______。
A. 26
B. 27
C. 38
D. 57
[单项选择]设有如下程序段：
char str[]=”World”；
char*ptr=str；
执行上面的程序段后，*(ptr+5)的值为 ______。
A. ‘o’
B. ‘0’
C. 不确定的值
D. ‘o’的地址
[单项选择]设有如下的程序段：
char str[]="Hello";
char *ptr;
ptr=str;
执行完上面的程序段后，*(ptr+5)的值为( )。
