掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
オプションボタンの選択を取り消すには？ (ID：82178)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
こういうのはflgで蹴っ飛ばす。 Private Sub optTest_Click(Index As Integer) Static flg If flg = True Then Exit Sub flg = True Dim intA As Integer intA = MsgBox("ほんとに変更する？", vbYesNo, "ほんとに？") If intA = vbNo Then If optTest(0).Value = True Then optTest(1).Value = True ElseIf optTest(1).Value = True Then optTest(0).Value = True End If End If flg = False End Sub
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.