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

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

admin2017-06-21  22
问题 窗体上有一个名称为Textl的文本框，一个名称为Commandl的命令按钮。命令按钮的单击事件过程如下：
Private Sub Commandl Click()
Dim x1 As Integer,x2 As Integer,x3 As Integer
s=Trim(Textl．Text)
strLen=Len(s)
For i=1 T0 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函数的作用是去掉文本框中字符串两端的空格：多分支控制结构又称为Select Case语句或Case语句，可以同时对条件的多个取值来判断，Case后面的表达式可采用3种形式：①表达式1[，表达式2]…；  ②表达式1 To表达式2；③Is关系运算表达式。最终x1是字符串中数字的个数；x2是字符串中大写字母的个数；x3是字符串中小写字母的个数；x4是字符串中非字母、非数字字符的个数。
转载请注明原文地址:https://kaotiyun.com/show/bXGp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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