VB.NET中，如何选中DataGridView某行值,点击button后打开第二个窗体并将值显示在这个窗体的textbox上

Question

如题，就是在form1中选中DataGridView某行值，再点击button按钮后，就出现第二个form2窗体，然后将DataGridView这一行的值显示在form2的textbox上

Answer 1

dim frm2 as new form2

frm2.show

dim zhi as string
for i=0 to datagridview1.columns.count-1
zhi=zhi & datagridview1.SelectedRows(0).Cells(0).Value & ""
next i
frm2.textbox1.text=zhi追问

zhi=zhi & datagridview1.SelectedRows(0).Cells(0).Value & ""
next i
警告 1 变量“zhi”在赋值前被使用。可能会在运行时导致 null 引用异常。

不行啊

追答

这个问题没关系的。如果你不放心，可以这样声明
dim zhi as string=""

修改一下：
上面的：zhi=zhi & datagridview1.SelectedRows(0).Cells(0).Value & ""

改为 zhi=zhi & datagridview1.SelectedRows(0).Cells(i).Value & ""

追问

大哥，还是不行啊，你运行看看

追答

选中行上面的语句是没有问题的

如果只是选择了单元格，
替换成： zhi = zhi & DataGridView1.Rows(DataGridView1.SelectedCells(0).RowIndex).Cells(0).Value & ""

追问

运行没问题，但是datagridview的值无法显示在textbox里啊



追答

汗，我还以为你form2只有一个textbox.又不知道textbox的名，当然无法显示在里面。你把源程序发过来，我修改之后发给你

[email protected]

追问

好的，我再追加50分！已发，麻烦了你了！我的程序点击刷新，把数据库里的内容显示在datagridview里，然后选中datagridview里的一行值，点击修改就弹出form2窗体，并显示在textbox里！文件叫哇哈哈

追答

你的版本和我的不一样。你用下面的应该没问题
'点击form1的“修改”按钮，跳转到form2窗体,并在textbox中显示datagridview的值
Dim frm As New Form2
frm.ShowDialog()
frm.TextBox1.Text = DataGridView1.Rows(DataGridView1.SelectedCells(0).RowIndex).Cells("交易编号").Value
frm.TextBox2.Text = DataGridView1.Rows(DataGridView1.SelectedCells(0).RowIndex).Cells("产品选择").Value
frm.TextBox3.Text = DataGridView1.Rows(DataGridView1.SelectedCells(0).RowIndex).Cells("产品数量").Value
frm.TextBox4.Text = DataGridView1.Rows(DataGridView1.SelectedCells(0).RowIndex).Cells("产品单价").Value
frm.TextBox1.Text = DataGridView1.Rows(DataGridView1.SelectedCells(0).RowIndex).Cells("每笔交易额").Value

你的版本和我的不一样。你用下面的应该没问题
'点击form1的“修改”按钮，跳转到form2窗体,并在textbox中显示datagridview的值
Dim frm As New Form2
frm.ShowDialog()
frm.TextBox1.Text = DataGridView1.Rows(DataGridView1.SelectedCells(0).RowIndex).Cells("交易编号").Value
frm.TextBox2.Text = DataGridView1.Rows(DataGridView1.SelectedCells(0).RowIndex).Cells("产品选择").Value
frm.TextBox3.Text = DataGridView1.Rows(DataGridView1.SelectedCells(0).RowIndex).Cells("产品数量").Value
frm.TextBox4.Text = DataGridView1.Rows(DataGridView1.SelectedCells(0).RowIndex).Cells("产品单价").Value
frm.TextBox5.Text = DataGridView1.Rows(DataGridView1.SelectedCells(0).RowIndex).Cells("每笔交易额").Value

追问

我的2008版的！要哭了，还是不行，程序没问题就是运行之后，点“修改”跳出form1后textbox里还是显示不出数值！怎么办呀？搞了一下午了都，脑袋都炸开了

追答

加QQ 5116632

追问

加了已经

本回答被提问者采纳