내 POS 만들기 : DataGridview에서 오류가 발생했습니다.

Question

VB.NET을 사용하여 간단한 POS 시스템을 만들려고합니다. 시작하는 방법을 모르기 때문에 친구들에게 샘플 소스 코드를 요청합니다. 우리 학교가 Microsoft Access를 사용하기 때문에 Microsoft Access 대신 데이터베이스에 MySQL을 사용할 계획입니다. 내가 형식의 "ODBC"종류로 변환하려고

Public Sub FillDGVWithReceiptInfo(ByVal DGV As DataGridView) 
     DGV.Rows.Clear() 
     Dim TA As New POSDSTableAdapters.ItemsTableAdapter 

     For i = 0 To Me.ReceiptDetailsList.Count - 1 
      Dim T1 = Me.ReceiptDetailsList(i).Barcode 
      Dim T2 = Me.ReceiptDetailsList(i).ItemBuyPrice 
      Dim T3 = Me.ReceiptDetailsList(i).ItemCount 
      Dim T4 = Me.ReceiptDetailsList(i).ItemSellPrice 
      Dim T5 = T3 * T4 
      Dim T6 = TA.GetDataByBarcode(T1).Rows(0).Item("ItemName") 

      DGV.Rows.Add(T1, T6, T2, T4, T3, T5) 

     Next 
    End Sub 

: 다음은 소스 코드의 샘플 코드입니다. 없음 행이 열이없는 DataGridView 컨트롤에 추가 할 수 있습니다 :

Public Sub FillDGVWithReceiptInfo(ByVal DGV As DataGridView) 
     DGV.Rows.Clear() 

     For i = 0 To Me.ReceiptDetailsList.Count - 1 
      Dim T1 = Me.ReceiptDetailsList(i).ganoProdID 
      Dim T3 = Me.ReceiptDetailsList(i).ItemCount 
      Dim T4 = Me.ReceiptDetailsList(i).ganoItemPrice 
      Dim T5 = T3 * T4 

      Dim TA As New OdbcDataAdapter("SELECT * FROM gano_inventory WHERE gano_proID = " & T1 & ";", conn) 
      Dim R As New DataTable 
      TA.Fill(R) 

      Dim T6 = R.Rows(0).Item("gano_item") 

      DGV.Rows.Add(T1, T6, T4, T3, T5) 

     Next 
    End Sub 

이 코드의 오류입니다 : 그래서이 함께했다 (또한,이 내가 약간의 오류가 발생하는 부분입니다). 먼저 열을 추가해야합니다. DGV.Rows.Add (T1, T6, T4, T3, T5)

은 누군가가 나를 도와주세요 수 있습니다 :이 줄? 미리 감사드립니다!

Answer 1

행을 추가하기 전에 열을 만들어야합니다.

DGV.Columns.Add("ProdId") 
DGV.Columns.Add("Item") 
DGV.Columns.Add("ItemPrice") 
DGV.Columns.Add("ItemCount") 
DGV.Columns.Add("Total") 

...

For i = 0 ... 
    DGV.Rows.Add(...