网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
单选题
执行语句s=Len（Mid（"VisualBasic"，1，6））后，s的值是（）
A
Visual
B
Basic
C
6
D
11
参考答案
参考解析
解析：
暂无解析
更多 “单选题执行语句s=Len（Mid（"VisualBasic"，1，6））后，s的值是（）A VisualB BasicC 6D 11” 相关考题
考题
设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）
考题
以下MyReplace函数的功能是将一个字符串(保存在变量S中)中的子字符串(保存在变量OldS中)用新的字符串(保存在变量NewS中)代替，编写以下程序：PublicFunctionMyReplace(s$,OldS$,NewS$)AsStringDimc%,lenOldS%lenOldS=Len(OldS)c=InStr(s,OldS)DoWhilec0s=Left(s,c-1)+NewS+Mid(s,c+lenOldS)c=InStr(s,olds)LoopMyReplace=sEndFunctionPrivateSubCommand1_Click()dimold,newasstringold=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程序设计教程
考题
如果一个正整数从高位到低位上的数字依次递减，则称其为降序数(如：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=TrueB.If i=Len(s)+1 Then flag=True Else flag=FalseC.If i=Len(s)-1 Then flag=False Else flag=TrueD.If i=Len(s)-1 Then flag=True Else flag=False
考题
设字符串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'
考题
设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)
考题
执行以下语句后，输出的结果是 s＄=“ABCDEFGHI” Print Mid＄(s＄，3，4) Print Len(s＄)A．ABCD 11B．CDEF 11C．EFGH 11D．HIJK 11
考题
以下程序段运行后消息框的输出结果为______。s＝"Access"Dim str As StringFor i＝1 To Len(s)str＝UCase(Mid(S,I,I))+strNext iMsgBox str
考题
设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)
考题
执行下面的程序，消息框里显示的结果是( )。Private Sub Form_Click()Dim Str As String,S As String,k As IntegerS=StrFor k=Len(Str) To 1 Step -1S=S (Mid(Str,k,1)Next kEnd Sub
考题
从字符串S("abcdefg")中返回子串B("cd")的正确表达式是______。A．Mid(S，3，2)B．Right(Len(S，4)，2)C．Left(Right(S，5)，2)D．以上都可以
考题
有如下程序： Private Sub Command1_Click( ) a$="A WORKER IS OVER THERE" x=Len(a ＄) For i=1 To x-1 b$=Mid $(a $，i，2) If b $="ER"Then s=s+1 Next i Pdnt s End Sub 程序运行后的输出结果是A．1B．2C．3D．4
考题
执行下列两条语句后，结果s2的值为（） string s=“abcdefgh”； string s2=s.Substring（2，3）；A、 “bc”B、 “cd”C、 “bcd”D、 “cde”
考题
设a=”MicrosoftVisualBasic”，则以下使变量b的值为”VisualBasic”的语句是（）。A、b=Left（a，10）B、b=Mid（a，10）C、b=Right（a，10）D、b=Mid（a，10，11）
考题
设Strings="story"；下列选项中的语句书写正确的是（）。A、s+="books"；B、char c = s[1]；C、int len = s.length；D、s = s-"books"；
考题
执行以下程序段，在窗体上显示的结果是___A__。PrivateSubForm_Click（）DimSAsString，iAsIntegerS="ab"Fori=Len（S）To1Step-1PrintChr（Asc（Mid（S，i，1））+i）NextIEndSubA、dbB、cbC、ccD、fd
考题
单选题s=s.delete(5,12);如果s="abcdefghigklmn",则执行删除语句后，s的值为（）A
abcdefnB
abcdemnC
abcde？？？？？？mnD
abcdelmn
考题
单选题执行以下程序段，在窗体上显示的结果是___A__。PrivateSubForm_Click（）DimSAsString，iAsIntegerS="ab"Fori=Len（S）To1Step-1PrintChr（Asc（Mid（S，i，1））+i）NextIEndSubA
dbB
cbC
ccD
fd
考题
填空题设字符串S1= “ABCDEF”，S2= “PQRS”，则运算S=CONCAT（SUB（S1，2，LEN（S2）），SUB（S1，LEN（S2），2））后的串值为（）。
热门标签
最新试卷