2. 计算机
  3. 窗体上有一个名称为Text1的文本框，一个名称为Command1的命令按钮。命令按钮的单击事件过程如下： Private Sub Command1_Click() Dim x1 As Integer，x2 As Integer，x3

窗体上有一个名称为Text1的文本框，一个名称为Command1的命令按钮。命令按钮的单击事件过程如下： Private Sub Command1_Click() Dim x1 As Integer，x2 As Integer，x3

admin2015-08-13  29
问题 窗体上有一个名称为Text1的文本框，一个名称为Command1的命令按钮。命令按钮的单击事件过程如下：
    Private Sub Command1_Click()
        Dim x1 As Integer，x2 As Integer，x3 As Integer
        s = Trim(Text1．Text)
        strLen = Len(s)
        For i=1 To strLen
            c=Mid(s，i，1)
            Select Case c
                Case  "0" To "9"
                    x1=x1+1
                Case  "A" To "Z"
                    x2=x2+1
                Case  "a" To "Z"
                    x3=3+1
                Case Else
                    x4=x4+1
            End Select
        Next
        Print "x1"；x1，"x2"；x2，"x3"；x3，"x4"；x4
    End Sub
以下关于上述程序的叙述中，正确的是(    )。
选项 A、s是去掉文本框中字符串末尾的空格
B、Select Case c有误，Case后应该是一个表达式
C、各Case分支条件有误，不能用To表示字符的取值区间
D、x4是字符串中非字母、非数字字符的个数
答案D
解析 Trim函数是去掉字符串前面和后面的空格A错。Select Case语句的测试表达式，可以算是算术表达式或字符表达式，其值应是数值型或字符型，B错。Case语句可以是连续的范围：界1 To界2，如，12 To 20，C错。x4是排除了字符串中字母、数字字符的个数的和。选D。
转载请注明原文地址:https://jikaoti.com/ti/6460FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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