一、colorkey鏡面唇釉介紹？

colorkey鏡面唇釉是colorkey唇釉系列中非?；鸬囊豢?，上嘴效果也是非常好，主打就是晶瑩透徹，水光靈動。目前有14個色號，可以滿足大部分女生的要求，其中最受歡迎的色號就是，P701，非常好看的山楂色，非常顯白，涂上之后非常的有時髦感。

二、VB窗口自定義外形

'從指定窗口的結(jié)構(gòu)中取得信息

Private Declare Function GetWindowLong Lib user32 _

Alias GetWindowLongA (ByVal hwnd As Long, _

ByVal nIndex As Long) As Long

'在窗口結(jié)構(gòu)中為指定的窗口設(shè)置信息

Private Declare Function SetWindowLong Lib user32 _

Alias SetWindowLongA (ByVal hwnd As Long, _

ByVal nIndex As Long, _

ByVal dwNewLong As Long) As Long

Private Declare Function SetLayeredWindowAttributes Lib user32 _

(ByVal hwnd As Long, _

ByVal crKey As Long, _

ByVal bAlpha As Byte, _

ByVal dwFlags As Long) As Long

'其中 _

hwnd是透明窗體的句柄， _

crKey為顏色值， _

bAlpha是透明度，取值范圍是[0,255]， _

dwFlags是透明方式，可以取兩個值： _

當(dāng)取值為LWA_ALPHA時，crKey參數(shù)無效，bAlpha參數(shù)有效； _

當(dāng)取值為LWA_COLORKEY時，bAlpha參數(shù)有效而窗體中的所有顏色為crKey的地方將變?yōu)橥该?_

－－這個功能很有用：我們不必再為建立不規(guī)則形狀的窗體而調(diào)用一大堆區(qū)域分析、創(chuàng)建、合并函數(shù)了， _

只需指定透明處的顏色值即可，哈哈哈哈！請看具體代碼。

Private Const WS_EX_LAYERED = &H80000

Private Const GWL_EXSTYLE = (-20)

Private Const LWA_ALPHA = &H2

Private Const LWA_COLORKEY = &H1

Private Sub Form_Load()

Dim rtn As Long

rtn = GetWindowLong(Me.hwnd, GWL_EXSTYLE)

rtn = rtn Or WS_EX_LAYERED

SetWindowLong Me.hwnd, GWL_EXSTYLE, rtn

SetLayeredWindowAttributes Me.hwnd, RGB(255, 0, 255), 220, LWA_ALPHA Or LWA_COLORKEY

End Sub

三、圣羅蘭鏡面唇釉202適不適合素顏

我用的ysl唇釉確實不沾杯啊

四、Mr.得到什么 這感情就算再激烈 叫什么名

唔系Mr. 葛，系 kolor 葛 明信片！