If文

##########  サンプル   ##########

    Dim nRes As Integer
    
    '
    nRes = MsgBox("本当に打点を削除しますか?", vbYesNo, App.Title)
    
    If nRes = vbYes Then
        
        '処理

    ElseIf nRes = vbNo Then
    
        Exit Sub
        
    End If

    

---

<戻る>

Gポイントポイ活　Amazon Yahoo 楽天

無料ホームページ 楽天モバイル[UNLIMITが今なら1円] 海外格安航空券 海外旅行保険が無料！