tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re^2: テキストボックスの書き込みで正常で無い症状の場合は、どの様に考えれば良いでしょうか。
投稿日: 2025/02/18(Tue) 20:41
投稿者AK
魔界の仮面弁士 さん

済みません。再度ご質問致します。

> でも、同じように動作することでしょう。
はい、3種類の【デモ」は同じように動作しました。

実行しますと図のようになりました。
何か考えられます必要な設定などがありましたら、ご教示願えますと幸いです。

'正常で無い症状
> ひとまず
> 「keybd_event を送出した後」かつ「SelText に書き込む前」にて
> DoEvents を呼び出せば期待動作するかと思います。
> SetFous は DoEvents の前であれば、keybd_event の前でも後でも構いません。
はい、ありがとうございます。
間違いが無ければ以下の位置に[DoEvents] を※追加しました。

'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'
Private Sub Command3_Click()

Call keybd_event(40, 0, 0, 0) '↓キー on
Call keybd_event(40, 0, KEYEVENTF_KEYUP, 0) '↓キー off 離す
  
     Text1.SetFocus 'フォーカス

     DoEvents '※追加しました。
    
     Text1.SelText = "2:"
    
End Sub
'
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'


Command3ボタンをクリック

Text1
-------------------
2:1:  '1行目
     '2行目
3:      '3行目
4:      '4行目
-------------------

2度目のCommand3ボタンをクリック

Text1
-------------------
2:1:  '1行目
2:    '2行目
3:      '3行目
4:      '4行目
-------------------

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。