2016-09-30 4 views
0

Bitte ich möchte den Wert der Adresse in der Gridview oder Datentabelle speichern, aber seinen Namen anzeigen, so dass beim Speichern von Daten in die Datenbank ich den Wert einfügen.vb.net GridView Speicherwert aber Anzeige von Text aus Datentabelle

dtCust_dtls.DefaultView.RowFilter = String.Format("SR_ID = '{0}'", SrLookup.GetSelectedItem("SR_ID")) 
    GCCustList.DataSource = dtCust_dtls.DefaultView 

    GVCustList.Columns("CUSTOMER_CODE").VisibleIndex = 0 
    GVCustList.Columns("ADDRESS_ID").VisibleIndex = 1 
    GVCustList.Columns("CUSTOMER_CODE").Caption = "Customer Code" 
    GVCustList.Columns("ADDRESS_ID").Caption = "Address" 

auf Taste

dtCust_dtls.DefaultView.RowFilter = String.Format("SR_ID = '{0}' and CUSTOMER_CODE = '{1}'", SrLookup.GetSelectedItem("SR_ID"), txtCust_Code.Text.Trim) 
    If (dtCust_dtls.DefaultView.Count = 0) Then 
     Dim dr As DataRow = dtCust_dtls.NewRow() 
     dr("SR_ID") = SrLookup.GetSelectedItem("SR_ID") 
     dr("CUSTOMER_ID") = DataRowSelectedCust("CUSTOMER_ID") 
     dr("ADDRESS_ID") = cmbCustAdd.SelectedValue 
     dr("CUSTOMER_CODE") = txtCust_Code.Text.Trim 
     dr("CUSTOMER_BARCODE") = DataRowSelectedCust("CUSTOMER_ID") & "." & cmbCustAdd.SelectedValue 'custId + . + addID 
     dr("STAMP_DATE") = Now 
     dtCust_dtls.Rows.Add(dr) 
    Else 
     MsgBox("The Customer code '" & txtCust_Code.Text & "' already exist for " & txtSrName.Text) 
    End If 

enter image description here

auf speichern hinzufügen BTN ich die Datentabelle dtCust_dtls speichere, wie es ist.

Ich hatte eine Idee, eine Spalte hinzuzufügen: Adresse Name und lassen Sie die Spalte Adresse ID, aber ich habe keine Ahnung, wie es geht!

+0

Sie erwähnen sollten, wenn Sie eine benutzerdefinierte Steuerung verwenden und es vielleicht als solche kennzeichnen. – Plutonix

Antwort

0

DIE RepositoryItemLookUpEdit UNTER VERWENDUNG

Dim xCust_Code As New DevExpress.XtraEditors.Repository.RepositoryItemLookUpEdit 
    With xCust_Code 
     .ForceInitialize() 
     .DataSource = dtCustList.DefaultView 
     .DisplayMember = "Customer_Description" 
     .ValueMember = "Customer_Code" 
     .PopulateColumns() 
     .NullText = String.Empty 
    End With 
    GVCustDUE.Columns("CUSTOMER_CODE").ColumnEdit = xCust_Code 
Verwandte Themen