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

Question

大写转小写，小写转大写 可以分开执行。也就是可以不用IF语句。

Answer 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 ，选择我为最佳，我之前的号被无情的盗号都盗了，百度也找不回，所以在此严重鄙视一下万恶的盗号者`

Answer 2

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