单选题执行语句s=Len（Mid（"VisualBasic"，1，6））后，s的值是（）A VisualB BasicC 6D 11

题目

单选题

执行语句s=Len（Mid（"VisualBasic"，1，6））后，s的值是（）

Visual

Basic

如果没有搜索结果或未解决您的问题，请直接联系老师获取答案。

相似问题和答案

第1题：

如果一个正整数从高位到低位上的数字依次递减，则称其为降序数(如：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

正确答案：B
B。【解析】此题的考查点在for循环，当最后一次执行完Next的时候，i会越界。越界后是len(s)+1，已经比i的长度要长了。因此要对越界进行判断。

第2题：

设字符串s1='ABCDEFG',s2='PQRST',则运算s=CONCAT(SUB(s1，2，LEN(s2))，SUB(s1，LEN(s2，2))后的串值为(65)。

A．'ABCDEFEF'

B．'BCDEFG'

C．'BCPQRST'

D．'BCQR'

正确答案：A
解析：s=CONCAT(SUB(s1，2，5)，SUB(s1，5，2))=CONCAT(BCDEF，EF)=‘BDCEFEF’

第3题：

设a = \"MicrosoftVisualBasic\" ，则以下使变量b的值为“VisualBasic”的语句是（）。

A．b = Left（a, 10）

B．b = Mid（a, 10）

C．b = Right（a, 10）

D．b = Mid（a, 11, 10）

正确答案：B

第4题：

以下程序段运行后消息框的输出结果为______。

s＝"Access"

Dim str As String

For i＝1 To Len(s)

str＝UCase(Mid(S,I,I))+str

Next i

MsgBox str

正确答案：SSECCA
SSECCA 解析：本题考查有关字符串函数的知识。在VBA中有很多字符串函数，其中Mid函数可以实现在任何位置取任何长度的子串3Len函数返回字符串的长度；UCase函数强制把字符转换成大写字母。本题中应该注意到，虽然循环变量i是逐次递增也就是正向循环，但是每一次使用Mid函数取得的一个字符都连接到原来的str前面，实际上就是实现字符串的逆序存放。结合其他函数可知最后结果为“SSECCA”。

第5题：

执行以下语句后，输出的结果是 s＄=“ABCDEFGHI” Print Mid＄(s＄，3，4) Print Len(s＄)

A．ABCD 11

B．CDEF 11

C．EFGH 11

D．HIJK 11

正确答案：B
解析：Mid(s＄,i,n)表示从字符串s＄的第i个字符开始向后截取n个字符，Len(s＄)返回字符串s$的长度。

第6题：

执行语句s=Len(Mid(“VisualBasic”，1，6))后，s的值是，

A．Visual

B．Basic

C．6

D．11

正确答案：C
解析：Mid(s＄，i，n)表示从字符串sS的第i个字符开始向后截取n个字符，Len(s＄)返回字符串s＄的长度。本题通过Mid函数返回字符串Visual，再通过Len函数返回字符串的个数：6。

第7题：

设s="Visual Basic Programming"，则以下使变量x的值为“Basic”的语句是

A．x=Left(s，6)

B．x=Mid(s，6)

C．x=Right(s，6)

D．x=Mid(s，8，6)

正确答案：D
解析：Left(s，6)表示从字符串变量s的左边读取6个字符；Mid(s，6)表示从s的第6个位置读取右边余下的字符：Right(s，6)表示从s的右边读取6个字符；Mid(s，8，6)表示从s的第8个位置读取6个字符。满足题意的是选项D。

第8题：

以下MyReplace函数的功能是将一个字符串(保存在变量S中)中的子字符串(保存在变量

OldS中)用新的字符串(保存在变量NewS中)代替，编写以下程序：

PublicFunctionMyReplace(s$,OldS$,NewS$)AsString

Dimc%,lenOldS%

lenOldS=Len(OldS)

c=InStr(s,OldS)

DoWhilec>0

s=Left(s,c-1)+NewS+Mid(s,c+lenOldS)

c=InStr(s,olds)

Loop

MyReplace=s

EndFunction

PrivateSubCommand1_Click()

dimold,newasstring

old=inputbox("请输入要替换的字符")

new=inputbox("请输入替换后新的字符")

PrintMyReplace("VisualBasic程序设计教程5.0版",old,new)

EndSub

当程序运行单击命令按钮后先后分别输入" 5.0"和" 6.0"，程序的运行结果为( )

A."VisualBasic程序设计教程5.0版"

B."VisualBasic程序设计教程6.0版"

C."VisualBasic程序设计教程6版"

D."VisualBasic程序设计教程"

正确答案：B

第9题：

已知有如下语句： s＝"hello, world" r=Mid(s，7，5) 运行上面的语句后，变量r的值为 ( )

A．hello

B．wotld

C．llo,w

D．orld

正确答案：B
解析：Mid(s，7，5)表示从字符串 s中的第7位开始向右取出5个字符。题中s为"hello，world"，故执行语句r=Mid(s，7，5)后，变量r的值应为"world"。

第10题：

设a="Microsoft VisualBasic"，则以下使变量b的值为Visual Basic的语句是( )。

A．b=Left(a,10)

B．b=Mid(a,10)

C．b=Right(a,10)

D．b=Mid(a,11,10)

正确答案：B

执行语句s=Len（Mid（"VisualBasic"，1，6））后，s的值是（）

题目

相似问题和答案

更多相关问题

相关内容