VB中一个按钮怎么调用标签中的数

来源：百度知道 编辑：UC知道 时间：2024/05/21 23:47:24
我要设置一个查看QQ好用是否在线的东西，用一个命令按钮和一个标签，运行时在标签输入QQ号码，然后点击按钮就可以查看，如：“http://wpa.qq.com/pa?p=1:xxxxx:14”这个网址，我要把在标签输入的QQ号码调用到“xxxxx”，因为“xxxxx”变为QQ号码就可以看对方是否在线

标签要换成 textbox 不然没法输入 再在窗体上画个 Command1的命令按钮 代码如下：

Option Explicit
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()
ShellExecute 0, "Open", "http://wpa.qq.com/pa?p=1:" & Text1.Text & ":14", "", "", vbNormalFocus

End Sub

倒..直接拼起来就是了撒.使用 +