主题：这个代码怎么写最好?

Dim a As String = "HC00101-2003001"
output.show(a.split("-")(1) .SubString(4))

或

output.show(right(a,3))