题目内容
（请给出正确答案）
[主观题]
执行语句s=Len（Mid（"VisualBasic",1,6))后，s的值是（)。A．Visual．B．BasicC．6D．11
执行语句s=Len(Mid("VisualBasic",1,6))后，s的值是()。
A．Visual．
B．Basic
C．6
D．11
查看答案
如果结果不匹配，请 联系老师 获取答案
题目内容
（请给出正确答案）
如果结果不匹配，请 联系老师 获取答案
题目内容
（请给出正确答案）
执行语句s=Len(Mid("VisualBasic",1,6))后，s的值是()。
A．Visual．
B．Basic
C．6
D．11
如果结果不匹配，请 联系老师 获取答案
更多“执行语句s=Len（Mid（"VisualBasic",1,…”相关的问题
执行语句s=Len(Mid("VisualBasic"，1，6))后，s的值是______。
A．Visual
B．Basic
C．6
D．11
执行语句s=Len(Mid("Visual Basic",1，6))后，s的值是
A．Visual
B．Basic
C．6
D．11
执行以下语句后，输出的结果是 s＄=“ABCDEFGHI” Print Mid＄(s＄，3，4) Print Len(s＄)
A．ABCD 11
B．CDEF 11
C．EFGH 11
D．HIJK 11
执行下面的程序，输出的结果是 ______ 。 Private Sub Command1_Click() ch $ = "Welcome to China!" n = Len(ch $ ) For i =1 To n-1 s$ =Mid(ch$ ,i,1) If s$ ="o" Then m=m + 1 Next i Print m End Sub
A．1
B．2
C．8
D．0
如果一个正整数从高位到低位上的数字依次递减，则称其为降序数(如：9632是降序数，而8516则不是降序数)。现编写如下程序，判断输入的正整数是否为降序数。
Private Sub Command1 Click（）
Dim n As Long
Dim flag As Boolean
n=InputBox("输入一个正整数")
S=Trim(Str(n))
For i=2 To Len(s)
If Mid(s，i-1，1)＜Mid(S，i，1)Then Exit For
Next i
If i=Len(S)Then flag=True Else flag=False
If flag Then
Print n；"是降序数"
Else
Print n；"不是降序数"
End If
End Sub
运行以上程序，发现有错误，需要对给flag变量赋值的If语句进行修改。以下正确的修改是（）。
A.If i=Len(s)+1 Then flag=False Else flag=True
B.If i=Len(s)+1 Then flag=True Else flag=False
C.If i=Len(s)-1 Then flag=False Else flag=True
D.If i=Len(s)-1 Then flag=True Else flag=False
A."桐乡abc
B."桐乡
C."ab
D."abc
执行以下程序后输出的是。 Private Sub Commandl_Click ch$ = "ABCDEFGH": Print Mid(Right(ch$, 6), Len(Left(ch$, 4)), 2) End Sub A．CDEFGH B．ABCD C．FG D．AB
