VB6怎么才能把密码传进DLL里面

请教各位老师
1、用VB6做一个DLL，定义一个变量AAA，后面我要给AAA赋值）
2、用VB6做一个Form1，上面有Text1，两个Command1。
实现功能：
点击Command1，需要把Text1里面的值传给AAA，
点击Command2 然后调用DLL，就会弹出对话框显示出在Text1里面定义值

应该怎样编写代码呢
谢谢！