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

@Davidと@Brantの答えは正しいです。ただし、多くの連結を行っていることに気付いた場合は、クラスを作成して作業を簡単にすることができます。次のようなもの：txtPhoneNums.Add（ "Mobile："、strMobileNo）。1つを使用してSQLステートメントを作成します。

于 2012-05-21T16:33:14.857 に答える
2

VB6では、言うように文字列を&演算子と連結します。速記があったことを覚えていないので&=（しばらく経ちました）、次のものが必要になります。

txtPhoneNums = txtPhoneNums & "Mobile: " & strMobileNo

より良い方法があるとは思わないでください。

于 2012-05-21T16:03:18.553 に答える