问题 单项选择题

设窗体上有一个文本框Text1和一个命令按钮Command1,并有以下事件过程:
Private Sub Command1_Click()
Dim s As String,ch As String
s = " "
For k = 1 To Len(Text1)
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中输入的字符串的长度,即“Basic”的长度,为5。循环体中Mid函数从第一个字符开始依次取出一个字符,然后与上次取出的字符连接,本次取出的字符在前,上次取出的字符在后。最终变量s中应该是“cisaB”。

单项选择题
单项选择题