vb程序编写 输入一个字符,如果是大写则转换为小写输出,如果是小写则转换为大写输出 越简单浅显越好

2024-11-17 00:30:26
推荐回答(2个)
回答1:

在窗体中插入两个文本框,一个命令按钮。
代码如下:
Private Sub Command1_Click()
If Asc(Text1.Text) >= 65 And Asc(Text1.Text) <= 90 Then
Text2.Text = Chr(Asc(Text1.Text) + 32)
Else
If Asc(Text1.Text) >= 97 And Asc(Text1.Text) <= 122 Then
Text2.Text = Chr(Asc(Text1.Text) - 32)
Else
MsgBox "Error"
End If
End If
End Sub
Private Sub Form_Load()
Text1.Text = ""
Text2.Text = ""
Command1.Caption = "OK"
End Sub

回答2:

用UCASE LCASE二个命令可直接转换
编辑框1是输入,2个输出
直接给2写代码就可以了,先叛断框1是否是字母.是则框二转换输出并显示到框二.否则出错