VB6 Code - Konversi Warna dari RGB Ke Long

Di bawah ini merupakan fungsi untuk meng-konversi warna dari rgb (red, green, blue) ke Long. Bagaimana implementasinya dalam Visual Basic 6.0? simak kodenya di bawah ini:

Public Function RGBToLong(Red As Integer, Green As Integer, Blue As Integer) 
    RGBToLong = RGB(Red, Green, Blue) 
End Function 

Contoh penggunaan fungsi konversi warna dari RGB ke Long

Private Sub Command1_Click() 
    MsgBox RGB(8, 12, 254) 
End Sub