2011-01-07 8 views
0

도구 상자에 항목 (체크 박스)을 동적으로 추가하는 방법을 알고 있지만 양식에있는 확인란을 추가하고 싶습니다. 나는 코드Toolstripmenu 항목 추가

Dim chkboxhost As ToolStripControlHost 
chkboxhost = New ToolStripControlHost(CheckBox1) 
toolStrip1.Items.Add(chkboxhost) 

를 사용하여 시도했지만이 화면의 왼쪽 상단으로 이동하여 ToolStrip에이 때 나타나는 클릭 기존의 체크 박스를 만든다. 그래서 왼쪽 상단 모서리에 가지 않고 메뉴에 체크 박스를 추가하고 싶습니다.

+0

보통 이것은 'ToolStripMenuItem'으로 실행되며,'CheckOnClick = true'로 설정됩니다. 그것은 당신의 필요에 부합하지 않습니까? –

+0

오, 네가 묻는 것을 보았다 - 두 곳에서 표시하고자하는 하나의 체크 박스가있다. 이 작업은 수행 할 수 없습니다. 각 확인란마다 고유 한 위치가 있습니다. 당신이해야 할 일은 두 개의 체크 박스를 만들어서 각각의 체크 된 상태를'CheckedChanged' 이벤트에서 서로 업데이트하도록 설정하는 것입니다. 또는 데이터 바인딩을 사용하는 경우 더 쉽게 수행 할 수 있습니다. 둘 다 동일한 속성에 바인딩하면 완료됩니다. 둘 다 자동으로 업데이트됩니다. * (또는 더 정확하게 BindingSource가 업데이트됩니다.) * –

답변

0

는 BlueRaja의 반응은 여기, 당신이 그것을 여러 가지 방법으로 할 수있는, 대답은 두 가지입니다 : 첫째

:

Private Sub ToolStripButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton1.Click 
    ToolStripButton2.Checked = ToolStripButton1.Checked 
    'Do whatever you want with your buttons 
End Sub 

Private Sub ToolStripButton2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton2.Click 
    ToolStripButton1.Checked = ToolStripButton2.Checked 
    'Do whatever you want with your buttons 
End Sub 

또 다른 방법 :

Private Sub ToolStripButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton1.Click 
    'Do whatever you want with your buttons 
End Sub 

Private Sub ToolStripButton2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton2.Click 
    'Do whatever you want with your buttons 
End Sub 

Private Sub ToolStripButton1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton1.CheckedChanged 
    ToolStripButton2.Checked = ToolStripButton1.Checked 
End Sub 

Private Sub ToolStripButton2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton2.CheckedChanged 
    ToolStripButton1.Checked = ToolStripButton2.Checked 
End Sub 

내가 분명히 첫 번째를 선호한다.