Vb.net 如何使用vb脚本浏览和打开“窗口上的文件”对话框

对于其中一个需求，我需要单击UI上的浏览按钮，这将打开标题为“选择要上载的文件”的窗口对话框。我需要在“文件名”的输入框中输入文件名，然后单击此窗口对话框上的“打开”按钮。 我尝试使用代码激活此窗口并使用shell脚本发送密钥，但它不起作用。有人能帮忙解决这个问题吗

Do
bResult=objWshShell.AppActivate（“选择要上载的文件”）
如果bResult=True，则
oShell.SendKeys“%n”
oShell.SendKeys“C:\text.xls”
oShell.SendKeys“{ENTER}”
退出Do
如果结束
WScript.Sleep 500
循环

请编辑更多信息。不鼓励只编写代码和“试试这个”答案，因为它们不包含可搜索的内容，也不解释为什么有人应该“试试这个”。

Do 
  bResult = objWshShell.AppActivate("Choose File to Upload")
  If bResult = True Then 
    oShell.SendKeys "C:\text.xls"
    oShell.SendKeys "{ENTER}"
    Exit Do 
  End If 
  WScript.Sleep 500 
Loop