首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。命令按钮的单击事件过程如下: Dim x1 As Integer, x2 As Integer, x3 As Integer s = Trim(Text1.Text
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。命令按钮的单击事件过程如下: Dim x1 As Integer, x2 As Integer, x3 As Integer s = Trim(Text1.Text
admin
2018-09-19
38
问题
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。命令按钮的单击事件过程如下:
Dim x1 As Integer, x2 As Integer, x3 As Integer
s = 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语句可以是连续的范围:界1 To 界2 ,如:12 To 20,C错。x4是排除了字符串中字母、数字字符的个数的和。选D。
转载请注明原文地址:https://jikaoti.com/ti/wkm0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下关于文本框的叙述中,正确的是
有如下程序代码:PrivateSubForm_Click()DimaAsIntegera=2Sum=0Fori=1To3Sum=Sum+f(a)Ne
窗体上有1个名称为Command1的命令按钮,事件过程及函数过程如下:PrivateSubCommand1_Click() DimmAsString m=InputBox("请输入字符串") Printpick_str(m)En
窗体上有三个水平滚动条,名称分别为HSRed、HSGreen和HSBlue,取值范围均是0~255,代表颜色的三种基色。改变滚动框的位置,可以改变三种基色的值,从而改变窗体的背景色,如下图所示。程序代码如下:Dimcolor(3)AsInteger
窗体上有一个列表框控件List1。以下叙述中错误的是( )。
以下关于VB文件的叙述中,正确的是( )。
在窗体上建立三个菜单(名称分别为Read、Calc和Save,标题分别为“读人数据”、“计算并输出”和“存盘”),然后添加一个文本框(名称为Text1,可显示多行,ScrollBars属性设置为2)(如图所示)。程序运行后,如果执行“读人数据”命令,则读入
以下关系表达式中,其值为True的是( )。
VisualBasic源程序的续行符为
某二叉树共有13个结点,其中有4个度为1的结点,则叶子结点数为
随机试题
水曜日の________、応募者は八人だった。
电子支付的基本方式有()
麻疹早期特殊体征是
影响挖泥船时间利用率的因素有()。
用人单位安排女职工在怀孕期间从事国家规定的第三级体力劳动强度的劳动的,劳动保障行政部门应责令改正,并按照受侵害的劳动者每人()的标准计算,处以罚款。
在劳动者提供正常劳动的情况下,用人单位应支付劳动者的工资在剔除()后,不得低于当地最低工资标准。
甲公司为增值税一般纳税人,该企业购进固定资产相关的增值税额可以抵扣,适用的增值税税率为17%。甲公司20×0年至20×3年与固定资产有关的业务资料如下:(1)20×0年11月1日,甲公司以自营方式建造一条生产线。购入工程物资,取得的增值税专用发票上注明的
()是指引起或增加风险事故的机会或扩大损失幅度的条件。
MoveoverMethuselah.FuturegenerationscouldbelivingwellintotheirsecondcenturyandstilldoingSudoku,iflifeexpectan
Thenonprofiteconomicanalysisinstitution,settoconvenenextweekinDavos,Switzerland,foritsyearlymeeting,haslabeled
最新回复
(
0
)