下列程序的执行结果为Private Sub Command1_Click()Dim s1 As String, s2 As Strings1= "abcd"Call Transfer(s1, s2)Print s2End SubPrivate Sub Transfer (ByVal xstr As String, ystr As String)Dim tempstr As Stringi=Len(xstr)Do While i =1tempstr=tempstr + Mid(xstr, i, 1)i=i - 1Loopystr=te mpstrEnd Sub( )。A.dcbaB.abdcC.abcdD.dabc

下列程序的执行结果为

Private Sub Command1_Click()

Dim s1 As String, s2 As String

s1= "abcd"

Call Transfer(s1, s2)

Print s2

End Sub

Private Sub Transfer (ByVal xstr As String, ystr As String)

Dim tempstr As String

i=Len(xstr)

Do While i >=1

tempstr=tempstr + Mid(xstr, i, 1)

i=i - 1

Loop

ystr=te mpstr

End Sub( )。

A.dcba

B.abdc

C.abcd

D.dabc


相关考题:

在下面程序的横线处填上适当的语句,使程序执行后的输出结果为ABCD。 include using nam 在下面程序的横线处填上适当的语句,使程序执行后的输出结果为ABCD。include<iostream>using namespace std;classA{public:A(){cout<<'A';}};class B:______{public:B(){cout<<'B';}};class C:______{public:C(){cout<<'C';}};class D:public B,public C{public:D(){cout<<'D';}};void main(){D obj;)

在下面程序的横线处填上适当的内容,使程序执行后的输出结果为ABCD。 include usingn 在下面程序的横线处填上适当的内容,使程序执行后的输出结果为ABCD。include <iostream.h>using namespace std;class A{public: A() {cout<<'A';};class B:______{public: B() {cout<<'B';}};class C:______{public: C(} cout<<'C';}};class D:public B, public C{public: D(){cout<<'D';}};void main(){D obj;}

若已包括头文件和,运行下列程序段时输出结果是()。int i=0;char s1[10]="ABCD 若已包括头文件<stdio.h>和<string.h>,运行下列程序段时输出结果是( )。 int i=0; char s1[10]="ABCD",s2[10]="EFG"; strcat(s1,S2); while(s2[i++]!='\0') s2[i]=s1[i]; puts(s2);A.ABCB.ABCDEFC.EBCDEFGD.CBD

要使程序执行后的输出结果为ABCD,应在横线处添加语句( )。A.public AB.private AC.protected AD.virtual public A

运行下列程序:Private Sub Command1_Click( )Dim s1 As String * 1Dim s2 As Strings1 = aFor i = Asc(s1) To Asc(s1) + 4s2 = s2 Chr(i)Next iPrint s2End Sub单击Command1命令按钮后,则在窗体上显示的结果是( )。A.aB.abcdeC.aaaaD.s2

下列程序的执行结果为 Private Sub Command1_Click() Dim s1 As String,s2 As String S1;="abcdef" Call Invert(s1,s2) Print s2 End Sub Private Sub Invert (ByVal xstr As String,ystr As String) Dim tempstr As String i=Len(xstr) Do While i=1 tempstr=tempstr+Mid(xstr,i,1) i=i-1 Loop ystr=tempstr End SubA.fedcbaB.abcdefC.afbecdD.defabc

下列程序的执行结果为 Private Sub Commandl_Click() Dim s1 As String ,s2 As String s1= "abcd" Call Transfer(sl,s2) Print s2 End Sub Private Sub Transfer (ByVal xstr As String,ystr As String) Dim tempstr As String ystr=tempstr End SubA.dcbaB.abdcC.abcdD.dabc

在下面程序的横线处填上适当的内容,使程序执行后的输出结果为ABCD。 include using nam 在下面程序的横线处填上适当的内容,使程序执行后的输出结果为ABCD。include<iostream>using namespace std;class A{public: A(){cout<<'A';}};class B:【 】{public:B(){cout<<'B';)};class C:【 】{public;C(){cout<<'C';}};class D:public B,public C{public:D(){cout<<'D';}};void main(){D obi;}

假设有定义 char s1[20]="1234567" ,s2[20]={"ABCD"};,则执行strcpy(s1,s2)后,s1的内容为“ABCD”