蓝泻湖酒图片:VB高手进啊~！

我想编写一个保密程序，过程是：打开这个程序，弹出FORM1，要求输入要加密的文件的路径，接着弹出FORM2，要求你输入你的密码，然后退出。
以后一打开这个文件就弹出FORM3，要求输入密码，密码正确就能打开该文件。
以下是我编的程序代码：（我是初学者，有什么不好的地方不要见怪```希望能一一指出，谢谢）
FORM1的程序代码：
Private Sub Command1_Click()
Form1.Hide
Form2.Show
End Sub

Private Sub Command2_Click()
End
End Sub

Private Sub Form_Load()
Static FileName As String
Label.Caption = "请输入你要保密的文件的路径："
Text1.Text = ""
Command1.Caption = "确定"
Command2.Caption = "取消"
FileName = Text1.Text
End Sub

FORM2的程序代码：
Private Sub Command2_Click()
End
End Sub

Private Sub Form_Load()
Label1.Caption = "请输入你设置的密码："
Text.Text = ""
Command1.Caption = "确定"
Command2.Caption = "取消"
PassWord = Text1.Text
End Sub

Private Sub Command1_Click()
MsgBox "设置密码成功！", vbOKCancel, "提示"
End Sub

FORM3的程序代码暂时没有编出来，希望高手指点指点。
希望个位高手我的程序的各种错误指出，谢谢了！我会追加分的。
还有，我需要指出的是，静态变量（例如变量FileName,PassWord）是在这个程序中如何使用？希望高手指点