2. 计算机
  3. 在考生文件夹下有一个工程文件sjt3．vbp，包含了所有控件和部分程序。程序运行时，在文本框中每输入一个字符，则立即判断：若是小写字母，则将它的大写形式显示在标签Label1中；若是大写字母，则把它的小写形式显示在Label1中，若是其他字符，则将该字符直

在考生文件夹下有一个工程文件sjt3．vbp，包含了所有控件和部分程序。程序运行时，在文本框中每输入一个字符，则立即判断：若是小写字母，则将它的大写形式显示在标签Label1中；若是大写字母，则把它的小写形式显示在Label1中，若是其他字符，则将该字符直

admin2019-06-11  64
问题 在考生文件夹下有一个工程文件sjt3．vbp，包含了所有控件和部分程序。程序运行时，在文本框中每输入一个字符，则立即判断：若是小写字母，则将它的大写形式显示在标签Label1中；若是大写字母，则把它的小写形式显示在Label1中，若是其他字符，则将该字符直接显示在Label1中。输入的字母总数则显示在标签Label2中，如图所示。

要求：去掉程序中的注释符，把程序中的?改为正确的内容。
注意：不得修改已经存在的程序，最后将修改后的文件按原文件名存盘。
选项
答案[操作步骤] 步骤1：打开本题工程文件。 步骤2：打开代码编辑窗口，去掉程序中的注释符“’”，将问号改为正确的内容。 参考代码(画下划线部分是需填入的内容) Dim n As Integer Private Sub Text1 Change() Dim ch As String ch=Right$(Text1．1)’通过Right函数从Text1中取1位 If ch＞="A"And ch＜="2"Then’判断ch的范围是否在A～Z中 Label1．Caption=Lcase(ch)’将大写的ch转换为小写 n=n+1’累加大写字符个数 Else If ch＞="a"And ch＜="z"Then ’判断ch是否为小写字母 Label1．Caption=Ucase(ch) ’将ch转换为大写 n=n+1’累加小写字符个数 Else Label1．Caption=ch’当不在字母范围内， 则直接赋值显示 End If Label2．Caption=n’Label2中显示满足条件的个数 End Sub 步骤3：调试并运行程序，关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://www.kaotiyun.com/show/UAUp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)