[RESOLVED] Convert Letter To vbKey Equivalent ("a" > vbKeyA)

[shirazamod]

I am using PostMessage API to send text to a certain program.
I've got my program to work when I use

PostMessage hWnd1, WM_KEYDOWN, vbKeyA, 0

But I need to send a string that will be defined at runtime, so I need a way to do something like

PostMessage hWnd1, WM_KEYDOWN, "something", 0

but that code doesn't work.
I need to send a long value of each letter so I need to know how to convert a letter to its vbKey equivalent

[bushmobile]

Why not use WM_SETTEXT

[shirazamod]

I tried using WM_SETTEXT earlier when I was still using SendMessage API but it just set the title of the program.
I'll try it out now with PostMessage
EDIT:
I got a 'Type Mismatch' error.
What is the syntax for using WM_SETTEXT?
I was using

PostMessage hWnd1, WM_SETTEXT, "a", 0

But it doesn't even work with

PostMessage hWnd1, WM_SETTEXT, vbKeyA, 0

[bushmobile]

Well if you want do it with WM_KEYDOWN then the keycodes are the same as the Ascii values, but it'll all be in the same case:

Dim sText As String, N As Long
 
sText = "something"
 
For N = 1 to Len(sText)
    PostMessage hWnd1, WM_KEYDOWN, Asc(Mid$(sText, N, 1)), 0
    PostMessage hWnd1, WM_KEYUP, Asc(Mid$(sText, N, 1)), 0
Next N

Perhaps try WM_CHAR

[Shuja Ali]

When using WM_SETTEXT you should be using it this way

PostMessage hwnd1, WM_SETTEXT, 0&, "Text that needs to be sent"

[bushmobile]

you'd use WM_SETTEXT by sending the text to the edit box that you want to recieve the text

PostMessage lHwndEdit, WM_SETTEXT, 0&, ByVal "TEST"

[shirazamod]

Thanks bushmobile, that sorted it out!