########## サンプル ##########
Dim nRes As Integer ' nRes = MsgBox("本当に打点を削除しますか?", vbYesNo, App.Title) If nRes = vbYes Then '処理 ElseIf nRes = vbNo Then Exit Sub End If
PC用眼鏡【管理人も使ってますがマジで疲れません】 解約手数料0円【あしたでんき】 Yahoo 楽天 NTT-X Store
無料ホームページ 無料のクレジットカード 海外格安航空券 ふるさと納税 海外旅行保険が無料! 海外ホテル