
passing "type" variables HELP plz
There are several ways to handle the situation but the simplest would be to
pass it to a procedure on form2 which then calls the load event.
Form1
============================
Dim user As uservar
_________________________
Sub form_load()
user.first = "Mike"
Text1.Text = user.first
Form2.ShowForm(user)
End Sub
form2
=======================
Dim user As uservar
________________________
Sub form_load()
Text1.Text = user.first
End Sub
Sub ShowForm(ByVal svUser as uservar)
user = svUser
Me.Show
End sub
_____________________________________________________________________
Endless Knot Enterprises
Custom Computer Solution Developers
http://www.*-*-*.com/ ~endlessknot
_____________________________________________________________________
Quote:
> Below is 3 parts of prgm.
> Problem is i cant figure out
> how to pass "user.first"
> variable from form to form.
> type.bas
> -------------------
> Type uservar
> first As String * 5
> End Type
> -------------------
> form1
> -------------------
> Dim user As uservar
> _________________________
> Sub form_load()
> user.first = "Mike"
> Text1.Text = user.first
> Form2.Show
> End Sub
> -------------------
> form2
> -------------------
> Dim user As uservar
> ________________________
> Sub form_load()
> Text1.Text = user.first
> End Sub