库存表的DatacolChanged事件：
Select Case e.DataCol.Name
Case "数量"
Dim dr As DataRow = DataTables("出入库信息").AddNew()
End Select
加好友 
发短信
Post By：2012/3/19 10:29:00 [只看该作者]
