Question

tencent://Message/?Uin=381579100&websiteName=q-zone.qq.com&Menu=yes"><img

那个QQ临时会话的 怎么要加好友的才能会话？？ 如果这样还不如直接加 但是有些是拒绝加的呢》？怎么弄？？

Answer 1

没分啊！！
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long '引用
Private Sub Command1_Click()
Text1.Text = "666666"
qq = "tencent://message/?uin=" & Text1.Text
ShellExecute Me.hWnd, "open", qq, vbNullString, vbNullString, SW_SHOWNORMAL
End Sub

Answer 2

请问贵司有招特种车工吗？谢

Answer 3

哈喽