vb.net 2005 如何修改listbox滾動條的顏色

不行啊，除非重寫OPaint()方法，不過這個比較復(fù)雜，所有的繪圖過程都必須自己寫，工作量比較大，你 還是找一下有沒有現(xiàn)成的Com控件或者.net組件吧

我們提供的服務(wù)有：成都網(wǎng)站建設(shè)、網(wǎng)站設(shè)計、微信公眾號開發(fā)、網(wǎng)站優(yōu)化、網(wǎng)站認(rèn)證、彌渡ssl等。為上1000家企事業(yè)單位解決了網(wǎng)站和推廣的問題。提供周到的售前咨詢和貼心的售后服務(wù)，是有科學(xué)管理、有技術(shù)的彌渡網(wǎng)站制作公司

VB.net如何更改窗體標(biāo)題欄顏色？

這東西改不了，要想改的話要在系統(tǒng)顯示設(shè)置里修改主題。

不過如果想做的漂亮些，可以去網(wǎng)上找代碼把整個窗體改成藍(lán)色（隨便一種顏色）然后用代碼把窗體藍(lán)色部分扣去，可以PS一個窗體圖片，插到窗體上，這樣這個窗體藍(lán)色部分都被扣去了（圖片里的藍(lán)色無法扣去）只能看見一張圖片，可以在上面加控件。

vb.net拾色器設(shè)計，要求：能獲取圖片任意位置的顏色

VB可使用Point方法來獲取圖片指定點(diǎn)的顏色。

Point 方法

按照長整數(shù)，返回在 Form 或 PictureBox 上所指定磅的紅-綠-藍(lán) (RGB) 顏色。

語法

object.Point(x, y)

'窗體判色代碼:

Private Sub Form1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

Text1 = X

Text2 = Y

Text3 = Point(X, Y)

Text4 = (Val(Text3) Mod 65536) Mod 256 'Red

Text5 = (Val(Text3) Mod 65536) \ 256 'Green

Text6 = Val(Text3) \ 65536 'Blue

Shape1.FillColor = RGB(Val(Text4), Val(Text5), Val(Text6))

End Sub

'PictureBox判色代碼:

Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

Text1 = X

Text2 = Y

Text3 = Picture1.Point(X, Y)

Text4 = (Val(Text3) Mod 65536) Mod 256 'Red

Text5 = (Val(Text3) Mod 65536) \ 256 'Green

Text6 = Val(Text3) \ 65536 'Blue

Shape1.FillColor = RGB(Val(Text4), Val(Text5), Val(Text6))

End Sub

VB.NET：繪圖后，如何才能取得所繪圖形的顏色值？

加入一個TextBox控件,一個Command控件

代碼:

Private Declare Function GetPixel Lib "gdi32" (ByVal hDC As Long, ByVal X As Long, ByVal Y As Long) As Long

Private Declare Function GetWindowDC Lib "user32" (ByVal hWnd As Long) As Long

Private Sub Command1_Click()

Dim Color As Long

WindowDC = GetWindowDC(0) '獲取屏幕的設(shè)備場景

Color = GetPixel(WindowDC, 500, 100) '獲指定點(diǎn)的顏色

'分解RGB顏色值

R = (Color Mod 256) '紅色

b = (Int(Color \ 65536)) '藍(lán)色

G = ((Color - (b * 65536) - R) \ 256) '綠色

Text1.BackColor = RGB(R, G, b)

End Sub