VB.netのDataGridViewにデータを追加したいのですが…

Question

名前、身長、体重を入力したらBMIが計算され、その後一覧に登録するアプリを作りたいのですが、
DataGridView.add()の使い方がわかりません。変数をDataGridView.addで扱えないのでしょうか？ご教授お願い致します。

Public Class Form1
    Private Sub btnClose_Click(sender As Object, e As EventArgs) Handles btnClose.Click
        Me.Close()
    End Sub

    Private Sub btnBMI_Click(sender As Object, e As EventArgs) Handles btnBMI.Click

        Dim Height As Double = txtHeight.Text

        Dim Weight As Double = txtWeight.Text

        Dim Name As String = txtName.Text

        Dim BMI As Double

        If Height > 0 AndAlso Weight > 0 Then
            lblerror.Text = ""
            BMI = Weight / ((Height / 100) * (Height / 100))

            txtBMI.Text = BMI.ToString("0.0") '有効数字以下は四捨五入される

            '肥満度判定
            If txtBMI.Text >= 25 Then
                lblHimando.Text = "肥満"
            ElseIf txtBMI.Text < 25 AndAlso txtBMI.Text >= 18.5 Then
                lblHimando.Text = "普通"
            ElseIf txtBMI.Text < 18.5 Then
                lblHimando.Text = "痩せ"
            End If

            '肥満度によって文字の色を変更
            If lblHimando.Text = "肥満" Then
                lblHimando.ForeColor = Color.Red
            ElseIf lblHimando.Text = "痩せ" Then
                lblHimando.ForeColor = Color.Blue

            End If

            '0以下が入力された時にエラーメッセージを表示
        Else
            lblerror.Text = "正しい値を入力してください"
            lblHimando.Text = ""
        End If

    End Sub

    Private Sub DataGridView1_CellContentClick(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellContentClick

    End Sub

    Private Sub btnTouroku_Click(sender As Object, e As EventArgs) Handles btnTouroku.Click

        If txtBMI.Text = "" Then
            lblerror.Text = "計算してください"

        Else

            For i As Integer = 1 To 10
            'ここにID＝i,Nameカラム＝Name、身長カラム＝身長・・・と書きたい
            Next

        End If
    End Sub
End Class

Answer 1

DataGridViewに行を追加するにはDataGridView.Rows.Addするようにしましょう

ざっくり書くと

For i As Integer = 1 To 10
 Dim NewRow As DataGridViewRow
 NewRow.Cells["列名：ID"].Value = i
 NewRow.Cells["列名：Name"].Value = ”名前”
 NewRow.Cells["列名：身長"].Value = 195
 NewRow.Cells["列名：肥満度"].Value = "肥満"

 DataGridView.Rows.Add(NewRow)
Next

な感じで

Comments

[TK0107]

回答ありがとうございます。
NewRow.Cells["列名：Name"].Value = ”名前”
についてなのですが、
NewRow.Cells["列名：Name"].Value = ”txtName.Text”
とすれば、テキストボックスに入っている名前がNameカラムに追加されるのでしょうか？

[dojikko]

その場合は
NewRow.Cells["列名：Name"].Value = txtName.Text
な感じで
やってみたらわかりますが”txtName.Text”と引用符で括るとtxtName.Textという文字列が入ります

[dojikko]

あと大丈夫だと思いますが実際のコードは"列名：Name"ではないですよ
あなたがDataGridViewの列定義で付けた名前です

[TK0107]

何度もすみません

DataGridのカラム名が
ID NameView HeightView WeightView BMIView となっているのですが、
NewRow.ID.value = i
と書いたところ、'ID'は'DataGridView'のメンバーではありませんと言われました。C言語の構造体のように.を付ければそのカラムを指定できるのではないかと思ったのですが、違うのでしょうか？

[dojikko]

> C言語の構造体のように.を付ければそのカラムを指定できるのではないかと思った
それはメンバにIDがいた場合ですよね
[DataGridViewRow クラス](https://msdn.microsoft.com/ja-jp/library/system.windows.forms.datagridviewrow.aspx)