2 콤보와 2 차원 배열

Question

내가 영화 범주를 선택합니다 1 드롭 다운 목록을 사용하여 다음 2 드롭 메뉴에서 해당 범주에서 영화가 될 것 VB 프로젝트를 진행했습니다

표시됩니다. 영화는 범주별로 2 차원 배열로 저장됩니다.

여러분의 도움을 받아 배열을 편집 할 수 있었지만 .AddRange() 함수에 문제가 있습니다. 범주를 선택할 때 콤보 상자 내 두 번째에 나타나는 목록 (각 범주에 대한)에 대해 괄호에 넣어야하는 것은 무엇입니까?

내가 시도 :

• .AddRange (movie_list_combobox)
• .AddRange (movie_category_combobox)
• .AddRange (배열 (movie_list_combobox))
• .AddRange (배열 (movie_category_combobox))

아무 것도 효과가 없습니다.

항목 변경 :

1. 업데이트 배열
2. 를 대신하는 경우/다른 문을 사용하는, 내가 사용/다음 (중 더 이상 사용을 선택 케이스)
3. 이 addRange를 (추가)
에 대한

내가 첨부했습니다 아래에있는 내 코드 :

Public Class Video_Form 

Private Sub count_textbox_TextChanged(ByVal sender As Object, ByVal e As EventArgs) Handles count_textbox.TextChanged 

End Sub 

Private Sub Count_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Count.Click 

    count_textbox.Text = Me.movie_list_combobox.Items.Count 

End Sub 

Private Sub movie_categories_combobox_SelectedIndexChanged(ByVal sender As Object, ByVal e As EventArgs) Handles movie_categories_combobox.SelectedIndexChanged 

End Sub 

Private Sub movie_list_combobox_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles movie_list_combobox.SelectedIndexChanged 

    Dim Movies(,) As String = {{"Meet", "Oxford", "Sterilite"}, {"Sunflower", "Seeds", ""}, {"Black Box", "", ""}, {"Dancing ", "", ""}, {"Dictionary", "", ""}, {"Glue", "Flight", ""}} 

    Dim row As Integer 
    Dim column As Integer 

    For movie_categories_combobox.SelectedIndex = 0 Then 
    row = 0 To 2 
    column = 0 To 0 
    movie_list_combobox.Items.Clear() 
    movie_list_combobox.Items.AddRange() 
    Next 

    For movie_categories_combobox.SelectedIndex = 1 Then 
    row = 0 To 1 
    column = 1 To 1 
    movie_list_combobox.Items.Clear() 
    movie_list_combobox.Items.AddRange() 
    Next 

    For movie_categories_combobox.SelectedIndex = 2 Then 
    row = 0 To 0 
    column = 2 To 2 
    movie_list_combobox.Items.Clear() 
    movie_list_combobox.Items.AddRange() 
    Next 

    For movie_categories_combobox.SelectedIndex = 3 Then 
    row = 0 To 0 
    column = 3 To 3 
    movie_list_combobox.Items.Clear() 
    movie_list_combobox.Items.AddRange() 
    Next 

    For movie_categories_combobox.SelectedIndex = 4 Then 
    row = 0 To 0 
    column = 4 To 4 
    movie_list_combobox.Items.Clear() 
    movie_list_combobox.Items.AddRange() 
    Next 

    For movie_categories_combobox.SelectedIndex = 5 Then 
    row = 0 To 1 
    column = 5 To 5 
    movie_list_combobox.Items.Clear() 
    movie_list_combobox.Items.AddRange() 
    Next 

    '//End If 
    '//End Select 

End Sub 

,536,

내 코드의 어떤 부분이 잘못되었음을 알려주십시오.

Answer 1

제 의견으로는 당신의 문제가 아주 분명하지 않습니다 ... 아마도 내가 당신에게 있다면 내가 무엇을 할 지 말하면서 당신을 도울 수 있습니다. 이런 식으로 2 차원 배열을 선언 할 것입니다. 예를 들어. 그런 다음 인덱스 1 ....

Dim array as new string(1,2) ={{"Scary movie", "Ace ventura", "American pie"}, {"Titanic", "avatar", "quo vadis"}} 

에서 인덱스 0 및 kolossal에서 재미있는 영화, 영화 카테고리 콤보 채울 다음 movie_category_combobox.SelectedIndexChanged가 발생했을 때 마지막으로

movie_category_combobox.items.addRange(new string(){"Funny movies", "Kolossal"}) 

을, 당신은 단지 필요 : 나 엑셀과에서 "배열"을 볼 수 있도록 그것은 쉽게

'clear the movie combobox 
movie_list_combobox.items.clear() 

'fill the movie combobox with the index at the selected position 
movie_list.combobox.items.addrange(array(movie_category_combobox.selectedIndex)) 

는 희망이 도움이

....