########## サンプル ########## Dim nMode As Integer Select Case nMode Case 0 Case 1 Case 2 Case Else End Select
########## サンプル ##########
Dim nMode As Integer Select Case nMode Case 0 Case 1 Case 2 Case Else End Select
<戻る>