2011-08-02 35 views

答えて

5

これを試してみてください:

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

    TextBox1.Text = String.Join(vbNewLine, b, 1, b.Length - 1) 

は、参考のためにString.Joinを参照してください。

+0

エレガントなソリューション、CodeBuzz! –

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 

または

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 
+0

こんにちはありがとうございました。どうすれば削除ボタンを押すこともできますか?それを削除しますが、そこに行を残してしまいます。行を削除して次の行に移動させたいのですが –

+0

'txtBox.Text = myString.Substring(myString.IndexOf(vbCrLf))+ 2'に変更します。 LFとCR文字をスキップします。 –

+0

@ Hand-E-Food文字列 "joe"から "Double"への変換は無効です。 は+ 2 –

関連する問題