主题：[求助]用什么函数能提取[]中的字符？

dim base as String = "[3][2]"

dim newStr As String

newStr =SubString(base,CharIndex("]",base)+2,Len(base)-1-CharIndex("]",base)-1)

output.show(newStr)

需求：取出[2]中的2。

如何写以上意思的代码？