以下程序段运行后消息框的输出结果为______。s="Access"Dim str As StringFor i=1 To Len(s)str=UCase(Mid(S,I,I))+strNext iMsgBox str

题目

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

s="Access"

Dim str As String

For i=1 To Len(s)

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

Next i

MsgBox str


相似考题
更多“以下程序段运行后消息框的输出结果为______。 s="Access" Dim str As String For i=1 To Len(s) s ”相关问题
  • 第1题:

    有以下程序

    inculde <stdio.h>

    inculde <string.h>

    void Fun(char*str)

    { char temp;int n,I;

    n=strlen(str);

    temp=str[n-1];

    For(i=n-1;i>0;i--) str[i]=str[i-1];

    str[0]=temp;

    }

    main()

    { char s[50];

    ScanF(“%s”,s);Fun(s);printF(“%s\n”,s);}

    程序运行后输入:aBcDeF<回车>,则输出结果是【 】


    正确答案:fabcde
    fabcde 解析:在函数fun中,先求出字符串str的长度,并将最后一个字符暂存到temp中,然后使用循环语句将所有字符向右移动一个位置,最后将temp中的字符放到字符串的第1个位置,所以结果为fabcde。

  • 第2题:

    9、阅读以下程序,填写运行结果________________. def f(n): s=str(n) result='' for i in range(0,len(s)): result=s[i]+result return result print(f(345))


    14

  • 第3题:

    运行以下程序,输出结果为: lst=[1,2,3,4,5] s='' for i in lst: s=str(i)+s print(s)


    B函数调用fun(a,10)执行完毕后,a=”abcdefghij”,但函数返回的指针指向a[1],

  • 第4题:

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

    s="Access"

    Dim Str As String

    For i=1 To Len(s)

    str=UCase(Mid(S,i,1) ) +str

    Next I

    MsgBox str


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

  • 第5题:

    1、运行以下程序,输出结果为: lst=[1,2,3,4,5] s='' for i in lst: s=str(i)+s print(s)


    D