如何将16进制的字符串转换为16进制或者是long型？

Question

问题是这样的，要对button的背景颜色进行赋值
背景颜色呢以16进制的形式（cmdFinishColor=&H00FFFF00&）保存在初始化文件中，这样提取出来的值就是这样的"&H00FFFF00&",这种字符串是无法用cLng直接转换为long型的，该如何转换呢才能对button的背景颜色进行赋值？

Answer 1

Private Sub Command1_Click()
  Dim str As String
   str = "&H00FFFF00&"
   Debug.Print CLng(Left(str, Len(str) - 1))
End Sub