Automatically focus to next textbox after enering value to first textbox by using barcode scanner

Question

1.00/5 (1 vote)

See more:

In my vb.bet application with database access , a form I have 6 Textbox. To enter data in the textbox I am using Barcode scanner.
So when I enter the data in e.g. Textbox1 ,the focus should be changed automatically to next Textbox2 and then to 3rd and so on untill 6 textboxes. After 6th Textbox it should display the msg "The Rack Is Full" and all value should be saved automatically.

How can I get this.
I searched a lot but not able to get the clue.

I am using databinder to save the data.
This code applies to save data.

VB

Me.Validate()
Me.Samplebindingsource.EndEdit()
Me.TableAdapterManger.UpdateAll(Me.Sample_StorageDataSet)

What I have tried:

I didn't find any clue.
I tried to change the scanner.

Posted 14-Feb-17 1:17am

Member 10804809

Updated 16-Feb-17 1:56am

Add a Solution

1 solution

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Ralf Meier · Answer 1 · 2017-02-14T05:44:00

Solution 1

What you have to do is :
- give your Textbox1 the Focus when Form loads - override the OnFormLoad-Method or use the FormLoad-Event with your own method
- if the Text in Textbox1 is changed give the Focus to Textbox2 - use the Textbox1.TextChanged-Event with your own method. In this method you can also check, if the input is valid before you switch to Textbox2
- if the Text in Textbox2 is changed give the Focus to Textbox3 - use the Textbox2.TextChanged-Event with your own method. In this method you can also check, if the input is valid before you switch to Textbox3
- and so on
- in the Textbox6_TextChanged-method you check if all inputs are correct and then save that data.

Posted 14-Feb-17 5:44am

Ralf Meier

Comments

Member 10804809 14-Feb-17 14:23pm

I tried this method in textbox changed event, but its not shifting to textbox2

Private Sub A1TextBox_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A1TextBox.TextChanged
If A1TextBox.Text.EndsWith(vbCrLf) Then
Me.SelectNextControl(A1TextBox, True, True, False, False)
End If
End Sub

Ralf Meier 14-Feb-17 14:33pm

OK ... this is also a possible way.
Are you sure that your Text in A1Textbox really ends with CR-LF ...? Have you checked it with the Debugger ?
Not each Barcode-Scanner automaticly appends a CR-LF at the end of it's Scan-String - normally it must be set per parameter for that ...

Member 10804809 14-Feb-17 14:49pm

The each textbox contains a no. e.g. 12345
How can i modify my code (vbCrLf)?

Member 10804809 14-Feb-17 14:58pm

I got one hint to add Tab key at end of the scan.

How to add Tab key at the end of scan?

I went to this link: https://www.experts-exchange.com/questions/28391135/Scanned-Barcode-to-Visual-Basic-Textboxes-Change-Textbox-Focus-with-Javascript.html

Ralf Meier 14-Feb-17 15:10pm

Slow ... slow ...
The problem is not your VB-Code. This code works like you posted it. If you remove the IF-Request then you select the next Control with the TabIndex which is greater than that one from A1Textbox.
That means that the IF-Request is not working well - this part needs a CR-LF at the end of the scanned string. And even that is a part of the functionallity of the Scanner - not from your code. So perhaps somewhere in the Settings from your scanner is the ability to add a CR or a LF or a CR-LF to the scanned string. If your Scanner doesn't support this your have another possibility : check if the text in A1Textbox has the required length - I suppose that you allways scan the same type (and content-type) of Barcode ...

Member 10804809 14-Feb-17 15:05pm

Another solution is inserting this code, but the no. in the textbox is always the same-

If A1TextBox.Text.Length = 8 Then
A2TextBox.Focus()

End If

Ralf Meier 14-Feb-17 15:12pm

I don't understand your last reply ... what do you mean ? Doesn't it work ?
Is lthe length of the Text in A1Textbox really 8 ? Have you checked it with the Debugger ?

Member 10804809 15-Feb-17 1:32am

The length of the text in textbox may be 5 or 6 or 7 or 8.
So suppose I have A- of 7 character and B of 8 character.
So if I keep it 7 character length then it will capture 7 of A and 1 of B with remaining 7 in next textbox

Another thing how can I know the whether the scanner is having CR or LF or CR-LF?

Ralf Meier 15-Feb-17 2:42am

... so you should check if the scanned length is >=5

For the Scanner you should look into the Scanner-Manual (if you have one). There is no generell way - each scanner in unique ...

Member 10804809 15-Feb-17 1:38am

My scanner mentioned on it."Laser version complies with 21CFR"
Does it seems any relation with the code?

When I scan the barcode with this scanner in Excel, it moves automatically to next row.

Ralf Meier 15-Feb-17 2:45am

So that means that there comes a something more.
But this could be CR-LF or only CR or only LF - everything is possible.
If you want to be sure you should look which string-content you REALLY have - I can't do that for you. But the Debugger could help you with this ... perhaps you give it a try ...

Member 10804809 15-Feb-17 7:22am

Finally I got this step.
I made textbox character length to 7 as every barcode contains 7 character and I put this code in TextChanged Event.

If A1TextBox.Text.Length = 7 Then
A2TextBox.Focus()

End If

So presently not having issue unless the barcode characters are changed.