rs.Open "SELECT * FROM 商品库 where 商品编号 ='" & (商品编号.Text) & "'", mcon, 1, 1
If Not rs.EOF Then
商品编号 = rs.Fields("商品编号").Value & ""
商品名称 = rs.Fields("商品名称").Value & ""
Insert_show
商品编号 = ""
商品名称 = ""
Insert_show
End If
举例查询结果是“香烟”那么,在窗体的商品名称.text控件就显示香烟,如果查询结果是空,那么商品名称.text也就是空,我现在想的就是 如果查询结果是空,那么商品名称.text就显示“查无此商品“,就是返还值为nall,则强制为”查无此商品“
请问,上面那段代码还如何修改?