虚心求教一个关于调用API数据类型的问题

Const COLOR_ACTIVECAPTION = 2
Const COLOR_INACTIVECAPTION = 3
Const COLOR_CAPTIONTEXT = 9
Const COLOR_INACTIVECAPTIONTEXT = 19
Dim SysColor(3) As Long
Dim ColorValues(3) As Long
Dim Ret& SysColor(0) = COLOR_ACTIVECAPTION
SysColor(1) = COLOR_INACTIVECAPTION
SysColor(2) = COLOR_CAPTIONTEXT
SysColor(3) = COLOR_INACTIVECAPTIONTEXT
ColorValues(0) = RGB(58, 158, 58) '深绿
ColorValues(1) = RGB(93, 193, 93) '浅绿
ColorValues(2) = 0 '黑色
ColorValues(3) = RGB(126, 126, 126) '灰色
Ret& = SetSysColors(4&, SysColor(0), ColorValues(0))这里Ret&是什么，我只知道变量名后面加个&表示说明该变量是Long型。
但为什么在第7行用了Dim Ret& SysColor(0)=COLOR_ACTIVECAPTION?
而不是
Dim Ret As Variant
SysColor(0)=COLOR_ACTIVECAPTION请各位大虾指点小弟迷津，谢谢。