2009-11-27 5 views
1

vb.net 또는 vb2008 익스프레스 에디션에서 listview 컨트롤을 사용하여 쿼리를받은 후 데이터베이스에서 레코드를 표시하려고합니다. 목록 뷰 컨트롤에 Account # 및 Authorized Users라는 두 개의 열 헤더가 있습니다. 데이터베이스의 레코드를리스트 뷰 컨트롤에 표시 할 수 있었지만 표시해야하는 적절한 열에 정렬하는 방법을 모릅니다. 모든 레코드가 하나의 열에 결합되어 다른 레코드가 내가 원하는 것은 계좌 번호를 계좌 번호 열 머리글과 정렬하여 표시하고 이름은 승인 된 사용자 열 머리글에 정렬해야합니다. 여기 내가 사용하는 코드는 다음과 같습니다 올바르게 나를 위해 코드를 디버깅 할 수 있다면목록보기 컨트롤에 레코드를 표시하는 방법?

***************************************************************** 
Private Sub Button1_Click(-------------) Handles Button1.Click 

    Dim db As New memrecDataContext 
    Dim au = From ah In db.Table1s _ 
       Where ah.Account <> " " 

    For Each ah In au 
      With Form9.ListView1.Items 
       Form9.ListView1.Items.Add(ah.Account) 
       Form9.ListView1.Items.Add(ah.Name) 
       Form9.Show() 
      End With 
    Next 

End Sub 
********************************************************* 

내가 크게 감사하겠습니다?

답변

1

listview에서 세부 정보 모드는 두 개의 열이 모두 단일 목록보기 항목에 있습니다. 첫 번째 열은 item.text이며, 나머지는 item.subitems이 같은 있습니다 :

dim item as ListViewItem 
ListView1.Columns.Add("Account") 
ListView1.Columns.Add("Name") 

For Each ah In au 
    item = New ListViewItem 
    item.text = ah.Account 
    item.subitems.add(ah.Name) 
    form9.listview1.items.add(item) 
    next ah 

노트의 몇 가지 : 당신은 양식 당신이 목록보기에 항목을 추가 할 때마다 시간을 표시해서는 안된다. 양식을 한 번만 표시하는 것이 좋습니다. 둘째, With 문은 form9.listview.items를 작성하는 바로 가기에 사용됩니다. With 블록에서 form9.listview.items를 쓰는 대신 마침표 (.)를 사용할 수 있습니다.

+0

+1은 with 키워드의 오용을 해결하고 수정합니다. – Wade73

+0

감사합니다. 정답 일 경우 체크 표시를 클릭하여 표시 할 수 있습니다. – xpda

관련 문제