2

我正在尝试在 vb6 中连接。不支持运算符 += ，我想做类似下面的代码。当程序处理此代码时，我想向文本框添加更多字符串。谁能建议将 += 更改为？我知道 & 可以在将一个字符串添加到另一个字符串时使用，但它是我在这里工作的示例，这似乎不合适。

谢谢。

    If (strHomeNo <> "") Then
        txtPhoneNums = "Home: " + strHomeNo
    End If
    If (strMobileNo <> "") Then
        txtPhoneNums += "Mobile: " + strMobileNo
    End If
    If (strWorkNo <> "") Then
        txtPhoneNums += "Work: " + strWorkNo
    End If
    If (txtPhoneNums <> "") Then
        txtPhoneNums.ForeColor = vbBlack
        txtPhoneNums.FontBold = False
    End If
Else
     txtPhoneNums.Text = "NO CONTACT DETAILS"
     txtPhoneNums.ForeColor = vbRed
     txtPhoneNums.FontBold = True
4

4 回答 4

7

将 ：

txtPhoneNums = txtPhoneNums & "Work: " & strWorkNo

不行？

于 2012-05-21T16:03:27.337 回答
2

在 VB6 中，您可以将字符串与&您所说的运算符连接起来。我不记得有速记&=（已经有一段时间了），所以你需要：

txtPhoneNums = txtPhoneNums & "Mobile: " & strMobileNo

不要认为有更好的方法。

于 2012-05-21T16:03:18.553 回答
2

@David 和 @Brant 的答案是正确的。然而，如果你发现自己做了很多连接，那么你可以建立一个类来让事情变得更容易。类似于：txtPhoneNums.Add("Mobile:", strMobileNo)。我使用一个来构建我的 SQL 语句。

于 2012-05-21T16:33:14.857 回答
0

VB6 用于&连接字符串

于 2020-05-19T13:37:23.440 回答