VB题:利用ASCII代码实现文本框内输入英文字母并进行大小写的转化。

2024-12-02 15:21:43
推荐回答(2个)
回答(1):

Private Sub Command1_Click()
s = Text1
Text1 = ""
Text1 = Chr(Asc(s) - 32)
End Sub

Private Sub Command2_Click()
s = Text1
Text1 = ""
Text1 = Chr(Asc(s) + 32)
End Sub

Private Sub Form_Load()
Text1 = ""
Command1.Caption = "小转大"
Command2.Caption = "大转小"
End Sub

'以上是一个字符窜的代码,如果要多字符窜,你自己加入if吧,因为你要不用if ,选择我为最佳,我之前的号被无情的盗号都盗了,百度也找不回,所以在此严重鄙视一下万恶的盗号者`

回答(2):

A 65
a 97
大写转小写 +31
小写转大写 -31