以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]如何删除文本框里的某一行  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=161658)

--  作者:2425004926
--  发布时间:2021/3/25 15:51:00
--  [求助]如何删除文本框里的某一行
 如何删除文本框里的某一行,比如要删除第5行,代码怎么写?

With Forms("窗口1").Controls("txtMemo")
   
For i As Integer = 0 To .Lines.Length - 1
        Messagebox.Show(.Lines(i))
   
Next
End
With


--  作者:有点蓝
--  发布时间:2021/3/25 16:05:00
--  
Dim txt As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim lst As new List(of String)
lst.AddRange(txt.Lines)
lst.RemoveAt(4)
txt.text = String.Join(vbcrlf,lst.ToArray)

--  作者:2425004926
--  发布时间:2021/3/25 16:40:00
--  
 明白了,谢谢!