01 訂閱 英文簡寫可以大寫轉小寫小寫(如何用VB設計 在文本框中輸入英文字母,單擊轉大寫按鈕字母變為大寫,單擊轉小寫按鈕字母變為小寫. 謝謝!)

求VB語言編一個 轉大寫和轉小寫（英文字母）的編程代碼，順便解釋一下，謝謝

樓上兩位介紹很正確，VB6提供了兩個函數，就是完成你要的功能的。

如果，是老師布置的（不允許使用該函數），那么就要用到另外兩個函數，并結合ASCII編碼的知識來實現：

1，ASCII編碼知識：

大寫字母的編碼： 小寫字母的編碼：

A ---- 65 a ---- 97

B ---- 66 b ---- 98

C ---- 67 c ---- 99

...... ......

Z ---- 90 z ---- 122

從而得到規律，大寫字母的ASCII編碼值 + 32 ，就得到其對應的小寫字母的ASCII編碼值；

而 小寫字母的ASCII編碼值 - 32 ，就得到其對應的大寫字母的ASCII編碼值。

2，VB的ASC()函數和Chr()函數；

ASC()函數 ------ 返回字符的ASCII編碼

Chr()函數 ------ 返回ASCII編碼的相應的字符

這樣就可以開始編寫轉換代碼了：

‘將大寫字母轉換成小寫字母；

Dim C As String

C = InputBox("輸入一個大寫英文字母")

Print Chr(Asc(C)+32)

‘將小寫字母轉換成大寫字母；

Dim C As String

C = InputBox("輸入一個小寫英文字母")

Print Chr(Asc(C)-32)

如何用VB設計? 在文本框中輸入英文字母,單擊轉大寫按鈕字母變為大寫,單擊轉小寫按鈕字母變為小寫. 謝謝!

放一個文本框(Text1),兩個命令按鈕(Command1,內容:大寫;Command2,內容:小寫)

代碼:

Private Sub Command1_Click()

Text1.Text = UCase(Text1.Text)

End Sub

Private Sub Command2_Click()

Text1.Text = LCase(Text1.Text)

End Sub

很赞哦!（815）