Question

我想拆分某个字符串并将它们存储在变量中。

  GetID = "13H4"
  sSplit = Split(GetID)

我想拆分它们并将“13”存储在变量中，将“4”存储在另一个变量中。

我不想使用MID，RIGHT，LEFT方法，因为我不想将字符串的位置设置为“13”或“4”。你们知道怎么做吗？

谢谢你们。

Answer 1

以下是一些向您展示如何做到这一点的可能性：

Dim var1 As String, _
    var2 As String, _
    sSplit() As String
  GetID = "13H4"

  sSplit = Split(GetID, "H")
  var1 = sSplit(0)
  var2 = sSplit(1)

'--- OR ---

  var1 = Split(GetID, "H")(0)
  var2 = Split(GetID, "H")(1)

如果您想直接输出数字而不是数字文本，这将是这样做的方法：

Dim var1 As Integer, _
    var2 As Integer, _
    sSplit() As String

  GetID = "13H4"
  sSplit = Split(GetID, "H")
  var1 = CInt(sSplit(0))
  var2 = CInt(sSplit(1))

如何拆分字符串并存储在变量中？

1 个答案: