Index: trunk/bin/SubOperation/dx/main_exe_directx.abp
===================================================================
--- trunk/bin/SubOperation/dx/main_exe_directx.abp	(revision 300)
+++ trunk/bin/SubOperation/dx/main_exe_directx.abp	(revision 364)
@@ -2,14 +2,14 @@
 
 
-Dim ScreenX=640 As Long	'ディスプレイの幅  （ピクセル単位）
-Dim ScreenY=480 As Long	'ディスプレイの高さ（ピクセル単位）
+Dim ScreenX = 640 As Long	'ディスプレイの幅  （ピクセル単位）
+Dim ScreenY = 480 As Long	'ディスプレイの高さ（ピクセル単位）
 
 ' TODO: この位置にグローバル変数を定義してください。
 
 
-Function InitProc() As BOOL
+Function InitProc() As Boolean
 	'DirectXを初期化
-	If dx_Init(hMainWnd,ScreenX,ScreenY,FALSE)=0 Then
-		InitProc=0
+	If dx_Init(hMainWnd, ScreenX, ScreenY, FALSE)=0 Then
+		InitProc=False
 		Exit Function
 	End If
@@ -20,5 +20,5 @@
 	' TODO: この位置にアプリケーションの初期化コードを記述してください。
 
-	InitProc=1
+	InitProc = True
 End Function
 
@@ -49,5 +49,5 @@
 '------------------------------------------------
 
-If InitProc()=0 Then
+If InitProc() = False Then
 	MessageBox(0,"初期化に失敗しました。","Error",MB_OK or MB_ICONEXCLAMATION)
 	ExitProcess(0)
@@ -104,3 +104,4 @@
 
 QuitProc()
-ExitProcess(msgMain.wParam)
+System.Environment.ExitCode = msgMain.wParam As Long
+End