投稿日 | : 2005/12/05(Mon) 17:46 |
投稿者 | : 花ちゃん |
Eメール | : |
URL | : |
タイトル | : Re^3: 大文字指定 |
下記では。
Private Sub Text1_Change()
Text1.SelStart = Len(Text1.Text)
Text1.Text = UCase(Text1.Text)
End Sub
>TEXT1.TEXT の _Click イベント内で
>TEXT1.TEXT = StrConv(TEXT1.TEXT String,vbUpperCase)
>で 変換してTEXT1.TEXT に 表示すると
>当然またイベントが発生してしまい、その繰り返しでオーバーフローになりました。
コードが間違っているのは別として、オーバーフローにはなりませんよ。
(繰り返す事はありませんよ)
他に原因があるかと思います。(他に何か処理していませんか)
Private Sub Text1_Click()
Text1.Text = StrConv(Text1.Text, vbUpperCase)
End Sub