タイトル | : ポップアップメニューについての質問です。 |
記事No | : 11950 |
投稿日 | : 2008/04/03(Thu) 15:09 |
投稿者 | : tea |
フォームにコマンドボタンが2つ(A,B)配置してあります。 このコマンドボタンをクリックするとポップアップメニュー(名簿)が出現 して、その中の氏名の1つを選択します。 その後再びコマンドボタンをクリックしたらポップアップメニュー上では先 ほど選択した氏名は非表示にしたいのです。
ポップアップメニューに表示される名簿の内容をA,B別々に表示させています が、以下のコードでは、どのコマンドボタンをクリックしてポップアップメ ニュー表示させてもA,Bともに同一の氏名が非表示となります。 基本的なことかもしれませんが、どうか教えてください。 よろしくお願いします。
Private Sub mnuFoulF_Click(CIndex As Integer) Dim i As Integer Dim TeamIndex As Integer
If CIndex = 0 Then Exit Sub
If Game.Team(TeamIndex).Player(CIndex).IsThownOut = False Then mnuFoulF(CIndex).Enabled = False End If
End Sub
|