请VB真正的高手 回答一下 VB如何用mstsc.exe实现远程登陆 自动输入账号密码

VB如何用mstsc.exe实现远程登陆 自动输入账号密码
Dim wsShell As Object
Dim bldx As String
bldx = App.Path & "\mstsc.exe"
Set wsShell = CreateObject("WScript.Shell")
wsShell.exec ("" + bldx + " /v:192.168.18.28:3389 /admin /w:1024 /h:768 /edit:Default.rdp")
在跳出登陆界面以后  自动输入账号密码的方法 --------------------编程问答-------------------- 没有人回答吗   还请回答一下 谢谢  --------------------编程问答-------------------- lai ren a   --------------------编程问答-------------------- 顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶

补充：VB ,  API