设窗体上有一个文本框Text1和一个命令按钮Command1,并有以下事件过程: Private Sub Commandl—Click() Dim S As String,ch As String s=" " For k=1

admin2018-05-08  31

问题 设窗体上有一个文本框Text1和一个命令按钮Command1,并有以下事件过程:
    Private Sub Commandl—Click()
    Dim S As String,ch As String
    s=" "
    For k=1 To Len(Textl)
    ch=Mid(Text1,k,1)
    s=ch+S
    Next k
    Text1.Text=s
    End Sub
    程序执行时,在文本框中输入“Basic”,然后单击命令按钮,则Text1中显示的是(    )。

选项 A、Basic
B、cisaB
C、BASIC
D、CISAB

答案B

解析 Len函数返回字符串的长度,Mid函数为字符串中部截取函数格式为:Mid(字符串,起始位置,长度)。程序中,For循环的终值是Text1中输入的字符串的长度,即“Basis”的长度,为5。循环体中Mid函数从第一个字符开始依次取出一个字符,然后与上次取出的字符连接,本次取出的字符在前,上次取出的字符在后。最终变量s中应该是“cisaB”。
转载请注明原文地址:https://jikaoti.com/ti/yoy0FFFM
0

随机试题
最新回复(0)