做个按钮,按钮代码:
Dim cmd As New SQLCommandcmd.connection Name = "数据源名称"
cmd.CommandText = "Truncate table 表名"cmd.ExecuteNonQuery()