自動書式設定のテキストボックス

Question

複数のテキストをテキストボックスに追加しようとしています。複数のテキストがあります.DGVWの全行のセル（12）の値がテキストボックスに含まれます。

Private Sub Button6_Click_1(sender As Object, e As EventArgs) Handles Button6.Click 
    For Each row In Selected.dg2.Rows 
     SendMail.totxt.Text &= row.Cells(12).Value 
     SendMail.Show() 
    Next 

今、セル12にはEMAILSが含まれています。私のアプリケーションもEMAILアプリケーションです。私が望むのは、テキストボックスに、すべての電子メールアドレス/すべての行のセル値の後にコンマ（、）が自動的に追加されるということです。どんな解決策ですか？

Answer 1

Private Sub Button6_Click_1(sender As Object, e As EventArgs) Handles Button6.Click 
For Each row In Selected.dg2.Rows 
      SendMail.totxt.Text &= row.Cells(12).Value 
      SendMail.totxt.Text &= ", " 
     Next 

totxt.Text = totxt.Text.Remove(totxt.TextLength - 2, 2) 

また、あなたがrow.cells("email").value代わりの指標によってそれに参照のうえでそれを参照することができるように、メール欄に名前を与えることを見てすることがあります。この方法で、あなたのDataGridの列の数が変わった場合、あなたのプログラムは壊れません。