VB.NET 如何实现textbox捆绑USB输入设备有ID

来源：蜘蛛抓取(WebSpider) 时间：2015-09-16 06:52 标签： 输入设备有
求大神帮助,如何控制TextBox,不允许键盘输入,只能输入读卡器读到的数据.
[问题点数：20分，结帖人u]
求大神帮助,如何控制TextBox,不允许键盘输入,只能输入读卡器读到的数据.
[问题点数：20分，结帖人u]
不显示删除回复
显示所有回复
显示星级回复
显示得分回复
只显示楼主
相关推荐：
匿名用户不能发表回复！|
每天回帖即可获得10分可用分！小技巧：
你还可以输入10000个字符
(Ctrl+Enter)
请遵守CSDN，不得违反国家法律法规。
转载文章请注明出自“CSDN（www.csdn.net）”。如是商业用途请联系原作者。VB编程、代码、技术问题解决方案
如何让textbox检测“回车”？如在其中输入完内容后一按回车焦点就转移到下一个按钮上。
方案整理者：BLAME001 &&&&&& 发布时间：
如何让textbox检测“回车”？如在其中输入完内容后一按回车焦点就转移到下一个按钮上。
推荐解决方案
应该是textbox的keypass事件里让焦点跳到下一个textbox中
其他解决方案
模拟tab键&SendKeys.Send(&{tab}&)
textbox2.fouce()
Private&Sub&txtName_KeyPress(ByVal&sender&As&Object,&ByVal&e&As&System.Windows.Forms.KeyPressEventArgs)&Handles&txtName.KeyPress
&&&&&&&&If&e.KeyChar&=&Microsoft.VisualBasic.ChrW(13)&Then
&&&&&&&&&&&&txtAge.Focus()
&&&&&&&&End&If
textbox1.keydown（......）事件
if&e.keycode=keys.enter&then
textbox里面的keydown属性
textbox1.keydown（......）事件&
if&e.keycode=keys.return&then
&&SendKeys.Send(&{tab}&)
Sub&TextBox1_keydown()
If&e.KeyCode=Keys.Enter&Then
&Button1.Focus()页面导航：
→ 正文内容 TextBox获取输入焦点时自动全选
TextBox获取输入焦点时自动全选的实现方法
TextBox获取输入焦点时自动全选的实现方法，需要的朋友可以参考一下
&&&&& C#开发WinForm，如何实现TextBox获取输入焦点时自动全选？ 　　
&&&&& 肯定不少朋友一看就会觉得再容易不过了：给TextBox添加GotFocus事件，然后在事件中调用TextBox.SelectAll()不就完事了吗？巢皮一开始也理所当然得这么认为，但要是你试试这么做，你会发现的当你用点击鼠标左键让TextBox.获得输入焦点时，里面的文本根本不会全选。 　　
&&&&& 这是why咧？原因是通过鼠标让TextBox获得输入焦点时，TextBox触发的事件顺序是：MouseDown-&GotFocus-&MouseUp，也就是说TextBox在鼠标按下的那一刻已经获得了输入焦点，此时可以对文本全选。但郁闷的是，MouseUp却会取消TextBox的文本选中状态...也就是说文本其实曾经被全选了，但立即又被取消选中（-_-#） 　　
&&&& 这样也好办啊，那我改在MouseUp事件中TextBox.SelectAll()不就成了？这么一改，鼠标左键点击TextBox还真的能实现全选，然而新的问题又会发现：当你希望再次左键点击TextBox取消全选时，会发现TextBox仍然在全选。 　　
&&&& 根据上述描述，大致可以摸清这样一个逻辑： 　　
&&&& 1、如果TextBox本身未获得焦点，则点击鼠标左键获得焦点后，执行全选。 　　
&&&& 2、如果TextBox本身已经获得焦点，则点击鼠标左键则不再执行全选。　　
&&& 根据上面的逻辑，其实只要在TextBox从无输入焦点到获得输入焦点的时，针对鼠标左键点击操作才做一次全选，否则不做全选操作，因此可以用一个变量作为TextBox从无输入焦点到获得输入焦点的标记，当鼠标左键点击判断到这个标记存在时，执行一次全选操作，并把这个标记取消，这样就可以实现上述逻辑了。 　　
&&&& 下面的代码使用TextBox.Tag来作为获得输入焦点标记，实现上述自动全选逻辑引用内容&&&&&&
代码如下:& public Form1()&&&&&&&& & {&&&&&&&&&&&&& &&&&&&&& InitializeComponent();&&&&&&&& textBox.Text = "Auto Select Text Demo";&&&&&&&&&&&&& &&&&&&&& textBox.Tag =&&&&&&&&&&&&& &&&&&&&& textBox.GotFocus += new EventHandler(textBox_GotFocus);&&&&&&&&&&&&& &&&&&&&& textBox.MouseUp += new MouseEventHandler(textBox_MouseUp);&&&&&&&& &}& void textBox_MouseUp(object sender, MouseEventArgs e)&&&&&&&& &{&&&&&&&&&&&& &&&&&&&& //如果鼠标左键操作并且标记存在，则执行全选&&&&&&&&&&&& &&&&&& if (e.Button == MouseButtons.Left && (bool)textBox.Tag == true)&&&&&&&&&&& &&&&&&&& {&&&&&&&&&&&&&&&&& &&&&&&&&&&&&&&&& textBox.SelectAll();&&&&&&&&&&&& &&&&&&&& }&&&&&&& //取消全选标记&&&&&&&&&&&&& &&&&& textBox.Tag =&&&&&&&& &}&&void textBox_GotFocus(object sender, EventArgs e)&&&&&&& & {&&&&&&&&&&&&& &&&&&&&&&&& textBox.Tag =&&& //设置标记&&&&&&&&&&&&& &&&&&&&& textBox.SelectAll();&& //注意1&&&&&&&& &}　　值得提出的是，虽然MouseUp事件已经执行了全选，但代码中的“注意1”位置，GotFocus事件中我们还是要再执行一次全选，原因是让TextBox获得焦点的方法，除了通过鼠标点击，还可能通过Tab切换焦点实现的，此时就不会触发MouseUp，但也因此不会有被MouseUp取消全选的问题，因此在GotFocus事件中还是有必要执行一次全选。
上一篇：下一篇：
最 近 更 新
热 点 排 行
12345678910VB.net 根据textbox1.text中输入的内容进行查询。_百度知道
select * from stu where name='&&textbox1.text&&'
这个不行。
我添加了一个查询。fillbyname
用的就是这个命令，不能查询。
不明白你所谓的不行是什么意思。。是代码错误，还是其他问题？？
其他类似问题
为您推荐：
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁vb.net 中绑定自定义类到textbox的问题_百度知道
vb.net 中绑定自定义类到textbox的问题
我在编程中想把自定义类中的属性绑定到文本框，代码如下，Public Class PZ
Private M_GG As String
Public Property GG() As String
Return M_GG
Set(ByVal value As String)
M_GG = value
End Property
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MsgBox(PZ1.GG)
PZ1.GG = PZ1.GG & &ABC&
MsgBox(PZ1.GG)
End Sub我在文本框中输入“123&,点命令按钮，第一个消息框输出”123“，说明对文本框的改变引发了类属性的改变，第二个消息框输出”ABC&,说明类属性发生了改变，但文本框的内容仍是“123”，没有变为“ABC”，请大有大侠帮忙，谢谢
提问者采纳
如果只是把对象属性值赋值给文本框Text属性的话，它是不会立即改变的。TextBox的Text值需要你自己改变它。方法1：在修改完对象的GG值后立即给文本框赋值：PZ1.GG = PZ1.GG & &ABC&TextBox1.Text = PZ1.GG不过这方法不太好，不推荐。方法2：用事件机制。在改变GG值后，由对象自身（谁）触发事件（什么时候），调用方绑定事件处理（做什么）。在PZ类中定义事件：Public Event GGChanged(ByVal GGValue As String)在GG属性的Set访问器中触发事件：Set(ByVal value As String)M_GG = valueRaiseEvent GGChanged(value)End Set来看到调用方，推测你已经把它声明为成员变量了。在声明前面加个WithEvents：Private WithEvents GG1 As New GG()在调用窗体单独写一个处理方法：Private Sub GG1_GGChanged(ByVal GGValue As String) Handles GG1.GGChanged 'Handles绑定对象的事件，只适用于成员变量TextBox1.Text = GGValueEnd Sub这样虽然麻烦点，不过每当你改掉对象GG属性时，TextBox会自动更新，也减少了对象与调用方之间的耦合。方法3：自己重写一个继承的TextBox，这里不再赘述了。
提问者评价
谢谢，我已经找到了方法
其他类似问题
为您推荐：
textbox的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁

我要回帖

更多关于 输入设备有 的文章

 

随机推荐