Passing information

[brew2]

Have used this successfully but in this case it does not work. I have data in one form to transfer to another. In the passing form is this code:

Public ReadOnly Property Action() As String
        Get
            Return sAction
        End Get
End Property 

Private Sub lvwDisplay_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles lvwDisplay.Click
        lngID = CInt(lvwDisplay.SelectedItems(0).Text)
        sAction = "D"
        Me.Hide()
        mdiMain.Show()
End Sub

In the receiving form is:

Select Case frmAllView.Action
            Case Is = "D"
                If frmAllView.lvwDisplay.Items.Count = 0 Then
                    Exit Sub
                Else
                    lngID = CInt(frmAllView.lvwDisplay.SelectedItems(0).Text)
                    dataMgr.FindOneName(lngID, mMember, mAttend)
                    FillBoxes()
                End If
            Case Is = "X"
                MsgBox("X")
End Select

After code returns to the receiving form, saction is 'nothing' which is perplexing. Of course, if sAction is nothing then the Select Case is bypassed.

Any ideas would be great. thanks

 

[ThatRickGuy]

FAQs for the win: faq796-5773

-Rick

VB.Net Forum forum796 forum855 ASP.NET Forum
I believe in killer coding ninja monkeys.