首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Textl的文本框,一个名称为Commandl的命令按钮。命令按钮的单击事件过程如下: Private Sub Command l_Click() Dim x 1 As Integer,x2 As Intege
窗体上有一个名称为Textl的文本框,一个名称为Commandl的命令按钮。命令按钮的单击事件过程如下: Private Sub Command l_Click() Dim x 1 As Integer,x2 As Intege
admin
2013-10-16
82
问题
窗体上有一个名称为Textl的文本框,一个名称为Commandl的命令按钮。命令按钮的单击事件过程如下:
Private Sub Command l_Click()
Dim x 1 As Integer,x2 As Integer,x3 As Integer
s=Trim(Textl.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函数的作用是去掉文本框中字符串两端的空格:多分支控制结构又称为Select Case语句或Case语句,可以同时对条件的多个取值来判断,Case后面的表达式可采用3种形式:
①表达式1[,表达式2]…;
②表达式1 To表达式2;
③Is关系运算表达式。
最终xl是字符串中数字的个数;x2是字符串中大写字母的个数;x3是字符串中小写字母的个数;x4是字符串中非字母、非数字字符的个数。
转载请注明原文地址:https://kaotiyun.com/show/vLQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
关于MsgBox函数,以下说法不正确的是______。
在窗体上画一个命令按钮(名称为Command1),然后编写如下事件过程:PrivateSubCommand_Click()StaticbAsIntegerb=b+1EndSub运行程序,第3次单击
下列叙述中正确的是______。
下列事件过程运行时,信息框中出现的结果是______。PrivateSubCommand1_Click()MsgBoxStr(123+123)EndSub
VisualBasic6.0集成环境的主窗口中不包括______。
以下叙述中错误的是______。
在名为Form1的窗体上绘制一个文本框,名为Text1,无初始内容;再绘制—个图片框,名为Pic1。请编写Text1的Change事件过程,使得在运行时,在文本框中每输入一个字符,就在图片框中输出一行文本框中的完整内容。运行时的窗体如下图所示。注
在名为Form1的窗体上绘制一个命令按钮,名为Cmd1,标题为“复制”;再绘制一个文本框,名为Text1。请编写适当的事件过程,使得在运行时,若单击命令按钮,则把按钮上的标题复制到文本框中(如下图所示)。注意:程序中不得使用任何变量;文件
在Form1的窗体上绘制一个名为Text1的文本框,然后建立一个标题为“操作”的主菜单,名为vbop,该菜单有两个菜单项,其标题分别为“显示”和“退出”,其名称分别为vbDis和vbExit。编写适当的事件过程,使程序运行后,若单击“操作”菜单中的“显示”
现有语句:y=IIf(x>0,xMod3,0)设x=10,则y的值是()。
随机试题
长腿石膏管型可用于下列哪种骨折的治疗
手工冲洗显影温度范围是
患者,男,58岁。突然昏仆,不省人事,口吐涎沫,喉中痰鸣,面色晦暗,苔白腻、脉滑。其辨证为
对于过小牙在做全冠修复时,牙体预备多采用90。肩台预备。()
下列关于托管人所托管合格投资者发生证券卖空时的说法,不正确的有()。
OCP运输条款是()。
教育目的与培养目标之间的关系是__________与__________的关系。
Accordingtothefirstthreeparagraphs,thenewsmediadowellin______Thephrase"Hardnews"(Line3,Paragraph3)canbepa
下列不属于无限局域网技术协议的是( )。
数据库管理系统中的加锁协议规定了事务的加锁时间、持锁时间和释放锁时间,其中【10】协议可以完全保证并发事务数据的一致性。
最新回复
(
0
)