Multiple Forms + textBox - Xtreme Visual Basic Talk

09-08-2004, 11:10 AM

ScientificLee ScientificLee is offline

Centurion

Join Date: Sep 2003

Posts: 118

Multiple Forms + textBox

Hi.

I have a main form that receives data.
When certain conditions are met it calls a function to send messages to the end users. Something else I would like it to do is call a function, WriteInfo(tracker as string, barrier as string).

Code:

Private Sub WriteToInfo(ByVal tracker As String, ByVal barrier As String)
        Dim info As New Form2
        info.Show()
    End Sub

The function should just write out information to a floating text box. Not sure how I should go about this. I guess I should first check if Form2 already exists. If it does just write to it. Although I'm not sure how to do this because I usually just pass in the variable when I initiate the other form.

Any ideas?

09-08-2004, 01:21 PM

Allen G

Centurion

Join Date: Jul 2004

Location: Arlington, Texas

Posts: 189

Quote:

Originally Posted by ScientificLee

Code:

Private Sub WriteToInfo(ByVal tracker As String, ByVal barrier As String)
        Dim info As New Form2
        info.Show()
    End Sub

This is a pain for me aswell. The only thing I have found to work is:

Code:

Public Shared Sub UpdateStatus(Optional ByVal newStatus As String = "")
        CType(frmLogin.ActiveForm, frmLogin).sbLoginStatus.Panels(0).Text = newStatus
    End Sub

Something like that. (This must be placed within the Form Class.)

09-08-2004, 02:21 PM

ScientificLee ScientificLee is offline

Centurion

Join Date: Sep 2003

Posts: 118

I'll try that. The C# solution seems more elegant. Just call the function that updates the string value.

09-09-2004, 02:49 AM

liwo

Centurion

Join Date: Oct 2003

Location: Germany

Posts: 116

I would declare a variable on class level in your Form1 for Form2:
Private info As Form2

So your sub would be this:

Code:

Private Sub WriteToInfo(ByVal tracker As String, ByVal barrier As String)
    If info Is Nothing Then
        info = New Form2
        info.Show()
    End If
End Sub

To write information to a textbox in Form2 you can either add a method for it to Form2 or you can just acces info.Textbox1.Text and write the info there

__________________
Please use [vb][/vb] Tags instead of [code][/code] Tags when posting VB Code. Thank you.