-1

Visual Basic (Express 2010) を使用してアパート賃貸フォームを作成しています。別のラジオ ボタンが選択されているときに、いくつかのラジオ ボタンをグレー表示にする必要があります。現時点では、グレー表示自体は問題ではありません。つまり、ラジオ ボタンをグレー表示にすることはできますが、必要なときにそうすることはできません。

フォームのボタンをクリックして特定のラジオ ボタンをグレー表示にする必要がありますが、別のラジオ ボタンをクリックするとグレー表示になります。

サブルーチンを実装した方法は次のとおりですが、計画したようには機能しません。

Private Sub grpBedrooms_CheckedChanged() Handles grpBedrooms.MouseClick

    If rdoOneBed.Checked Then
        Call EnableOneBath()
        Call DisableTwoBaths()
    End If

    If rdoOneBedDen.Checked Then
        Call EnableOneBath()
        Call DisableTwoBaths()
    End If

    If rdoTwoBeds.Checked Then
        Call EnableTwoBaths()
        Call DisableOneBath()
    End If

    grpBedrooms.Refresh()

End Sub

したがって、基本的には、ラジオの rdoOneBed または rdoTwoBeds などをクリックするとすぐに DisableOneBath() または DisableTwoBaths() がアクティブになるようにします。

ラジオを実際にグレー表示するコードは次のとおりです。

 Private Sub DisableTwoBaths()
    Me.rdoTwoBaths.Enabled = False
End Sub

ご協力ありがとうございました!

4

1 に答える 1

0

これを試して ..

Private Sub Bedrooms_Checked(sender As Object, e As EventArgs) Handles rdoOneBed.CheckedChanged, rdoTwoBeds.CheckedChanged
Dim rb as RadioButton = CType(sender,RadioButton)

if rb Is rdoOneBed then
  if rdoOneBed.Checked Then DisableTwoBaths() 
elseif rb Is rdoTwoBed then
  if rdoTwoBed.Checked Then DisableOneBath()
Endif

End Sub
于 2013-06-17T09:57:41.103 に答える