Warning: file_get_contents(/data/phpspider/zhask/data//catemap/2/unit-testing/4.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
VB.NET删除文本框的第一行_Vb.net_Textbox - Fatal编程技术网

VB.NET删除文本框的第一行

VB.NET删除文本框的第一行,vb.net,textbox,Vb.net,Textbox,如何删除按键时文本框的第一行?尝试以下操作: Dim b As String() = Split(TextBox1.Text, vbNewLine) TextBox1.Text = String.Join(vbNewLine, b, 1, b.Length - 1) 请参阅以获取参考。相当简单: Private Sub bttnFirstLine_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles bt

如何删除按键时文本框的第一行?

尝试以下操作:

  Dim b As String() = Split(TextBox1.Text, vbNewLine)

  TextBox1.Text = String.Join(vbNewLine, b, 1, b.Length - 1)
请参阅以获取参考。

相当简单:

Private Sub bttnFirstLine_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles bttnFirstLine.Click
        txtBox.Text = txtBox.Text.Substring(txtBox.Text.IndexOf(vbCrLf))
end sub


嗨,谢谢,它成功了。我怎样才能使它同时按下删除按钮?因为它删除了它,但保留了该行,我希望它使该行也删除,以便它向上移动下一行。将其更改为
txtBox.Text=myString.Substring(myString.IndexOf(vbCrLf))+2
必须跳过LF和CR字符。@Hand-E-Food从字符串“joe”转换为键入“Double”无效。是我的代码Dim myString=collected.TextBox1.Text collected.TextBox1.Text=myString.Substring(myString.IndexOf(vbCrLf))+2Try
Dim myString As String=…
。始终声明变量的类型。@Hand-E-Food,只有在他没有使用选项inferon时才可以,他应该这样做
Private Sub bttnFirstLine_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles bttnFirstLine.Click
            dim myString = txtBox.text
            txtBox.Text = myString.Substring(myString.IndexOf(vbCrLf))
    end sub