Case "shuliang"Dim dr As DataRow=e.DataRow("shuliang")dr("zonger") = dr("shuliang")*dr("price")
改为：
Case "shuliang" Dim dr As DataRow=e.DataRow dr("zonger") = dr("shuliang")*dr("price")
加好友 
发短信
Post By：2011/8/12 11:42:00 [显示全部帖子]
