Caseで始まる文をSelect Case~End Select内に打ったとき、字上げはされますが字下げがされません。
具体例↓
自動的にこう修正されるつもりで入力。↓
コード: 全て選択
Dim a As Long,b As Long
Select Case b
Case 1
a=1
Case 2
a=2
Case 3
a=3
Case Else
a=4
End Select
コード: 全て選択
Dim a As Long,b As Long
select case b'←先頭が小文字のまま
case 1'←字上げはされているがCが小文字
a=1'←普通に字上げ
case 2'←時下げされてない+Cが小文字のまま
a=2'←字上げされちゃってる
case 3'←さらに時下げされてない+Cが小文字のまま
a=3'←さらに字上げ
case else
a=4
End Select'←何気にここだけ字下げ+先頭大文字化