医院药品存销管理系统（基于数据库SQL2000和VB）
数据库系统，包括实验报告，源程序等等！先查询：OpenDBstrSQL="Select*fromDrug_infoWhereDrug_name='"+QueName+"'"objRS.OpenstrSQL,objConn,adOpenDynamic,adLockPessimisticIfobjRS.EOFThenMsgBox"没有所查询的药品",vbOKOnlyobjRS.CloseCloseDB再删除：strSQL="Deletefr
下载地址
用户评论
简单的一个例程，不完整好像。