VBScript: if文を1行で記述する方法

VBScriptでIf文を1行で記述する方法を紹介します。
「If 条件式 Then」の後に続く処理をそのまま同じ行に記述するだけです。

例えば、次のような3行のシンプルなif文があるとします。

If a = 10 Then
	MsgBox(a)
End If

上のif文は次のように1行で書くことができます。

If a = 10 Then MsgBox(a)

最後の「End If」はあってもなくても構いません。

1行でも複数行でもどちらで記述してもいいのですが、 1行の方が見やすい場合は1行、 複数行の方が見やすい場合は複数行にすることをおすすめします。

「If~Else~」の場合も1行で書ける?

次のような「If~Else~」文があるとします。

If a = 10 Then
	b = 10
Else
	b = 20
End If

試してみたところ、これも1行で記述できました。

If a = 10 Then b = 10 Else b = 20

1行で記述できますが、 よほどシンプルな処理でない限りは 可読性が悪くなるので止めておいた方が良いです。

VBScript入門