vb2008如何給第一列賦值
如圖,如何給圈住的列賦值,按代碼來說第一列應該是id一欄才對
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
FillDatasetandview()
End Sub
Public Sub FillDatasetandview()
objdataset = New DataSet
objconnection.Open()
objdataadApter.Fill(objdataset, "t_table")
objconnection.Close()
DataGridView1.AutoGenerateColumns = True
DataGridView1.DataSource = objdataset
DataGridView1.DataMember = "t_table"
objdataview = New DataView(objdataset.Tables("t_table"))
objcurrency = CType(Me.BindingContext(objdataview), CurrencyManager)
'objdataadApter = Nothing
'objconnection = Nothing
End Sub
[ 本帖最后由 jxyga111 于 2011-11-15 15:18 编辑 ]