質問編集履歴
2
改善
test
CHANGED
File without changes
|
test
CHANGED
@@ -16,17 +16,17 @@
|
|
16
16
|
|
17
17
|
'ダミーコマンドライン引数。
|
18
18
|
|
19
|
-
Dim opt As Boolean
|
19
|
+
Dim opt As Boolean = True
|
20
20
|
|
21
21
|
|
22
22
|
|
23
23
|
If opt Then
|
24
24
|
|
25
|
-
|
25
|
+
Console.WriteLine("自動実行処理")
|
26
26
|
|
27
27
|
Else
|
28
28
|
|
29
|
-
|
29
|
+
MessageBox.Show("手動実行処理", "テスト", MessageBoxButtons.OK, MessageBoxIcon.Information)
|
30
30
|
|
31
31
|
End If
|
32
32
|
|
1
修正
test
CHANGED
File without changes
|
test
CHANGED
@@ -20,7 +20,7 @@
|
|
20
20
|
|
21
21
|
|
22
22
|
|
23
|
-
If
|
23
|
+
If opt Then
|
24
24
|
|
25
25
|
MessageBox.Show("手動実行処理", "テスト", MessageBoxButtons.OK, MessageBoxIcon.Information)
|
26
26
|
|