| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 求助，输入数值后怎样自动匹配型号并自动输入 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=40217) |
| -- 作者：roony99 -- 发布时间：2013/9/12 10:49:00 -- 求助，输入数值后怎样自动匹配型号并自动输入 型号 数值 jsq5 7300123jsq6 7530123 j5sq 8001234 8011234 j6sq 8021234 jsq1k 7350123 当输入右边的数值后，怎么自动匹配型号并输入（根据数值的前三位）， 例如输入800开头的7位数，它的型号就是J5SQ 例如输入801开头的7位数，它的型号也是J5SQ
例如输入735开头的7位数，它的型号就是JSQ1k 请各位大虾指教，不胜感激！！！！
[此贴子已经被作者于2013-9-12 10:49:17编辑过]
|
| -- 作者：Bin -- 发布时间：2013/9/12 10:52:00 -- 参考帮助 http://www.foxtable.com/help/topics/1458.htm 把表达式的等于 改为 like \'" & 你输入的值即可 & "*\' 新手建议还是先按部就班看帮助吧,否则别人帮你你也看不懂.
|
| -- 作者：狐狸爸爸 -- 发布时间：2013/9/12 10:54:00 -- DataColchanged事件：
if e.DataCol.Name = "数值" Dim s As string = e.DataRow("数值") if s.StartsWith("800") Then e.Datarow("型号") = “J5SQ1” Elseif s.StartsWith("801") Then e.Datarow("型号") = “J5SQ2” Elseif s.StartsWith("801") Then e.Datarow("型号") = "JSQ1k” Else e.Datarow("型号") = "" End If end If
提问最好具体一点，做个小例子发上来，说明需求和问题。 问题具体，答案才会具体，问题准确，答案才会准确。
[此贴子已经被作者于2013-9-12 10:55:23编辑过]
|
| -- 作者：roony99 -- 发布时间：2013/9/12 11:09:00 -- 多谢狐狸爸爸 多谢狐狸爸爸的帮助，继续学习，谢谢！！ |