投稿日 | : 2005/05/17(Tue) 13:58 |
投稿者 | : 魔界の仮面弁士 |
Eメール | : |
URL | : |
タイトル | : Re: フォーカスの固定・・・? |
> テキストボックスに固定させたいのですが、
> どうしたらいいでしょうか?
固定、ですか?
とりあえず、『テキストボックスに、何かテキストが書かれている時』には、
同一フォーム内では、テキストボックス以外にフォーカスが移動しないようにしてみました。
# やりたい事があまり理解できませんでしたが…こういう事でよいのかな。
'-----
Option Explicit
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
On Error Resume Next
ValidateControls
Cancel = Err.Number
End Sub
Private Sub Text1_Validate(Cancel As Boolean)
Cancel = Text1.Text <> ""
End Sub