网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

执行下面的程序,消息框里显示的结果是( )。

Private Sub Form_Click()

Dim Str As String,S As String,k As Integer

S=Str

For k=Len(Str) To 1 Step -1

S=S & (Mid(Str,k,1)

Next k

End Sub


参考答案

更多 “ 执行下面的程序,消息框里显示的结果是( )。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 ” 相关考题
考题 执行下列的程序,消息框里显示的结果是______。Pfivate Sub Form_Click()Dim Str As StringStr=""S="Access"For i=Len(S) To 1 Step-1Str=StrMid(S.i,1)Next IMsgBox StrEnd Sub

考题 执行下面的程序,消息框里显示的结果是_______。Private Sub Form_Click()Dim Str As StringStr=""S="Access"Fori=Len(S)To 1 Step-lStr=StrMid(S,i,1)Next iMsgBox StrEnd Sub

考题 执行下面的程序,消息框的输出结果是__________。

考题 执行下面的程序,消息框里显示的结果是 【 】 。Private Sub Form_Click()Dim Str As String, K As IntegerStr="ab"For k=Len(Str) TO 1 Step-1Str=Str Chr(Asc(Mid(Str,k,1))+k)Next kMsgBox StrEnd Sub

考题 执行下面的程序,消息框里显示的结果是( )。A. abeB. abccbaC. cbacbaD. abcabc

考题 以下程序:includemain(){char str[10];scanf("%s",str);printf("%s\n",str);}运 以下程序: #include<stdio.h> main() {char str[10]; scanf("%s",str); printf("%s\n",str); } 运行上面的程序,输入字符串how are you,则程序的执行结果是( )。A.howB.how are youC.hD.howareyou

考题 有以下程序:include include using namespace std;class Y;class X{private 有以下程序: #include <iostream> #include <string> using namespace std; class Y; class X { private: int x; char *strx; public: X(int a, char *str) { x=a; strx=new char[strlen(str)+1]; strcpy(strx,str); } void show(Y ob) ; }; class Y { private: int y; char *stry; public: Y(int b,char *str) { y=b; stry=new char[strlen(str)+1]; strcpy(stry, str); } friend void X: :show(Y ob) ; }; void X: :show(Y ob) { cout<<strx<<", "; cout<<ob, stry<<end1; } int main ( ) { X a(10,"X"); Y b (20, "Y"); a. show(B) ; return 0; } 执行后的输出结果是( )。A.X,YB.a,bC.X,XD.Y,Y

考题 执行下面的程序,单击窗体后窗体消息框内显示结果是( )。 PRIVATE SUB FORM_CLICK() DIM STR AS STRING, K AS INTEGER STR="AB" FOR K = LEN(STR) TO 1 STEP -1 STR=STRCHR(ASC(MID(STR, K, 1)) +K) NEXT K MSGBOX STR END SUBA.ABCEB.ABCDC.ABDBD.ABFB

考题 程序段如下,程序运行后消息框显示的结果是______。 Dim a, s As String, i As Integer a = "晴空万里" s = "" For i = 1 To 4 Step 2 s = Mid(a, 4 - i, 2) Next MsgBox(s)A.晴空万里B.万里晴空C.晴空D.万里