用DBGrid又“不要用到数据库”,你想干什么?!

解决方案 »

  1.   

    Private madoPrimaryRS As RecordsetPrivate Sub Command1_Click()
        madoPrimaryRS.AddNew
    End SubPrivate Sub Command2_Click()
        madoPrimaryRS.Delete adAffectCurrent
    End SubPrivate Sub Form_Load()
        Set madoPrimaryRS = New Recordset
        madoPrimaryRS.Fields.Append "TestColumn1", adVarChar, 20
        madoPrimaryRS.Fields.Append "TestColumn2", adVarChar, 20
        madoPrimaryRS.Fields.Append "TestColumn3", adVarChar, 20
        madoPrimaryRS.Open
        Set grdDataGrid.DataSource = madoPrimaryRS
    End Sub
    以上代码中创建了一个不连接数据库的记录集,是否满足你的要求
      

  2.   

    你到底要干吗?如果只是向往表格里面添加东西的话,用msflexgrid好了.