コマンドボタンからフォーカスを奪うには？ (ID:80779)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 早速 Dim st As Long st = GetWindowLong(Command1.hwnd, GWL_STYLE) If st And BS_DEFPUSHBUTTON <> 0 Then st = st - BS_DEFPUSHBUTTON st = st + BS_PUSHBUTTON End If SetWindowLong Command1.hwnd, GWL_STYLE, st こんな感じでやってみましたがうまくいかないです…。 クリックした後にエディタをクリックして(このときにエディタ 部分はSetFocusAPIを呼び出す)文字を打つことは出来ても Enterだけはコマンドボタンが持って行ってしまいます。 なにやら.NETではSetStyleを使ったり VB5ではCanGetFocusをfalseにすればフォーカスを 絶対に得ることのないボタンを作成できるそうですね。 僕はVB6を使っているのですが、その辺りの切り口から うまくできないものですかね？