代码如下:Private Sub AddColumn()
   ' 在最右边的位置添加一列。然后设置其 Visible、Width、
   ' Caption、以及 Alignment 属性。DataField 属性则指定 
   ' 该列将绑定到哪一个字段。
   Dim c As Column
   Set c = DataGrid1.Columns.Add(DataGrid1.Columns.Count)
   With c
      .Visible = True
      .Width = 1000
      .Caption = "我的新列"
      .DataField = Adodc1.Recordset.Fields("ProductName").Name
      .Alignment = dbgRight
   End With
End Sub
为什么按上述办法还是不能在datagrid中显示绑定的字段的值??