首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt3.vbp,包含了所有控件和部分程序。程序运.行时,在文本框中每输入一个字符,则立即判断:若是小写字母,则将它的大写形式显示在标签labell.中;若是大写字母,则把它的小写形式显示在Iabell中,若是其他字符,则将该字
在考生文件夹下有一个工程文件sjt3.vbp,包含了所有控件和部分程序。程序运.行时,在文本框中每输入一个字符,则立即判断:若是小写字母,则将它的大写形式显示在标签labell.中;若是大写字母,则把它的小写形式显示在Iabell中,若是其他字符,则将该字
admin
2020-04-08
55
问题
在考生文件夹下有一个工程文件sjt3.vbp,包含了所有控件和部分程序。程序运.行时,在文本框中每输入一个字符,则立即判断:若是小写字母,则将它的大写形式显示在标签labell.中;若是大写字母,则把它的小写形式显示在Iabell中,若是其他字符,则将该字符直接显示在Labell中。输入的字母总数则显示在标签LabeL2中,如图所示。
要求:去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不得修改已经存在的程序,最后将修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,去掉程序中的注释符“′”,将问号改为正确的内容。 参考答案(阴影部分是需考生填入的内容) Dim n As Integer Private Sub Textl change() Dim ch As String ch=Right$(
Text,1
)’通过Right 函数从Textl中取l位 If ch>="A"And ch<="Z"Then′ 判断ch的范围是否在A~Z中 Labell.Caption=Lcase(ch)′将大写的ch转换为小写 n=n+1′累加大写字符个数 ElseIf ch>="a"And ch<=" Z"Then ′判断ch是否为小写字母 Labell.Caption=Ucase(ch) ′将ch转换为大写 n=n+1′累加小写字符个数 ElSe Labell.Caption=
ch
′当不在字母范围内,则直接赋值显示 End If Label2.Caption=
n
′Label2中显示满足条件的个数 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 【易错提示】Lcase()函数为大写字母转换成小写字母,Ucase()函数小写字母将转换成大写字母,在做题的时候要注意区别。
解析
通过Right()函数获取输入的字符,通过kase()函数和ucase()函数实现字母大小写的转换。
转载请注明原文地址:https://kaotiyun.com/show/jATp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面关于文件叙述中错误的是( )。
VisualBasic控件一般都规定一个默认属性,在引用这样的属性时,只写对象名而不必给出属性名。默认属性为Caption的控件是()。
运行如下程序:PrivateSubCommandl_Click()Dima(5,5)AsIntegerF0ri=1To5Forj=1To4a(i,j)=i*2+JIfa(i,
支持子程序调用的数据结构是( )。
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序:PrivateSubForm_Load() Show Text1.Text="" Text2.Text="" Text1.SetFocusEndS
随机试题
关于中性粒细胞,哪项是正确的
恶性肿瘤向邻近器官侵犯的主要方式为
甲、乙共同出资购买了1间房并出租给丙,租房期间甲欲转让自己的份额,乙与丙均表示愿意购买,应如何处理?()
某公安交管局交通大队民警发现王某驾驶的电动三轮车未悬挂号牌,遂作出扣押的强制措施。关于扣押应遵守的程序,下列哪些说法是正确的?
建筑物长度50m,宽10m,比较筏板基础和15m的条形基础两种方案,已分别求得筏板基础和条形基础中轴线上、变形计算深度范围内(为简化计算,假定两种基础的变形计算深度相同)的附加应力,随深度分布的曲线(近似为折线)如图所示,已知持力层的压缩模量Es=4MPa
计算机进行银行对账,银行对账单传送到微机中可采用()。
婴儿认识世界和自己的基本手段是()。
沟通管理计划包括确定项目干系人的信息和沟通需求,在编制沟通计划时,______________不是沟通计划编制的输入。
PowerBuilder是一种深受用户欢迎的快速应用开发工具,它与其他应用开发工具比较,最具有特色的是
AweekofheavyreadinghadpassedsincetheeveninghefirstmetRuthMorse,andstillhedarednotcall.Timeandagainhener
最新回复
(
0
)