在vb中用哪个控件做到像delphi那样有超连接文字的菜单。谢谢

解决方案 »

  1.   

    这个简单的很:
    =================================Private Sub Label1_Click()
        Shell "C:\Program Files\Internet Explorer\IEXPLORE.EXE " & "http://www.csdn.net", vbMaximizedFocus
    End SubPrivate Sub Label1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
        Label1.ForeColor = vbRed
        Label1.Font.Underline = True
    End SubPrivate Sub Label1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
        Label1.ForeColor = vbBlue
        Label1.Font.Underline = False
    End Sub