Private Sub Button1_Click(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles Button1.Click
Form2.Show()
Form2.TextBox1.Text = dgv1.CurrentRow.Cells(0).Value.ToString
Form2.TextBox2.Text = dgv1.CurrentRow.Cells(1).Value.ToString
Form2.TextBox3.Text = dgv1.CurrentRow.Cells(2).Value.ToString
Form2.TextBox4.Text = dgv1.CurrentRow.Cells(3).Value.ToString
Form2.TextBox5.Text = dgv1.CurrentRow.Cells(4).Value.ToString
Form2.TextBox6.Text = dgv1.CurrentRow.Cells(5).Value.ToString
Form2.TextBox7.Text = dgv1.CurrentRow.Cells(6).Value.ToString
textBox5是应该只显示日期的那个,但是当我点击按钮时,文本框会显示日期和时间.例如：12/01/12 12:00 AM.
由于CurrentCells(4).Value是一个对象,请尝试将其转换为DateTime,然后使用
原文链接：https://www.f2er.com/vb/255036.htmlToShortDateString Method进行转换
Form2.TextBox5.Text = CType(dgv1.CurrentRow.Cells(4).Value,DateTime).ToShortDateString
或者您可以使用DateTime.TryParse,如果转换成功,将返回true
Dim tempDate As Date
If DateTime.TryParse(CStr(dgv.CurrentRow.Cells(4).Value),tempDate) Then
Form2.TextBox5.Text = tempDate.ToShortDateString
Else
Form2.TextBox5.Text = "Invalid Date"
End If