質問するログイン新規登録

質問編集履歴

2

改善

2016/12/05 10:51

投稿

yuki00079
yuki00079

スコア45

title CHANGED
File without changes
body CHANGED
@@ -7,12 +7,12 @@
7
7
  ###該当のソースコード
8
8
  ```ここに言語を入力
9
9
  'ダミーコマンドライン引数。
10
- Dim opt As Boolean
10
+ Dim opt As Boolean = True
11
11
 
12
12
  If opt Then
13
+ Console.WriteLine("自動実行処理")
14
+ Else
13
15
  MessageBox.Show("手動実行処理", "テスト", MessageBoxButtons.OK, MessageBoxIcon.Information)
14
- Else
15
- Console.WriteLine("自動実行処理")
16
16
  End If
17
17
  ```
18
18
 

1

修正

2016/12/05 10:51

投稿

yuki00079
yuki00079

スコア45

title CHANGED
File without changes
body CHANGED
@@ -9,7 +9,7 @@
9
9
  'ダミーコマンドライン引数。
10
10
  Dim opt As Boolean
11
11
 
12
- If Not opt Then
12
+ If opt Then
13
13
  MessageBox.Show("手動実行処理", "テスト", MessageBoxButtons.OK, MessageBoxIcon.Information)
14
14
  Else
15
15
  Console.WriteLine("自動実行処理")