主题：[求助]清除当前表数据,来个高手指点下

新手上路

问题比较多

请多关照

我想设置一按钮清除某一表中的数据

也就是删除所有单元格的内容

请问代码该如何写

厉害,我要清除表数据,你直接叫我删除行

我再给你一段代码看看

我是这样实现的

Dim f As  New Filler
f.SourceTable = DataTables("入库") '指定数据来源
f.SourceCols = "单号,编码,类别,品名,型号,规格,材质,单位,数量,库位,单据类型,日期,部门" '指定数据来源列
f.DataTable = DataTables("出入库明细") '指定数据接收表
f.DataCols = "单号,编码,类别,品名,型号,规格,材质,单位,数量,库位,单据类型,日期,部门" '指定数据接收列
f.Fill() '填充数据
With DataTables("入库")
    .DataRows.Clear() '清除所有行
End With
With DataTables("入库")
    .DataRows.AddNew(15) '增加(15)行
End With

上面那一串代码纯粹诱惑你的,是把一个表的数据填充到另一个表,你给的代码是删除所有行,所以我要添加空行,要不我往哪里输入数据呢?其实我想过初始化表,但是帮助里面找不到代码