0

チェックボックスがクリックされたときにテキストボックスに行を追加しています。チェックボックスがクリックされておらず、アイテムを削除したい場合はどうすればよいですか:

Private Sub cbAddress_SelectedValueChanged(sender As Object, e As System.EventArgs) Handles cbAddress.SelectedValueChanged
if cbAddress.checked = true then
    dim thetext as string = txtTextbox.text
    dim theItem as string = "test"
    txtTextbox.text = thetext & Environment.NewLine & theItem
else
    ' i'm try to delete the line.
   ' I've tried to txtTextbox.text.Remove(blah, blah)
end if

テキストボックスに追加された行を追跡して、チェックを外したときに削除する必要がありますか、それともより良い方法がありますか?

4

2 に答える 2

0

String.Replaceメソッドを使用できます。

Private Sub cbAddress_SelectedValueChanged(sender As Object, e As System.EventArgs) Handles cbAddress.CheckedChanged
    Dim theItem As String = "test"
    If cbAddress.Checked = True Then
        Dim thetext As String = txtTextbox.Text
        txtTextbox.Text = thetext & Environment.NewLine & theItem
    Else
        txtTextbox.Text = txtTextbox.Text.Replace(Environment.NewLine & theItem, "")
    End If
End Sub
于 2013-08-26T23:35:19.183 に答える
0

を交換してくださいEnvironment.NewLine

txtTextbox.Text = txtTextbox.Text.Replace(System.Environment.NewLine, "")
于 2013-08-26T20:47:38.440 に答える