DaniWeb Forum Index > Software Development > Visual Basic 4 / 5 / 6

getting data from one form to another.

Please support our Visual Basic 4 / 5 / 6 advertiser: Programming Forums - DaniWeb Sister Site

•

Join Date: Feb 2006

Posts: 30

Reputation: skalra63 is an unknown quantity at this point

Solved Threads: 0

skalra63

Offline

Light Poster

getting data from one form to another.

Mar 7th, 2006

i wondered if anyone could help me with this.

i have a button on a form (frmUpdateProduct). this button opens up another form (frmSelectSupplier). i have a listbox which gets all the supplier names from the access database, and assigns then with the Supplier ID (also from the database). here is the code for the listbox:

 Help with Code Tags 
 Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text) 
Private Sub form_activate()
Set m_colSuppID = Nothing
    Set m_colSuppID = New Collection
 
    strSQL = "SELECT [supplier_ID], [SupplierName] FROM [Supplier]"
    With con
        .Open
        Set RP = .Execute(strSQL)
    End With
    With RP
        lstSupplier.Clear
        Do Until .EOF
            lstSupplier.AddItem "" & !supplierName
            m_colSuppID.Add CStr(!supplier_ID), "" & !SupplierName
            .MoveNext
        Loop
        .Close
    End With
    con.Close
End Sub
Private Sub form_activate()
Set m_colSuppID = Nothing
    Set m_colSuppID = New Collection
    
    strSQL = "SELECT [supplier_ID], [SupplierName] FROM [Supplier]"
    With con
        .Open
        Set RP = .Execute(strSQL)
    End With
    With RP
        lstSupplier.Clear
        Do Until .EOF
            lstSupplier.AddItem "" & !supplierName
            m_colSuppID.Add CStr(!supplier_ID), "" & !SupplierName
            .MoveNext
        Loop
        .Close
    End With
    con.Close
End Sub

i need to get the supplier name/ supplier id, to be sent to a text box (frmUpdateProduct.TxtSupplier.text). how would i do this?

•

Join Date: Jul 2005

Posts: 188

Reputation: aparnesh is an unknown quantity at this point

Solved Threads: 10

aparnesh

Offline

Junior Poster

Re: getting data from one form to another.

Mar 7th, 2006

2 ways :

You can have the Supplier data (Name, Id) as global variables. From form1 (SelectSupp) set the values of the globals and then open form2(UpdProduct). Then u can access the global variables from form2. Frankly, some programmers don't like to use globals, so the second method is better.

Declare a public function in form1 that shows the SuppName.
Public ShowSuppName() as String
ShowSuppName = lstSupplier.Text
End Function

Then call this function from form2 after it has been loaded
txtSupplier.text = form1.ShowSuppName()