双击datagridview 弹出新页面,并更新的方法
Private Sub DataGridView1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles DataGridView1.DoubleClickDim f As yhzg = New yhzg()
f.Show()
Dim mykey(1) As DataColumn
mykey(0) = myset.Tables("yhxx").Columns("id")
myset.Tables("yhxx").PrimaryKey = mykey
Dim myrow6 As DataRow
myrow6 = myset.Tables("yhxx").Rows.Find(Me.DataGridView1.Item(0, Me.DataGridView1.CurrentRow.Index).Value)
If myrow6 Is Nothing Then
myset.Tables("yhxx").PrimaryKey = mykey
myrow6 = myset.Tables("yhxx").Rows.Find(Me.DataGridView1.Item(0, Me.DataGridView1.CurrentRow.Index).Value)
Else
yhzg.Txtzy.Text = myrow6.Item("专业")
yhzg.cmbdw.Text = myrow6.Item("单位")
yhzg.dtp1.Text = myrow6.Item("时间")
yhzg.txtdd.Text = myrow6.Item("地点")
yhzg.cmbbc.Text = myrow6.Item("班次")
yhzg.Txtjcr.Text = myrow6.Item("检查人")
yhzg.txtzrr.Text = myrow6.Item("责任人")
yhzg.dtpxqsj.Text = myrow6.Item("限期时间")
yhzg.Txtzgyj.Text = myrow6.Item("整改意见")
yhzg.Txtczyh.Text = myrow6.Item("存在隐患")
yhzg.Txtid.Text = myrow6.Item(0)
End If
End Sub
这样怎么只能弹出新页面,对应的值却传递不到新开的页面中?代码错在哪里? --------------------编程问答-------------------- 要先定議一個全局變量,然後通過全局變量來傳值就行。 --------------------编程问答-------------------- myrow6.Item("专业")
=================
把你的這些改成:
Me.DataGridView1.CurrentRow.Cells("专业").Value
看看。 --------------------编程问答-------------------- 能写个全部代码不?我不太明白 --------------------编程问答-------------------- 那我寫一個簡單的例子吧:
假設你的datagridview裡已經有數據,並且有焦點。
要顯示的窗體為Form2且裡面有兩個textbox控件。代易做图如下:
Dim f As Form2 = New Form2()
f.Show()
f.TextBox1.Text = Me.DataGridView1.CurrentRow.Cells("专业").Value '
f.TextBox2.Text = Me.DataGridView1.CurrentRow.Cells("单位").Value
這樣樓主明白了吧。 --------------------编程问答-------------------- 这个我知道,我是说一楼的,这个我试了下不行 --------------------编程问答-------------------- 汗就一個字!
難道一樓不是我。。。
==================
好說說一樓的方法吧:定議全局變量,然後用4樓的方法傳值,
然後在窗體2中寫個獲值的代易做图就OK。。
'看在你說的:这个我知道。。。
‘所以代易做图就自已寫吧,思想是這樣了。 --------------------编程问答-------------------- 那如果修改后,点击BUTTON1时,修改数据库完成时,旧窗体的DATAGRIDVIEW怎么自动刷新?
补充:.NET技术 , VB.NET