怎么可以在字上加上超级连接（像网站 E-mail QQ）可能我现在几天的问题太多了吧，如果有时间的朋友可以抽一点时间回答一下~！谢谢 各位

就是因为你的标题是 "请问~！" 所以大家都对你挺有好感的啊.呵呵,怎么没人回你呢？ 我给你捧个场吧.你先加一个Label1控件,Caption 是 "在线与我联系" (你要先登录QQ)private sub label1_click() dim aa as string aa$ = "http://wpa.qq.com/msgrd?V=1&Uin=138449666" Call ShellExecute(hWnd, "Open", aa$, "", App.Path, 1)end sub试看看能不能找上我, 以后你就把 138..改成你自己的QQ号别人就可找上你啦.

sorry 忘了这行, 把它加在最上面吧.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

呵呵 谢谢了cbm666 我一直在线等老长时间了 ∧_∧