如何向Static类控件设置文本信息

Option Explicit


Public Declare Function SendMessage& Lib "user32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any)

Public Const WM_GETTEXT = &HD
Public Const WM_SETTEXT = &HC


dim hwnd as long 
dim s as string
s="test"
hwnd=...
SendMessage hwnd, WM_SETTEXT, 0, ByVal s