QTP中如何实现键盘输入"Crtl+F"

Public function new_Page_Docfind(new_page_doc)
   Dim Oshell
   Set shell=createobject("WSCript.shell")  '创建一个wscript.shell对象.    
   Oshell.sendkeys "^F"           
   Set shell=nothing
End Function

如果想输入M 可以使用"{M}"