编写如下程序： Private Sub Form. Click() a$=: "4321": b$="abcd" For 3=1 To 4 Print Mid$(a$，5-j，1)+Nid$(b$, j, 1)； Next j Print End Sub 程序运行后，单击窗体，其输出结果为 ______。A．alb2c3d4B．b4c3d2elC．eld2c3b4D．la2b3c4d

题目

编写如下程序： Private Sub Form. Click() a$=: "4321": b$="abcd" For 3=1 To 4 Print Mid$(a$，5-j，1)+Nid$(b$, j, 1)； Next j Print End Sub 程序运行后，单击窗体，其输出结果为 ______。

A．alb2c3d4

B．b4c3d2el

C．eld2c3b4

D．la2b3c4d

相似考题

1.在窗体上画一个名称为Commandl命令按钮，然后编写如下事件过程： Private Sub Commandl_click() c="ABCD" For n=1 To 4 Print______ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容 D CD BCD ABCD 则在______处填入的内容为。A． Left(c,n)B．Right(c,n)C．Mid(c,n,1)D．Mid(c,n,n)

2.在窗体上绘制一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click()c="ABCD"For n=1 To 4 Print__Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容：DCDBCDABCD 则在横线处应填入的内容为A．Left(c.n) B．Right(c,n) C．Mid(c,n,1) D．Mid(c,n,n)

3.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) c="ABCD" For n = 1 To 4 Print ______ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： D CD BCD ABCD 则在 ______ 处应填入的内容为A．Left(c,n)B．Right(c,n)C．Mid(c,n,1)D．Mid(c,n,n)

4.在窗体上画一个名称为Command1命令按钮，然后编写如下事件过程：Private Sub Command1_Click（）c = “ABCD”For n= 1 To 4Print （ ）NextEnd Sub程序运行后，单击命令按钮，要求在窗体上显示如下内容（ ）。DCDBCDABCD则在（ ）处填入的内容为。A．Left（c,n）B．Right（c,n）C．Mid（c,n,1）D．Mid（c,n,n）

更多“编写如下程序:Private Sub Form. Click()a$=: "4321": b$="abcd" For 3=1 To 4Print Mid$(a$,5－j ”相关问题

  • 第1题：

    在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() c="ABCD" For n=1 To 4 Print ______ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： D CD BCD ABCD 则在 ______ 处应填入的内容为

    A．Left(c，n)

    B．Right(c，n)

    C．Mid(c，n，1)

    D．Mid(c，n，n)


    正确答案：B
    解析：本题考查的是字符串函数，Left (c，n)取字符串c左边n个字符；Right(c，n)取字符串 c右边n个字符；Mid(c，N1[，N2])取字符子串，在c中从N1位开始向右取N2个字符，默认N2到结束。

  • 第2题：

    在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Coinmand1 Click（ ） Dim a$，b$，c$，k％ a="ABCD" b="123456" c="" k=1 Do While k<=Len(a)Or k<=Len(b) If k<=Len(a)Then c=c＆Mid(a，k，1) End If If k<=Len(b)Then c=c＆Mid(a，k，1) End If k=k+1 Loop Print c End Sub 运行程序，单击命令按钮，输出结果是（ ）。

    A.123456ABCD

    B.ABCD123456

    C.D6C584A321

    D.A1B2C3D456


    正确答案：D
    D。【解析】Mid函数用于提取字符串中的指定位数，函数调用格式为Mid(string，start[，length])，其中start为必要参数，为Long型，为被取出部分的首字符的位置。如果start超过string的字符数，Mid返回空串。length可选参数为返回的字符数，如果省略或length超过文本的字符数，将返回字符串中从start到尾端的所有字符。Len函数的作用是返回串的长度。本题中a串长4，b串长6，每次循环将a、b的第k个字符取出连在一起给串c，k从1开始，当k=5时，将b中k位置的字符依次插入串C中。

  • 第3题：

    编写如下程序： Private Sub Command1_Click() x="abcd" y="1234" For i=1 To 4 z=z+Mid(x，i，1)+Left(y，1) Next i Print z End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是

    A．abcd1234

    B．a1b2c3d4

    C．a1b1c1d1

    D．1234abcd


    正确答案：C
    解析：在4次循环过程中，利用Mid函数从x字符串中逐个获取的是a、b、c、d，Left函数从y字符串中逐个获取的是1、1、1、1，用“+”号将它们连接起来，就得到了答案C。

  • 第4题：

    在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：

    Private Sub Command1_Click()

    c="ABCD"

    For n=1 T0 4

    Print ______

    Next

    End Sub

    程序运行后，单击命令按钮，要求在窗体上显示如下内容：

    D

    CD

    BCD

    ABCD

    则在______处应填入的内容为

    A．Left(c，n)

    B．Right(c，n)

    C．Mid(c，n，1)

    D．Mid(c，n，n)


    正确答案：B
    解析：Left(c,n) 取字符串c左边n个字符；Right(c,n)取字符串c右边n个字符；Mid(c,N1[,N2])取字符子串，在c中从N1位开始向右取N2个字符，默认N2到结束。

  • 第5题：

    编写如下程序： Private Sub Form_Click() a$="54321":b$="abcde" For j=1 To 5 Print Mid$(a$，6-j，1)+Mid$(b$，j，1)； Next j Print End Sub 程序运行后，单击窗体，其输出结果为 ______。

    A．a1b2c3d45e

    B．a5b4c3d2e1

    C．e1d2c3b4a5

    D．1a2b3c4d5e


    正确答案：D
    解析：For循环共执行了5次，每次用Mid$函数取出a$和b$的子串输出，a$是倒序，每次取一个字符，b$是顺序，每次取一个字符，连接在一起输出，输出表达式用分号结束，表示下一次接着输出，故输出结果为1a2b3c4d5e。

相关内容