by KT » 2007年6月06日(水) 01:37
Ver4.2.24上では正常実行できているので、バグとして報告させていただきます
単純なパターンを試験してみました
MessageBox(0, "成功", "テスト", MB_OK)
MessageBox(0, Str$(100) , "テスト", MB_OK)
MessageBox(0, Str$(100) + Str$(200) , "テスト", MB_OK)
MessageBox(0, Str$(100) + "成功" , "テスト", MB_OK)
MessageBox(0, "異常" + Str$(100) , "テスト", MB_OK)
MessageBox(0, "エラー" + "発生" , "テスト", MB_OK)
上記コードで、上から4パターンは正常実行できます
5パーターン目は表示が異常となります
6パターン目はスレッド異常として、エラーとなります
スレッド(&H98C)でアクセス違反がありました(EPI=&H77D015F7)
下記のように変数等で表示内容を編集ののち、実行した場合は正常に実行できています
Dim a As String
Dim b As String
Dim i As Long
a = "あいう"
b = "かきく"
i = 234
MessageBox(0 , a , "Test", MB_OK)
MessageBox(0 , a + b , "Test", MB_OK)
MessageBox(0 , a + b + Str$(i), "Test" ,MB_OK)
MessageBox(0 , Str$(i) + a + b, "Test" ,MB_OK)
変数と実体を直接関数内で処理した場合
MessageBox(0 , a + "さしす" , "Test", MB_OK)は正常実行
MessageBox(0 , "さしす" + a , "Test", MB_OK)は異常表示
となります
Ver4.2.24上では正常実行できているので、バグとして報告させていただきます
単純なパターンを試験してみました
MessageBox(0, "成功", "テスト", MB_OK)
MessageBox(0, Str$(100) , "テスト", MB_OK)
MessageBox(0, Str$(100) + Str$(200) , "テスト", MB_OK)
MessageBox(0, Str$(100) + "成功" , "テスト", MB_OK)
MessageBox(0, "異常" + Str$(100) , "テスト", MB_OK)
MessageBox(0, "エラー" + "発生" , "テスト", MB_OK)
上記コードで、上から4パターンは正常実行できます
5パーターン目は表示が異常となります
6パターン目はスレッド異常として、エラーとなります
スレッド(&H98C)でアクセス違反がありました(EPI=&H77D015F7)
下記のように変数等で表示内容を編集ののち、実行した場合は正常に実行できています
Dim a As String
Dim b As String
Dim i As Long
a = "あいう"
b = "かきく"
i = 234
MessageBox(0 , a , "Test", MB_OK)
MessageBox(0 , a + b , "Test", MB_OK)
MessageBox(0 , a + b + Str$(i), "Test" ,MB_OK)
MessageBox(0 , Str$(i) + a + b, "Test" ,MB_OK)
変数と実体を直接関数内で処理した場合
MessageBox(0 , a + "さしす" , "Test", MB_OK)は正常実行
MessageBox(0 , "さしす" + a , "Test", MB_OK)は異常表示
となります