ページ 11

Select Case文

Posted: 2005年6月19日(日) 10:40
by かと

コード: 全て選択


'----------------------------------------
Sub test( c As BytePtr)
	Select Case c
		Case "a"
		Case Else
	End Select
End Sub

test("b")
'----------------------------------------
↑のコードを実行するとアクセス違反で落ちます

Case Elseを抜くと正常動作します
testの引数がBytePtr型以外の場合も正常動作します

AB4.01.02
98、2000、XPで確認しました
よろしくお願いします