VB中的vbyesno怎么控制它转换链接

来源：百度知道 编辑：UC知道 时间：2024/05/23 17:43:19
在VB中 ,用msgbox 信息盒子,, 样式我用的VByesno
我想在当用户点"是"的时候,链接到我的网站,怎么写这个代码?
期待高手回复中,不胜感谢.....

Private Sub Command1_Click()
rs = MsgBox("12312", vbYesNo)
If rs = vbYes Then
Shell "explorer.exe http://hi.baidu.com/vbplusplus/",vbNormalFocus
End If
End Sub