请教怎么将值手工赋给datagrid中的一列？？

[huteng]

用datagrid的那个属性赋值？？比如现在是空的
想添加第一行，第一列的值为文本：hello

[faysky2]

需要建立无源记录集，然后跟DataGrid绑定，给记录集对象赋值hello，DataGrid就能显示hello了

[faysky2]

给你些代码参考：

需要引用ADO

Dim rs As New Recordset
Private Sub Form_Load()
rs.Fields.Append "a", adVariant, adFldMayBeNull + adFldIsNullable + adFldUpdatable
rs.Fields.Append "b", adBSTR, , adFldMayBeNull + adFldIsNullable + adFldUpdatable
rs.Fields.Append "c", adBSTR, , adFldMayBeNull + adFldIsNullable + adFldUpdatable
rs.Fields.Append "d", adBSTR, , adFldMayBeNull + adFldIsNullable + adFldUpdatable
End Sub

Private Sub Command1_Click()
Dim i%
rs.Open
For i = 1 To 4
rs.AddNew
rs(0) = "1"
rs(1) = "2"
rs(2) = "3"
rs(3) = "4"
Next
rs.UpdateBatch
Set DataGrid1.DataSource = rs
End Sub

[huteng]

老大，你厉害，我按照你的模仿成功，分全给你了。