1、我用VB6做一个DLL，只用一句话msgbox AAA（AAA是一个变量，后面我要给AAA赋值）
2、我用VB6做一个Form1，上面有Text1，一个Command1。

实现功能：
我一点击Command1，需要把Text1里面的值传给AAA，然后调用DLL，就会弹出对话框。


谢谢！

嗯……那个DLL里面应该是用函数完成这个调用的，注意函数编译时要export。
函数的定义应该是有一个参数AAA的。

在Form里声明这个函数即可。（类似API声明）

不是太懂，能不能说的详细一点。
有个代码之类的
谢谢了！

Function Add(ByVal AAA As String) As String
    MsgBox AAA
End Function
-----------------------------------------------------
这样子做？
还是就是我应该怎么调用？

一  那你的返回值呢？

二  调用方式就是 Call Add("123")

感谢版主啊
就是不清楚应该怎么弄啊，才问问的啊。
在哪里设置返回值？

Call Add("123")  '这句话的意思是给Add这个函数赋一个123的值吗？

如果我不需要返回值
那我这么做可以吗？

Sub Msg(ByVal AAA As String) As String
    MsgBox AAA
End Sub

对的。

注意调用的部分的语法：

Call Add("123")  ' add是函数或者子例程(sub)

iresponse=Add("123") ' add是函数，不是子例程。

感谢版主的支持，不过我现在刚刚接触这一块，还是不是很明白。
我把我做的步骤以及代码写出来，请斑竹指教，谢谢！
1、新建一个activex dll
2、代码如下
   Function Add(ByVal AAA As String) As String
       MsgBox AAA
   End Function
3、编译生成D:\vbtest\TestAdd.dll
4、新建一个标准 exe，一个按钮
5、代码如下
   Private Declare Function Add Lib "D:\vbtest\TestAdd.dll" (ByVal AAA As String) As String

   Private Sub Command1_Click()
       Add ("123")
   End Sub
6、点击Command1
出现下列情况：
实时错误'453'：
找不到DLL入口点 Add in D:\vbtest\TestAdd.dll
--------------------------------------------------
以上，请斑竹指教

怎么没有人理我了呢？