廣告廣告
  加入我的最愛 設為首頁 風格修改
首頁 首尾
 手機版   訂閱   地圖  簡體 
您是第 4585 個閱讀者
 
發表文章 發表投票 回覆文章
  可列印版   加為IE收藏   收藏主題   上一主題 | 下一主題   
kennyin 手機
數位造型
個人文章 個人相簿 個人日記 個人地圖
小有名氣
級別: 小有名氣 該用戶目前不上站
推文 x16 鮮花 x173
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片
推文 x0
[Basic] [問題]請問VB有辦法做出圖片的超連結嗎?
最近設計了一個小遊戲,
但是想把LOGO圖片的來源連結到網址 ..

訪客只能看到部份內容,免費 加入會員 或由臉書 Google 可以看到全部內容



小人的定義:小鼻子小眼睛加上肚腸窄及挾怨報復的人
生活新目標:下詛咒砍小白遠小人開始潛水

那些有所為的人看著了,我會懷念有警告的日子的
獻花 x0 回到頂端 [樓 主] From:台灣數位聯合 | Posted:2005-06-29 04:49 |
ziele 手機
個人文章 個人相簿 個人日記 個人地圖
初露鋒芒
級別: 初露鋒芒 該用戶目前不上站
推文 x1 鮮花 x32
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片

這是個文字的超連結 給你參考一下,圖片作法相同
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 LblLink_Click()
  ShellExecute hWnd, "open", "http://bbs.mychat.to/index.php", vbNullString, vbNullString, conSwNormal
End Sub
Private Sub LblLink_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
  LblLink.FontBold = True
  LblLink.FontUnderline = True
  LblLink.ForeColor = vbBlue
  Me.MousePointer = 99
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
  LblLink.FontBold = False
  LblLink.FontUnderline = False
  LblLink.ForeColor = vbBlack
  Me.MousePointer = 0
End Sub

此文章被評分,最近評分記錄
財富:30 (by codeboy) | 理由: 感謝您的提供方法~


獻花 x0 回到頂端 [1 樓] From:台灣中華電信 | Posted:2005-06-29 13:48 |
ffrr
數位造型
個人文章 個人相簿 個人日記 個人地圖
路人甲
級別: 路人甲 該用戶目前不上站
推文 x0 鮮花 x1
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片

哦 謝謝大大 這個原始碼 我正好也需要呢 感謝唷 表情


獻花 x0 回到頂端 [2 樓] From:局域網對方和您在同一內部網 | Posted:2006-03-01 15:50 |

首頁  發表文章 發表投票 回覆文章
Powered by PHPWind v1.3.6
Copyright © 2003-04 PHPWind
Processed in 0.099855 second(s),query:16 Gzip disabled
本站由 瀛睿律師事務所 擔任常年法律顧問 | 免責聲明 | 本網站已依台灣網站內容分級規定處理 | 連絡我們 | 訪客留言