none
ComboBox1을 선택시 ComboBox2의 변화 RRS feed

  • 질문

  •  With ComboBox1.Items
                .Add("Kcal/h")  

                .Add("W") 

     End With
        ComboBox1.SelectedIndex = 0

    ComboBox1,ComboBox2가 있고요 items도 같습니다.

    그래서 ComboBox1이 SelectedIndex = 1로 변하면 ComboBox2도 같이 변하게 하고 싶습니다.

    감사 합니다.

    2013년 10월 29일 화요일 오후 11:21

답변

  • 너무 간단한 내용이라 맞는지 모르겠습니다.

    코드는 아래와 같습니다.

    Public Class Form1
    
        Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
            With ComboBox1.Items
                .Add("Kcal/h")
    
                .Add("W")
    
            End With
            With ComboBox2.Items
                .Add("Kcal/h")
    
                .Add("W")
    
            End With
    
            ComboBox1.SelectedIndex = 0
    
        End Sub
    
        Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
            ComboBox2.SelectedIndex = ComboBox1.SelectedIndex
        End Sub
    End Class
    

    • 답변으로 표시됨 박희철 2013년 11월 2일 토요일 오전 12:35
    2013년 10월 30일 수요일 오전 8:12

모든 응답

  • 너무 간단한 내용이라 맞는지 모르겠습니다.

    코드는 아래와 같습니다.

    Public Class Form1
    
        Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
            With ComboBox1.Items
                .Add("Kcal/h")
    
                .Add("W")
    
            End With
            With ComboBox2.Items
                .Add("Kcal/h")
    
                .Add("W")
    
            End With
    
            ComboBox1.SelectedIndex = 0
    
        End Sub
    
        Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
            ComboBox2.SelectedIndex = ComboBox1.SelectedIndex
        End Sub
    End Class
    

    • 답변으로 표시됨 박희철 2013년 11월 2일 토요일 오전 12:35
    2013년 10월 30일 수요일 오전 8:12
  • 감사 합니다.

    어떻게 하나 고민 했습니다.

    덕분에 해결 되었 습니다.

    항상 감사 합니다.

    Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
            If ComboBox1.SelectedIndex = 1 Then
                ComboBox3.SelectedIndex = 1
            Else
                ComboBox3.SelectedIndex = 0
            End If
        End Sub

    2013년 11월 2일 토요일 오전 12:36