1、增
插入单行
insert [into] <表名> (列名) values (列值)
2、删
delete from <表名> [where <删除条件>]
例如:在机房中下机时删除Online_info表
txtSQL = "delete from online_info where cardno= '" & txtcardNo.Text & "'"
Set mrcOn = ExecuteSQL(txtSQL, MsgText)
3、更新
update <表名> set <列名=更新值> [where <更新条件>]
例如:在机房中下机时更新line_info表
txtSQL = "update Line_Info set offdate=Trim(txtOffDate.Text) ,offtime=Trim(txtOffTime.Text),consumTime= Trim(txtCTime.Text) where ondate='" & Trim(txtOnDate.Text) & "' and ontime='" & Trim(txtOnTime.Text) & "'"
Set mrcline = ExecuteSQL(txtSQL, MsgText)
4、查
select <列名> from <表名> [where <查询条件表达试>] [order by <排序的列名>[asc或desc]]
例如:在机房中下机时查询Online_info表
txtSQL = "select * from OnLine_Info where cardno='" & txtcardNo.Text & "'"
Set mrcOn = ExecuteSQL(txtSQL, MsgText)
总结
在数据库的学习中,SQL语言占有重要的地位,不仅如此,在之后的学生系统中,和机房收费系统中,SQL语句都占有很重要的地位。不仅如此SQl语句在一定的程度上也简化了代码,因此要好好重视SQL语句哟。