質問編集履歴

2

改善

2016/12/05 10:51

投稿

yuki00079
yuki00079

スコア45

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
- MessageBox.Show("動実行処理", "テスト", MessageBoxButtons.OK, MessageBoxIcon.Information)
25
+ Console.WriteLine("動実行処理")
26
26
 
27
27
  Else
28
28
 
29
- Console.WriteLine("動実行処理")
29
+ MessageBox.Show("動実行処理", "テスト", MessageBoxButtons.OK, MessageBoxIcon.Information)
30
30
 
31
31
  End If
32
32
 

1

修正

2016/12/05 10:51

投稿

yuki00079
yuki00079

スコア45

test CHANGED
File without changes
test CHANGED
@@ -20,7 +20,7 @@
20
20
 
21
21
 
22
22
 
23
- If Not opt Then
23
+ If opt Then
24
24
 
25
25
  MessageBox.Show("手動実行処理", "テスト", MessageBoxButtons.OK, MessageBoxIcon.Information)
26
26