在窗体上画一个文本框,名称为Text1,然后编写如下程序: Private Sub Form_Load() Show Text1.Text="" Text1.SetFocus End Sub

admin2015-08-13  27

问题 在窗体上画一个文本框,名称为Text1,然后编写如下程序:
    Private Sub Form_Load()
        Show
        Text1.Text=""
        Text1.SetFocus
    End Sub
    Private Sub Form_Click()
        Dim a.As String,s As String
        a=Text1.Text
        s=""
        For k=1 To Lea(a)
          s=UCase(Mid(a,k,1))+s
        Next k
        Text1.Text=s
    End Sub
程序运行后,在文本框中输入一个字符串,然后单击窗体,则文本框中的内容(    )。

选项 A、与原字符串相同
B、与原字符串中字符顺序相同,但所有字母均转换为大写
C、为原字符串的逆序字符串,且所有字母转换为大写
D、为原字符串的逆序字符串

答案C

解析 程序中Mid函数从输入字符串左边开始逐一取一个字符转换为大写,并连接到上次取出的字符的前面,因此文本框中显示的将是原输入字符串转换为大写的并倒序排列的字符串。所以C正确。
转载请注明原文地址:https://jikaoti.com/ti/L960FFFM
0

最新回复(0)