潍坊市寿光市天气60天:怎样在VB中设置数字的显示位数?

怎样将位数设置成显示为6位?

比如这个软件中
(MOFILE连接 http://pickup.mofile.com/1421390232939484)
我的颜色代码希望他永远是6位,怎样写?
当前代码,请帮忙修改:

Private Sub Form_Load()
Label2.Caption = HScroll1.Value
Label3.Caption = HScroll2.Value
Label4.Caption = HScroll3.Value
Label5.BackColor = RGB(0, 0, 0)
Label7.Caption = Hex(Label5.BackColor)
End Sub

Private Sub HScroll1_Change()
Label5.BackColor = RGB(HScroll1.Value, HScroll2.Value, HScroll3.Value)
Label2.Caption = HScroll1.Value
Label3.Caption = HScroll2.Value
Label4.Caption = HScroll3.Value
Label7.Caption = Hex(Label5.BackColor)
End Sub

Private Sub HScroll2_Change()
Label5.BackColor = RGB(HScroll1.Value, HScroll2.Value, HScroll3.Value)
Label2.Caption = HScroll1.Value
Label3.Caption = HScroll2.Value
Label4.Caption = HScroll3.Value
Label7.Caption = Hex(Label5.BackColor)
End Sub

Private Sub HScroll3_Change()
Label5.BackColor = RGB(HScroll1.Value, HScroll2.Value, HScroll3.Value)
Label2.Caption = HScroll1.Value
Label3.Caption = HScroll2.Value
Label4.Caption = HScroll3.Value
Label7.Caption = Hex(Label5.BackColor)
End Sub

大家来帮忙啊!

现在这样改,可是不太正确~
http://pickup.mofile.com/0350328311438294
上面这个连接是工程文件~大家打开看看就好了~
FORMAT? 不太明白 能不能说清楚点? 我是刚学的~