DaniWeb IT Discussion Community

DaniWeb IT Discussion Community (http://www.daniweb.com/forums/index.php)
-   VB.NET (http://www.daniweb.com/forums/forum58.html)
-   -   Help transferring data between forms (http://www.daniweb.com/forums/thread161815.html)

kajames Dec 11th, 2008 1:09 pm
Help transferring data between forms
 
Hi,

I'm currently working on a group project that involves an address book (working in VisualBasic.Net 2003). I have one form (frmData) in which the user enters data. I want to transfer it to a label on my other form (frmAddress). Currently, on frmAddress:

Public strName As String

Public DataForm As New frmData


Private Sub lblContact_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lblContact.SelectedIndexChanged

        Me.lblContact.Text = strName

End Sub

On frmData:


Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAdd.Click

        Dim AddressForm As New frmAddress
        AddressForm.strName= Me.txtName.Text

    End Sub

If someone has a suggestion (I obviously have no idea what I'm doing and need lots of help), please reply. I'm very new at this.

Jx_Man Dec 12th, 2008 4:22 am
Re: Help transferring data between forms
 
what errors came up?
try to use Shared variable to accomodate your address data.

kajames Dec 12th, 2008 4:04 pm
Re: Help transferring data between forms
 
There weren't any specific errors- but nothing happened.

NEo4 Dec 14th, 2008 3:41 am
Re: Help transferring data between forms
 
Try changing the code in frmAddress to:
    Public Shared strName As String
    Dim DataForm As New frmData


    Private Sub lblContact_SelectedIndexChanged _
                    (ByVal sender As System.Object, _
                    ByVal e As System.EventArgs) _
                    Handles lblContact.SelectedIndexChanged

        Me.lblContact.Text = strName

    End Sub
and code for frmDate to:
    Private Sub Button1_Click(ByVal sender As System.Object, _
                              ByVal e As System.EventArgs) _
                              Handles btnAdd.Click

        AddressForm.strName = Me.txtName.Text

    End Sub


All times are GMT -4. The time now is 4:32 am.

Forum system based on vBulletin Copyright ©2000 - 2009, Jelsoft Enterprises Ltd.
©2003 - 2009 DaniWeb® LLC