首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。命令按钮的单击事件过程如下: Private Sub Conunsnd1_Click() Dim x1 As Integer,x2 As Integer,x3 As Integer
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。命令按钮的单击事件过程如下: Private Sub Conunsnd1_Click() Dim x1 As Integer,x2 As Integer,x3 As Integer
admin
2016-06-23
55
问题
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。命令按钮的单击事件过程如下:
Private Sub Conunsnd1_Click()
Dim x1 As Integer,x2 As Integer,x3 As Integer
8=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语句可以是连续的范围:界1To界2,如:12To20,C错。x4是排除了字符串中字母、数字字符的个数的和。选D。
转载请注明原文地址:https://kaotiyun.com/show/fSLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上添加一个命令按钮,名为Command1,一个文本框,名为text1,则执行如下事件过程后,文本框中的输出为Fori=1To3 Forj=1To3 Fork=1To2 x=x+3
执行如下语句:a=InputBox("Today","Tomorrow","Yesterday",,,"Daybeforeyesterday",5)将显示一个对话框,在对话框的输入区中显示的信息是
建立控件时系统自动给控件一个名称,第一个建立的命令按钮名称是______。
窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序:DimyAsIntegerPrivateSubCommand1_Click()DimxAsIntegerx=2Te
测试的目的是暴露错误,评价程序的可靠性,而______的目的是发现错误的位置并改正错误。
在下列关于二叉树的叙述中,正确的一项是
下列叙述中错误的是
如下程序段定义了学生成绩的记录类型,由学号、姓名、三门课程成绩(百分制)组成。TypeStudnoAsIntegernameAsString*10score(1To3)AsSingleEndTyp
随机试题
A.泻白散合黛蛤散B.龙胆泻肝汤C.柴胡疏肝散D.丹栀逍遥散E.滋水清肝饮吐血色红或紫黯,口苦,胁痛,心烦易怒,寐少多梦,舌质红绛,脉弦数。治疗应首选
上述场景中的设计合同法律关系中,法律关系主体是( )。民事法律关系内容,是指民事主体之间基于民事法律关系客体所形成的民事权利和民事义务,这种法律权利和法律义务的来源可以分为( )。
合同权利义务的终止原因中有因合同混同而终止的,其中不符合混同原因的是()。
作为完全由中国人掌握知识产权的家用轿车,安徽省的()已成为中国轿车的著名品牌。
在我国,必须依法登记注册才能取得民事主体资格的是()。
下列法律概念中,属于客体概念的是()。
求下列极限:
下列叙述中正确的是()。
A、No,yougoyourself.B、Yes,please.C、No,Iwouldn’t.D、Yes,I’dloveto.DI’dloveto=I’dlovetogoswimmingwithyou.
A、Emailherlecturenotestotheman.B、Copythelecturenotesfortheman.C、Helpthemanlearnthecoursehemissed.D、Lendhe
最新回复
(
0
)