首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为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
45
问题
窗体上有一个名称为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全国计算机二级
相关试题推荐
在考生目录下有一个工程文件sjt5.vbp,包含了所有控件和部分程序。程序运行时,单击“打开文件”按钮,则弹出“打开”对话框,默认文件类型为“文本文件”,默认目录为考生目录。选中in5.txt文件,如图2.207(a)所示,单击“打开”按钮,则把文件中的内
表达式Sgn(0.25)的值是( )。
下列关于利用通用对话框产生的文件对话框的相关属性的描述中,错误的是()。
在软件生产过程中,需求信息的来源是()。
在窗体上画一个Text1文本框和一个CD1通用对话框控件,并编写下面程序:PrivateSubCommand1_Click()CD1.Flags=1Or256CD1.Action=4IfCD1.Color
语句DimArr(-2To4)AsInteger所定义的数组的元素个数为()。
算法时间复杂度的度量方法是
窗体上有一个名称为Line1的直线控件,并有如下程序:DimdownAsBoolean,x1%,y1%PrivateSubForm_Load()Line1.Visible=Falsedown=FalseEnd
在结构化方法中,用数据流程图(DFD)作为描述工具的软件开发阶段是()。
数据流图由一些特定的图符构成。下列图符名标以的图符不属于数据流图合法图符的是()。
随机试题
在物质和意识关系的问题上,唯心主义的根本错误是()
计数肋序数的骨性标志是
一个或几个核苷酸顺序的改变称为细胞内某一基因的拷贝数高于正常称为
在直肠息肉中,下列哪种癌变率最高
下列关于安全工具检验标准与周期的说法,正确的是()。
在下列情形中,导游员应该劝阻旅游者离团自由活动的有()。
下列关于公民权利和义务的说法,错误的是()。
在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是通过键盘向文本框中输入大、小写字母和数字。单击标题为“统计”的命令按钮,分别统计输入字符串中大写字母、小写字母及数字字符的个数,并将统计结果分别在标签控件数组x中显示,如图所示。在给出的窗体文件中
Whatdoesthewomanmean?
A.BankofAmericaannouncedthatitwasreadytorepaythe$45billionitreceivedingovernmentbail-outmoney,whichwillfin
最新回复
(
0
)