首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。命令按钮的单击事件过程如下: Private Sub Command1_Click() Dim x1 As Integer,x2 As Integer,x3 As Integer
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。命令按钮的单击事件过程如下: Private Sub Command1_Click() Dim x1 As Integer,x2 As Integer,x3 As Integer
admin
2020-04-18
19
问题
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。命令按钮的单击事件过程如下:
Private Sub Command1_Click()
Dim x1 As Integer,x2 As Integer,x3 As Integer
S=TrimText1.Text)
strLen=Len(s)
For i=1To 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]…:
②表达式1To表达式2:
③Is关系运算表达式。最终x1是字符串中数字的个数;x2是字符串中大写字母的个数;x3是字符串中小写字母的个数:x4是字符串中非字母、非数字字符的个数。
转载请注明原文地址:https://kaotiyun.com/show/l8Tp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画两个标签和一个命令按钮,其名称分别为Label1、Label2和Command1,然后编写如下程序:PrivateSubfunc(LAsLabel) L.Caption="1234"EndSubPrivateSubForm
在窗体上画两个文本框(Name属性分别为Textl和Text2)和一个命令按钮(Name属性为Commandl),然后编写如下事件过程:PrivateSubCommandl_Click()x=0doWhilex<50x=(x+2)
设有如下通用过程:PublicFunctionFun(xStrAsString)AsString DimtStrAsString,strLAsInteger tStr="" strL=Len(xStr) i=strL
如果要在窗体上画一个标签,应在工具箱窗口中选择的图标是( )。
设有如下数组定义语句:Dima(一1To4,3)AsInteger以下叙述中正确的是()。
以下关于函数过程的叙述中,正确的是( )。
以下叙述中错误的是()。
语句DimArr(-2To4)AsInteger所定义的数组的元素个数为()。
设有下面的语句:PrintIIf(x>0,1,IIf(x
在E-R图中,用来表示实体联系的图形是( )。
随机试题
教育对政治经济制度的发展【】
A.桑白皮汤B.清金化痰汤C.麻杏石甘汤D.二陈汤合三子养亲汤E.越婢加半夏汤
呼气性呼吸困难常见于
(2014)设计凸轮机构时,当凸轮角速度ω1、从动件运动规律已知时,则有()。
某科技公司2010年5月7日经批准进口一套特定免税设备用于研发项目,2012年10月27日经海关批准,该公司将设备出售,取得销售收入240万元,该设备进口时经海关审定的完税价格为320万元,已提折旧60万元。2012年10月该公司应补缴关税()万元
下列关于以募集方式设立的股份有限公司股份募集的表述中,符合《公司法》规定的有()。
下列关于波士顿矩阵的说法中,正确的有()。
在直角三角形中,若斜边与一直角边的和是8,差是2,则另一条直角边的长度是().
城镇化是现代化的必由之路,在我们这样一个拥有13亿多人口的发展中大国实现城镇化,必须走出一条适合中国国情的新型城镇化道路,必须坚持()
当A=()时,(0,1,-1)和(1,0,2)构成齐次方程组AX=0的基础解系.
最新回复
(
0
)