|
||
|
*停權中*
加入日期: Jun 2020
文章: 4
|
VB.NET 2005 進度條顏色的問題
這個是在 VB6下面實現的
代碼:
'進度條顏色 Private Declare Function SendMessageLong Lib "user32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, _ ByVal wParam As Long, ByVal lParam As Long) As Long Private Const PBM_SETBARCOLOR As Long = &H409 Private Sub Form_Load() '進度條顏色設定 Call SendMessageLong(ProgressBar1(0).hWnd, PBM_SETBARCOLOR, 0&, ByVal 49152) '綠色 Call SendMessageLong(ProgressBar1(1).hWnd, PBM_SETBARCOLOR, 0&, ByVal 255) '紅色 Call SendMessageLong(ProgressBar1(2).hWnd, PBM_SETBARCOLOR, 0&, ByVal 16512) '茶色 Call SendMessageLong(ProgressBar1(3).hWnd, PBM_SETBARCOLOR, 0&, ByVal 33023) '橙黃色 Call SendMessageLong(ProgressBar1(4).hWnd, PBM_SETBARCOLOR, 0&, ByVal 16711680) '藍色 End Sub VB6 結果  但是把這個搬到 VB2005 變無效了 VB2005結果  VB.NET 要怎麼實現像 VB6 進度條可以自訂顏色  |
|||||||
2020-07-05, 06:30 AM
#1
|
|
|
Major Member
 加入日期: Dec 2001
文章: 244
|
https://stackoverflow.com/questions...c-sharp-net-3-5
如上，繼承ProgressBar後再覆寫OnPaint，話說現在很少人在用VB、VB.NET了，改用C#吧。 |
||
|
2020-07-06, 11:00 PM
#2
|
|
|
Basic Member
加入日期: Sep 2013
文章: 29
|
__________________
2022年 60歲老頭 哀號斷氣中 台灣不是國家 為什麼支拉夫這麼顧人怨 碰到鬼了Gmail被盜用 沒想到Linux在桌機編譯核心有夠吵 請問Intel HD4600的替代品 PayPal裡面的外幣是不是也會漲跌 卡巴斯基要怎麼無限試用 現在手機挖礦會賺錢嗎 咕狗VPS實在有夠貴 有人租過contabo的伺服器嗎 沒錢告人真丟臉 https://www.law110.com.tw/forum_content.aspx?pid=652154 呆丸廖添丁- 陣亡 https://www.youtube.com/channel/UCN...xR0gHbPnO60GJ2w 小猛虎俱樂部 伸手 http://djpvd.pixnet.net/blog/ HT的影音 喇叭 http://vlog.xuite.net/pvdhk 混血雜種 仆街 http://www.plurk.com/sunger67 機乖墓誌銘 想問個關於linux的問題 今天遇到號稱懂78種語言的程式高人 最近一代年輕人怎麼都伸手牌一大堆 成功賺大錢的那天究竟什麼時候 真是感嘆 恩人變仇人 而我將是那位儈子手 來看笑話吧 .. 我一生最大的遺憾 誹謗罪僅是陪個2000塊嗎 被訟棍族釣魚怎麼辦 Linux其實是很糟糕的OS PCDVD ** 問一個網路問題 |
|
2020-07-07, 02:56 PM
#3
|
|
|
Senior Member
加入日期: Apr 2005
文章: 1,208
|
|
|
2020-07-10, 04:58 PM
#4
|
|
|
*停權中*
加入日期: Jun 2020
文章: 4
|
引用:
考慮相容度問題 我是希望程式能跑 XP 以上的系統 所以盡量降低 IDE 版本  微軟的目前我只會用 VB 而已  用VB6 有個好處 如果系統沒裝 .NET 點下去直接可以用，VB.NET 編譯的都要 .NET 依賴 . 此文章於 2020-07-14 08:57 AM 被 皇民甲 編輯. |
|
|
2020-07-14, 08:50 AM
#5
|
|
|
Senior Member
加入日期: Apr 2005
文章: 1,208
|
看開發速度跟資源夠不夠
不然這兩種用哪個都行囉 |
|
2020-07-14, 09:43 AM
#6
|
|
