Dim buffer$ As String
と変数を定義して、MainWnd_EditBox1_Change()イベントで、
(1)
コード: 全て選択
GetDlgItemText(hMainWnd, EditBox1, Data$, 8)
SetWindowText(GetDlgItem(hMainWnd, EditBox2), Data$)
又、
(2)
コード: 全て選択
Data$ ="1234"
buffer$ =Mid$(Data$, 1, 2)
SetWindowText(GetDlgItem(hMainWnd, EditBox2), buffer$)
ところが、
(3)
コード: 全て選択
GetDlgItemText(hMainWnd, EditBox1, Data$, 8)
buffer$ =Mid$(Data$, 1, 2)
SetWindowText(GetDlgItem(hMainWnd, EditBox2), buffer$)
環境は、Windows XP SP3、ActiveBasic ver.4.24.00で起きています。
Windows Meでも同様なのでOSは関係ないと思います。
(3)は(1)と(2)の組み合わせで、EditBox2にはEditBox1に入力した内容の指定文字列が表示されると思ったのですが、何故でしょうか?