How do I pass data in string from a form to another?

[hyenakal]

How do I pass data in string from a form to another?

i'm trying to pass the option selected on my list box from one from to another to be displayed in a text box. how do i do that?
thank you

[JamesDT]

There are many ways,
You could have a global variable in your second form to store which option was selected. Then just have a PUBLIC method in your second form called getSelected which returns your option

public function getSelected()
return selection
end function

then as long as you open the second form modally, the first form will wait for the second form to close before executing the rest of the code.

form2.show vbModal
option = form2.getSelected()
form2.dispose()

or for VB2005

form2.showDialog()
option = form2.getSelected()
form2.dispose()

will open it in Modal

Hope this helps

[hyenakal]

i'm sorry i didnt make it clear that i'm using vb 6.0

thank you

[PVBert]

Make a public form variable in the second form.
Load the second form modally.
Pass the value to the form as a propertie.
If you are ready in the form close is
The form properties stay preserved.
Do with them what you want (e.q. in the fist form).
Then, unload the second form.

'In Form1
Form2.Show vbModal
MsgBox "We still have the string: " & form2.my_second_string
Unload Form2
'Here Form2 is destroyed; with it the (public) string

'In Form2
Public My_Second_String as String

Private Sub Test()
My_Second_String = "The_Second_String"
Form2.hide
'Returns us to Form1, beyond: Form2.Show vbModal
'Preserve the string to take it to Form1
End Sub

--or--------------------------------------------------

'In Form1
Form2.Load
Form2.My_Second_String = "From Form1 to Form2"
Form2.Show
'in Form2
Public My_Second_String As String

Private Sub Test()
My_Second_String = "The_Second_String"
Form2.Hide
'returns us to Form1, beyond: Form2.Show vbModal
End Sub

(not tested!)

[pbrookee]

You could also do it this way....
In Form 1
Public Function ShowLogIn() As String
ShowLogIn = frmUser.txtUsername.Text
End Function

In Form 2
Private Sub Form_Load()
lblName = frmUser.ShowLogIn()
End Sub

......does anyone know how to get it to display in multiple forms??

Thanks!!

[PVBert]

try to get the explained methods
not just the solutions
all answers are given before
use global variables

[pbrookee]

got it!
thanks much!
Kudos!

[~Paul~]

I wouldn't use a function for simply a variable that is kind of a bad habit and useless.