Win = 91
Set oIE
With
.Navigate
.ToolBar
.MenuBar
.Width
.Height
.Left /2
.Top = (.Document.ParentWindow.Screen.AvailHeight - .Height)/
.Visible
End
oIE.Document.Write
"<html><body onKeyDown='alert(event.keyCode)'>" & _
"按下任意键...</body></html>"
oIE.Document.Write
For
oIE.Document.Write
If
Next
oIE.Document.Write
WScript.Quit
运行后按下任意键就能看到结果了。