在考生文件夹下包含一个工程文件sjt3.vbp,请在名称为Form1的窗体上添加一个名称为Text1的文本框和一个名称为C1、标题为“转换”的命令按钮,如图所示。在程序运行时,单击“转换”按钮,可以把。Text1中的小写字母转换为大写,把大写字母转换为小写

admin2019-03-14  26

问题 在考生文件夹下包含一个工程文件sjt3.vbp,请在名称为Form1的窗体上添加一个名称为Text1的文本框和一个名称为C1、标题为“转换”的命令按钮,如图所示。在程序运行时,单击“转换”按钮,可以把。Text1中的小写字母转换为大写,把大写字母转换为小写。窗体文件中已经给出了“转换”按钮的Click事件过程,但不完整,请去掉程序中的注释符,把程序中的“?”改为正确的内容。
    注意:不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。

选项

答案【操作步骤】 步骤1:打开本题工程文件,并设置控件的属性。程序中用到的控件及属性见表1。 [*] 步骤2:分析并编写程序代码。 程序提供代码如下: Private Sub C1_Click() Dim a$。b$。k%,n% a$="" ’n%=Asc("a")-Asc(?) For k%=1 To Len(Text1.Text) b$=Mid(Text1.Text,k%,1) lf b$>="a"And b$<="z"’rhen b$=String(1,Asc(b$)-n%) Else lf b$>="A"And b$<="Z"Then ’b$=String(1,Ase(b$)?) End lf End If a$=a$+b$ Next k% ’Text1.Text=? End Sub 参考答案: 第1个?处填入:"A" 第2个?处填入:+n% 第3个?处填入:a 步骤3:调试并运行程序,关闭程序后按题目要求存盘。

解析 string(个数,字符)函数用于返回含指定个数字符的字符串,其中的字符可以是字符码或字符;ASc(字符串)函数用于返回字符串首字符的ASCII码值。本题关键是计算同一字母大小写ASCII码值的差值,由于小写字母的ASCII码值大于大写字母的ASCII码值,差值表达式应为:n%=AsC("a")-ASC("A")。对于小写字母的ASCII码应减去这个差值以获得其大写字母;对于大写字母的ASCII码则应加上这个差值以获得其小写字母。
转载请注明原文地址:https://kaotiyun.com/show/kIUp777K
0

最新回复(0)