作用不大，需要找更强大的应用实例。 服务器端代码： Private Sub Command1_Click() SendMessage Text.hwnd, WM_copy, 0, 0 End Sub Private Sub Command2_Click() Unload Me End Sub 还有模块： Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As
码姐姐匿名网友2019-01-14 13:59:58
看起来还可以，
weixin_225832025-01-01 19:31:01
作用不大，需要找更强大的应用实例。
服务器端代码：
Private Sub Command1_Click()
SendMessage Text.hwnd, WM_copy, 0, 0
End Sub
Private Sub Command2_Click()
Unload Me
End Sub
还有模块：
Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As
作用不大，需要找更强大的应用实例。 服务器端代码： Private Sub Command1_Click() SendMessage Text.hwnd, WM_copy, 0, 0 End Sub Private Sub Command2_Click() Unload Me End Sub 还有模块： Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As
看起来还可以，
作用不大，需要找更强大的应用实例。 服务器端代码： Private Sub Command1_Click() SendMessage Text.hwnd, WM_copy, 0, 0 End Sub Private Sub Command2_Click() Unload Me End Sub 还有模块： Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As