求解VBS的split

a1=inputbox("")
a2=split(a1, ".")
msgbox a2(0)&":"&a2(1)&":"&a2(2)&":"&a2(3)&":"&a2(4)&a2(5)&a2(6)&a2(7)&a2(8)&a2(9)

请给我把“下标越界”处理了，我不可能每次都输入10种数据给a2分割的

变量不要给我更改了

答非所问的，请勿占沙发，我要的是答案

a1=inputbox("")
a2=split(a1, ".",-1,1)
For Each a3 In a2
t=t & a3 & "."
Next
MsgBox t

dim i as integer,str2 as string

a1=inputbox("")
a2=split(a1, ".")

for i=0 to ubound(a2)

    str2=str2 & ":" & a(i)

next i
msgbox str2