作者rosemary (原po比較老)
看板Visual_Basic
標題Re: [VBA ] Excel的英文大小寫變換
時間Tue Oct 25 10:53:14 2005
※ 引述《walkman (走路男人~)》之銘言：
: 請問一下,我現在有個程式:
: Dim str As string
: str="Hello"
: MsgBox str
: MsgBox len(str)
: MsgBox UCase(str)
: MsgBox LCase(str)
: 我現在只能夠看出它的字串長度
: 還有讓他全部變大寫或全部變小寫
: 有沒有辦法修正這個程式使它大小寫互換阿??
: 像是"Hello"經過變換會變成"hELLO"
: 請高手們幫忙了....
: 謝謝
Dim str As String
str = "Hello"
Dim s As String
For i As Integer = 1 To Len(str)
Dim c As String = Mid(str, i, 1)
s = s & IIf(c >= "A" And c <= "Z", LCase(c), UCase(c))
Next i
MsgBox(s)
我是用 VB.Net 寫的 應該沒有差很多吧
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 192.192.5.253
1F：推 fumizuki:VB6 不能在迴圈內宣告變數 10/25 11:13
2F：→ fumizuki:VBA 同上，亦不能在宣告變數時給初始值。 10/25 11:14