Mid$関数で
Posted: 2012年9月29日(土) 09:31
Dim Data$ As String
Dim buffer$ As String
と変数を定義して、MainWnd_EditBox1_Change()イベントで、
(1)
とすると、EditBox1に入力した文字列がEditBox2にそのまま正常に表示されます。
又、
(2)
とやっても、EditBox2には文字列"12"が正常に表示されます。
ところが、
(3)
とすると、EditBox1に入力してもEditBox2には何も表示されません。
環境は、Windows XP SP3、ActiveBasic ver.4.24.00で起きています。
Windows Meでも同様なのでOSは関係ないと思います。
(3)は(1)と(2)の組み合わせで、EditBox2にはEditBox1に入力した内容の指定文字列が表示されると思ったのですが、何故でしょうか?
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に入力した内容の指定文字列が表示されると思ったのですが、何故でしょうか?