请高手进来 帮我改一改程序

Question

For i = 0 To 9
  k = t ^ a
  k = Hex(k)
  Select Case Len(k)
    Case 1
    k = "0" & k
   
    Case 2
       If Not IsNumeric(Left(k, 1)) Then
       k = "0" & k
       
       End If
    Case 3
      
       g = Right(k, 2)
       v = Left(k, 1)
         If Not IsNumeric(Left(g, 1)) Then
         k = "0" & g
         
         Else
         k = g
         End If
         k = "0" & v
  End Select
在我判断k的长度的时候  ＝1，2都可以  为什么等于3的时候就不对了呢  请帮我改改
如：100或1A0   变成01，00或01，0A0