Question

我想将一个字符串分成三部分。我正在使用以下代码。

dat <- data_frame(id=1:4, a.x = c(1, NA, 3, 4), a.y = c(1, 2, 3, 4), b.x = c(NA, NA, 3, NA), b.y = c(2, 2, NA, 4))

msgbox 2显示我的长度为11,30。为什么呢？

我尝试过：

我的代码有什么问题？我知道Mid $从字符串的左边开始。

Answer 1

我假设你想要每个字符串长10个字符？您的问题似乎是您不断将字符串的长度更改为10。

编辑：由于OP在他的评论中提供了更多信息，我更新了代码以适应请求。

Sub Test()

    Dim length1 As String
    Dim length2 As String
    Dim length3 As String
    Dim divTot As Integer, leftOver As Integer

    divTot = Len(text1.Text) / 3
    leftOver = Len(text1.Text) - (divTot * 2)

    length1 = Mid$(text1.Text, 1, divTot)
    length2 = Mid$(text1.Text, divTot + 1, divTot)
    length3 = Mid$(Text1.Text, (divTot * 2) + 1, leftOver)

    MsgBox length1
    MsgBox length2
    MsgBox length3

End Sub

如何将字符串分为三部分？

1 个答案: