下列程序的执行结果为( )。 Ptivate Sub Command_Click() DimFirStr As String FirStr="abcdef" PrintPat(FirSB) End Sub PrivateFunctionPat(xStr As String)As String DimtempStr As String,strLen As Integer tempStr="" strLen=Len(xStr) i=1 DoWA.abcdefB.afbecdC.fedcbaD.defabc

下列程序的执行结果为( )。 Ptivate Sub Command_Click() DimFirStr As String FirStr="abcdef" PrintPat(FirSB) End Sub PrivateFunctionPat(xStr As String)As String DimtempStr As String,strLen As Integer tempStr="" strLen=Len(xStr) i=1 DoW

A.abcdef

B.afbecd

C.fedcba

D.defabc


相关考题:

单击命令按钮时,下列程序的执行结果为Private Sub Command1_Click()Dim a As Integer, b As Integer, c As Integera=2: b=3: c=4Print P2(c, b, A.End SubPrivate Function P1(x As Integer, y As Integer, z As Integer)P1=2 * x + y + 3 * zEnd FunctionPrivate Function P2(x As Integer, y As Integer, z As Integer)P2=P1(z, x, y) + xEnd Function ( )。A.21B.19C.17D.34

单击命令按钮时,下列程序的执行结果为 Private Sub Command1_Click() Dim a As Integer,b As Integer,c As Integer a=2:b=3:C=4 Print P2(c,b,A)End Sub Private Function P1(x As Integer,y As Integer,z As Integer) P1=2 * X + y + 3 * z End Function Private Function P2(x As Integer,y As Integer,z As Integer) P2=P1(z,x,y) + X End FunctionA.21B.19C.17D.34

单击一次命令按钮,下列程序代码的执行结果为( )。 Private Sub Commandl_Click() Dima As Integer,b As Integer,CASInteger a=2:b=3:c=4 PrintP2(c,b,A) End Sub PrivateFunctionPl(X As Integer,y As Intege;z As Integer) P1=2*x+y+3*Z End Function PrivaA.21B.19C.17D.34

有以下程序程序运行后的输出结果是( )A.AbCdEfB.ABCDEFC.aBcDeFD.abcdef

有以下程序:程序运行后的输出结果是( )。A.AbcdefB.ABCDEFC.aBcDeFD.AbCdEf

若输入“abcdef”、“abdef”,以下程序的输出结果为( )#includeA)1B)0C)’abcdeff’D)’abdef’

下列程序的执行结果为 Private Sub Comrnandl_Click( ) Dim p As Integer, q As Integer p=12:q=20 Call Value(p, q) Print p; q End Sub Private Sub Value(ByVal m As Integer, ByVal n As Integer) m=m * 2: n=n - 5 Print m; n End SubA.20 12 20 15B.12 20 12 25C.24 15 12 20D.24 12 12 15

下列程序的执行结果为 Ptivate Sub Commandl_Click() Dim FirStr As String FirStr="abcdef" Print Pct (FirStr) End Sub Private Function Pct(xStr As String)As String Dim tempStr As String,strLen As Integer tempStr="" strLen=Len(xStr) i=1 Do While i<=Len(xStr)-3 tempStr=tempStr + Mid(xStr,i,l) + Mid(xStr,strLen - i+i ,1) i=i + 1 Loop Pct=tempStr End FunCtionA.abcdefB.afbecdC.fedcbaD.defabc

2、执行如下语句后,输出的结果为: x="abcdef" print(x[2:4])A.bcB.cdC.deD.ab