Scambio Parametri tra vari Form

'nella sezione dichiarazioni del Form1:

Private strUser As String
Private strPassword As string
'Property per la password

Public Property Get Password() As String
Password=strPassword
End Property

Public Property Let Password(ByVal vNewValue As String)
strPassword=vNewValue
End Property

Public Property Get User() As String
User=strUser
End Property

Public Property Let User(ByVal vNewValue As String)
strUser=vNewValue
End Property

'Aggiungere poi un CommandButton sul Form1

'e inserire questo codice:

Private Sub Command1_Click()
'Visualizzo il form per l'inserimento dello user

'e della password

Form2.Show vbModal
Msgbox "User: " & me.user & " - Password: " & me.password
End Sub

'A questo punto, ammettendo che il Form2 (quello della

'password) abbia due TextBox (txtUser e txtPassword) ed

'un CommandButton, inserire questo codice nel Form2:

Private Sub Command1_Click()
'Passo i valori al form chiamante:

Form2.User=txtUser.text
Form2.Password=txtPassword.text
End Sub

'Questo, e' il sistema piu' pulito per passare

'variabili tra form.

Per passare valori da un form ad un altro, si possono
utilizzare sia le property, sia le viariabili globali
(dichiare Public in un modulo Bas).