通用读卡器怎么控制？？？

[tmran]

今天客户拿来了一个银行用的通用读卡器，要我写个程序控制，具体说就是这样：

这个读卡器实际上和键盘一样，每次刷卡（银行卡，含信用卡）都会把卡上的信息送到电脑，如果光标在一个可以输入文本的地方时，这些信息就会在此显示，但是，这些信息，除了卡号外还有很多其他的一些数据，如：刷一次卡，信息出来：
“;6013822200229202466=99125201000000000?+930476690229110570467=0990000500766908603942977010000099120100000000000000000000000000000000000000000001?”
其中，“6013822200229202466”是卡号，
我需要的只是卡号，如果在程序中不想让用户看到这些多余的信息，该怎么做呢？换句话说，每次刷卡时只显示“6013822200229202466”，行吗？？？？
有谁做过吗？有什么好方法呢？
提示：每次刷卡后信息显示有一定的时间，大概1秒到2秒的时间才能全部出来（上面的完整信息）。

[mycatlove]

做个不可见的textbox（可以放在窗体外面，反正看不到就行了），先将读卡器读到的内容写进这个textbox里面，然后再做截取。
可行吗？

[VBDN]

没有做过，新鲜！

[oyljerry]

可以读入后，自己处理一下，然后再显示

[WM_KBS]

VB基础第一页 leftB(....,....)这样行吗?

[Feather2005]

当然可以，你编程实现，如是文本框的话设定显示的字符个数即可，还可以用取字符的方法实现，就是只取前面的多少位，就算你需要中间的信息一样可以取出来。

[Fanks]

用读卡器和键盘输入的效果完全一样，所以无法做到直接获得截取后的结果，但你可以作一个简单处理，即在刷入前将文本框设为密码框，当刷卡完毕后在将文本进行截取，最后将文本框恢复为普通。

[tmran]

有点道理哦，不知道银行的是怎么用的，我估计也是刷的过程中全部信息都会显示，数据完整后再处理的。谁清楚告诉我一下。

[Fanks]

如果使用写卡器或专用读卡器，可以将结果读取到变量内再进行处理，是通过串口读取的，而这种通用的是不行的。

[luoxiaoxiang]

Fanks(铁面人)
怎么在刷卡前将文本框设为密码框？如果能这样，不是有很多办法了吗？有办法识别是刷卡还是键盘输入吗？

[chuting1]

文本框格式为Password

[jxgzay]

设置PasswordChar =" "，就没有任何显示，待处理后再显示。
text1.PasswordChar =" "

[luoxiaoxiang]

楼上，假如是键盘输入呢？或者是粘贴呢？

[Fanks]

区别不开

[of123]

If Len(Text1) > 19 Then Text1 = Mid(Text1, InStr(Text1, ";") + 1, 19)