wshshell.SendKeys"浪花e朵" 这条语句正确吗?
发布网友
发布时间:2022-04-25 00:04
我来回答
共1个回答
热心网友
时间:2023-10-16 16:32
在我的测试中是出现乱码,若是要向目标输入汉字可使用这个方法:
将VB剪贴板设置上要传递的汉字,然后用【wshshell.SendKeys "^V"】 (即Ctrl+V粘贴)过去:
{{
'代码:
Private Sub Command1_Click()
Dim WshShell As Object
Set WshShell = CreateObject("WScript.Shell")
Clipboard.Clear '清空剪贴板
Clipboard.SetText "要传递的汉字" '向剪贴板输入
'要传递的汉字
WshShell.SendKeys "^v" '发送Ctrl+v粘贴
End Sub
}}