Tutorial For Sub Form
First Set New Project then you need 2 Form
In Form1 and Form2 you need Two TextBox and 5 Command Button
In Form1 Paste this Sample Code
Form1
- Code:
-
Option Explicit
Private Sub Command1_Click()
Form2.Text1 = Text1.Text
End Sub
Private Sub Command2_Click()
Form2.Text2 = Text1.Text
End Sub
Private Sub Command3_Click()
Form2.Show
End Sub
Private Sub Command4_Click()
Form2.Text1 = ""
End Sub
Private Sub Command5_Click()
Form2.Text2 = ""
End Sub
In Form2 Paste This Sample Code
Form2
- Code:
-
Option Explicit
Private Sub Command1_Click()
Form1.Text1 = Text1.Text
End Sub
Private Sub Command2_Click()
Form1.Text2 = Text2.Text
End Sub
Private Sub Command3_Click()
Me.Hide
End Sub
Private Sub Command4_Click()
Form1.Text1 = ""
End Sub
Private Sub Command5_Click()
Form1.Text1 = ""
End Sub