by イグトランス » 2005年11月07日(月) 21:26
このコードをコンパイルして実行するとアクセス違反になってしまいます。
たちの悪いことにデバッグ実行ではProjectEditorが巻き添えになって落ちてしまいます。
せめてそれだけは勘弁してほしいです。
コード: 全て選択
#strict
Const Size = ELM(3)
Dim Expression[Size] = ["Angry", "Enjoy", "Sad"] As BytePtr
Dim i As Long
For i = 0 To Size
MessageBox(0, Expression, "", MB_OK)
Next
このコードをコンパイルして実行するとアクセス違反になってしまいます。
たちの悪いことにデバッグ実行ではProjectEditorが巻き添えになって落ちてしまいます。
せめてそれだけは勘弁してほしいです。
[code]#strict
Const Size = ELM(3)
Dim Expression[Size] = ["Angry", "Enjoy", "Sad"] As BytePtr
Dim i As Long
For i = 0 To Size
MessageBox(0, Expression[i], "", MB_OK)
Next[/code]