主题：怎么改，能改模糊匹配

If e.KeyCode = Keys.Enter Then
    Dim spdm As String = e.Sender.Text
    Dim dr As DataRow = DataTables("库存明细表").Find("商品代码 = '" & spdm & "'")
    If dr IsNot Nothing Then

           e.Form.Controls("商品类型").Text = dr("商品类型")

Else

 

 

产品代码 如：  F6   HM930  RBL155、   输入 6    930 155 的数字，就能获得 最匹配 的商品信息

产品 不一定就是 6 930 155的 代码 

哦！！ 我下班回家试试！！ 谢谢

不行，没有效果！！！

我这个 不是 查下哦，  是 编码  填充 信息

 

嗯， 晚点 我上传！ 上班中