wshshell.SendKeys"浪花e朵" 这条语句正确吗?

来源:百度知道 编辑:UC知道 时间:2024/06/22 16:06:28

在我的测试中是出现乱码,若是要向目标输入汉字可使用这个方法:
将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

}}