I just wrote a activeX dll
one class module is called IMesagePassing, the code:
Option Explicit
Public Sub MessageSend(ByVal vText As String)
End Sub
the other is called CSending, the code:
Option Explicit
Implements IMessagePassing
Private Sub IMessagePassing_MessageSend(ByVal vText As String)
SendKeys vText
End Sub
Public Sub MSending(ByVal vText As String)
SendKeys "Hello"
SendKeys vText
End Sub
the client's code, which calls the dll
Dim Message As String
Private Sub Timer1_Timer()
Message = "hey"
Dim Sending1 As CSending
Set Sending1 = New CSending
Sending1.MSending Message
Set Sending1 = Nothing
End Sub
the problem is i only can get "hello" not "hey", but really want "hey" instead of "hello". could some experts help out of this? any help will be highly appreciated.
wenyu
