投稿日 | : 2003/05/22(Thu) 18:33 |
投稿者 | : 花ちゃん |
Eメール | : |
URL | : |
タイトル | : Re^2: テキストボックスでスペースキー |
多分こちらの方が条件に合うのでは
全角・半角の両方のスペースに対応しており、貼り付け等の途中に入っているスペースを無視し、最後が
スペースの時だけ表示します
Private Sub Text1_Change()
If Len(Text1.Text) >= 1 And _
StrConv(Right$(Text1.Text, 1), vbNarrow) = " " Then
Form2.Show
End If
End Sub