2. 计算机
  3. 窗体的单击事件过程如下： Private Sub Form_Click() Dim str As String str = InputBox("Input string :") For i = 1 To Len(str)

窗体的单击事件过程如下： Private Sub Form_Click() Dim str As String str = InputBox("Input string :") For i = 1 To Len(str)

admin2015-10-23  25
问题 窗体的单击事件过程如下：
Private Sub Form_Click()
    Dim str As String
    str = InputBox("Input string :")
    For i = 1 To Len(str)
        s1 = UCase(Mid(str, i, 1)) + s1
    Next i
    Print s1
End Sub
运行程序时，单击窗体，输入visualbasic，则窗体上显示的是
选项 A、CISABLAUSIV
B、VISUALBASIC
C、visualbasic
D、cisablausiv
答案A
解析 Len(Str)即求字符串Str的长度（Length）,Len(Str)为输入的字符串的长度。Mid$(s,n1，n2)是字符串截取函数，从s的第n1个字符开始，向后截取n2个字符，UCase函数将字符串中的小写字母转换为大写字母。题目中的 "s1 = UCase(Mid(str, i, 1)) + s1"是从str的第i个字符开始，向后截取1个字符，并将其中的小写字母转换为大写字母，并将其与s1字符串连接。如此循环执行上述过程，实际上将输入的字符串中的字母倒序排列，并将其中的小写字母转换为大写字母，将得到结果存储在s1中，故窗体显示结果为A项。
转载请注明原文地址:https://kaotiyun.com/show/nULp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)