我想利用它。你認為有可能嗎？也就是說，不必撰寫數百次此代碼。
Dim pieces() As String = Textbox1.Text.Split(ControlChars.CrLf.ToCharArray(), StringSplitOptions.RemoveEmptyEntries)
Dim str As String = ""
For Each piece As String In pieces
str &= String.Join(",", piece.ToCharArray().ToList()) & ControlChars.CrLf
Next
Textbox2.Text = str
uj5u.com熱心網友回復：
要創建一個，Function您需要一個回傳型別，在本例中為String一個Return陳述句。
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim str = AddCommas(TextBox1.Text)
TextBox2.Text = str
End Sub
Private Function AddCommas(inputString As String) As String
Dim pieces() As String = inputString.Split(ControlChars.CrLf.ToCharArray(), StringSplitOptions.RemoveEmptyEntries)
Dim str As String = ""
For Each piece As String In pieces
str &= String.Join(",", piece.ToCharArray().ToList()) & ControlChars.CrLf
Next
Return str
End Function
轉載請註明出處，本文鏈接：https://www.uj5u.com/net/362712.html
標籤：网络