VB 编写CALL的问题

这是代码 
Sub Call_Text()
Dim asm As New clsASM  '这个已近定义
With asm                             '  asm
     .Pushad                         '  pushad
     .Mov_EAX &H5A1F70               '  Mov EAX,&H5A2170
     .Call_EAX                       '  call pointer(eax)
     .Popad                          '  popad
     .Ret
End With                             '  end
asm.Run_ASM pid
End Sub 
我想用CALL做一个简单的东西 就是用VB编写一个单击按钮,程序就显示一行字
除了以上的那段代码,还需要哪些?(我已经有模块了,还要DLL吗?)
请尽量详细 谢谢