itgle.com

单击窗体时，下列程序的执行结果是 Private Sub Invert(By Val xstr As String，ystr As String) Dim tempstr AS String Dim I AS Integer I=Len(xstr) Do While I＞=1 tempstr=tempstr + Mid(xstr，I，1) I=I - 1 Loop ystr=tempStr End Sub Private Sub Form_Click( ) Dim s1 As String，s2 As S

题目

单击窗体时，下列程序的执行结果是 Private Sub Invert(By Val xstr As String，ystr As String) Dim tempstr AS String Dim I AS Integer I=Len(xstr) Do While I＞=1 tempstr=tempstr + Mid(xstr，I，1) I=I - 1 Loop ystr=tempStr End Sub Private Sub Form_Click( ) Dim s1 As String，s2 As String S1="abcdef" Invert S1，S2 Print S2 End Sub

A．abcdef

B．afbecd

C．fedcba

D．defabc

相似考题

1.下列程序执行后，输入结果是（）。 For n = 3 To 1 Step - 1 x$ = String$(n,＂#＂） Print x$ Next inA. 1# 2# 3# B. ### ## #C. # ## ### D. 3# 2# 1#

2.假定程序中有以下语句： answer=MsgBox("String1",,"String2","String3",2) 执行该语句后，将显示一个信息框，此时如果单击“确定”按钮，则answer的值为 ______。A．String1B．String2C．String3D．1

3.假定程序中有以下语句： answer=MsgBox("Stringl",,"String2"，"String3"，2) 执行该语句后，将显示一个信息框，此时如果单击“确定”按钮，则answer的值为： ______。A．String1B．String2C．String3D．1

4.单击窗体时，下列程序的执行结果是Private Sub Invert（ByVal xstr As String, ystr As String）Dim tempstr As StringDim I As IntegerI=Len（xstr）Do While I >=1tempstr=tempstr + Mid（xstr, I, 1）I=I - 1Loopystr=tempstrEnd SubPrivate Sub Form_Click（）Dim s1 As String, s2 As Strings1= "abcdef"Invert s1, s2Print s2End Sub（ ）。A．abcdefB．afbecdC．fedcbaD．defabc

更多“单击窗体时,下列程序的执行结果是 Private Sub Invert(By Val xstr As String,ystr As String) ”相关问题

  • 第1题：

    假定程序中有以下语句：_______。 answer=MsgBox("Stringl",,"String2","String3",2) 执行该语句后，将显示一个信息框，此时如果单击“确定”按钮，则answer的值为：_______。

    A．String1

    B．String2

    C．String3

    D．1


    正确答案：D
    解析：MsgBox函数：在对话框中显示消息，等待用户单击按钮，并返回一个Integer告诉用户单击哪一个按钮。返回值常数值描述vbOK1OKvbCancel2CancelvbAbort3AbortvbRetry4Retryvblgnore5IgnorevbYes6YesvbNo7No本题单击的是“确定”按钮，及vbOK，所以MsgBox返回1。

  • 第2题：

    假定程序中有以下语句： answer=MsgBox("String1",,"String2","String31",2) 执行该语句后，将显示一个信息框，此时如果单击“确定”按钮，则answer的值为______。

    A．String1

    B．String2

    C．String3

    D．1


    正确答案：D
    解析：MszBox函数；在对话框中显示消息，等待用户单击按钮，并返回一个Integer告诉用户单击哪一个按钮。
    返回值
    常数 值  描述
    vboK 1  OK
    vbCaneel2  Cancel
    vbAbort 3  Abert
    vbRetry 4  Retry
    vblgnore 5  1gnore
    vbYes 6  Yes
    vbNo  7  NO
    本题单击的是“确定”按钮，及vboK，所以MsgBox返回1。

  • 第3题：

    下列程序执行后的输出结果是 include main() { char arr[2][4]; strcpy(

    下列程序执行后的输出结果是 #include＜string.h＞ main() { char arr[2][4]; strcpy(arr, "you"); strcpy(arr[1], "me"); arr[0][3]＝'&'; cout＜＜arr＜＜endl; }

    A．you&me

    B．you

    C．me

    D．err


    正确答案：A
    解析：本题考察二维数组的标识方式。Arr作为数组名单独使用时表示一个指向数组首部的指针，故you放在数组第一行的前三列arr[0][0]、arr[0][1]、arr[0][2]中。Arr[1]表示指向第二行的指针，因此me放在数组第二行的前两列arr[1][0]、arr[1][1]中。而&则直接按照两维下标放到第一行的第四列中。那么输出的时候默认按照从左到右，先上后下的顺序。因此本题的正确答案为A。

  • 第4题：

    假定程序中有以下语句： answer=MsgBox("Stringl",,"String2","String3",2) 执行该语句后，将显示一个信息框，此时如果单击“确定”按钮，则answer的值为： ______。

    A．String1

    B．String2

    C．String3

    D．1


    正确答案：D
    解析：MsgBox函数：在对话框中显示消息，等待用户单击按钮，并返回一个Integer告诉用户单击哪一个按钮。
      返回值
      常数    值  描述
      vbOK    1   OK
      vbCancel  2   Cancel
      vbAbort  3   Abort
      vbRetry  4   Retry
      vblgnore  5   Ignore
      vbYes   6   Yes
      vbNo   7   No
      本题单击的是“确定”按钮，及vbOK，所以MsgBox返回1。

  • 第5题：

    下列程序的输出结果是( )。 include include"string.h" void main() {char a[]="He

    下列程序的输出结果是( )。 #include＜iostream.h＞ #include"string.h" void main() {char a[]="Hello Test",b[]="Test"; strcpy(a,b); cout＜＜a＜＜end1; }

    A．Hello

    B．Test

    C．Hello Test

    D．Hello Test HelloTest


    正确答案：B
    解析：程序中首先定义字符数a和b，其值分别为“Hello Test”和“Test”。然后利用strcpy复制函数，将b的值复制给a，所以输出a的结果为Test。

相关内容