-1

Google で答えを探しましたが、探しているものが見つかりませんでした。

ユーザーがバーコード スキャナーを使用してバーコードをスキャンしてテキスト ファイルに変換できる、非常にシンプルなアプリを作成しました。すべてが正常に機能します。もう少し単純化したいと思います。

もともと、スキャンしたバーコードが表示される te​​xtbox1.text フィールドがあり、ユーザーはテキストボックス フィールドの横にある [追加] ボタン (Button1.Click) をクリックして、バーコード シリアルをすぐ下の RichTextBox に追加する必要がありました。ユーザーは、個々のバーコードをスキャンするたびに [追加] ボタンをクリックしなければならないのは面倒だと感じました。

私の質問

バーコードがスキャンされるとすぐに textbox1.text のテキストを自動的に RichTextBox に追加する方法はありますか? 「追加」ボタンをクリックする手間を省きたい。

これが私の現在のコードです（Button1.Clickボタンのコード）：

Dim scanData As String = TextBox1.Text

RichTextBox1.AppendText(scanData + " " + Format(TimeOfDay, "HH:mm:ss") + vbNewLine)

TextBox1.Clear()
TextBox1.Focus()
4

1 に答える 1

0

TextBoxまず、コントロール ( )を無効にして、ユーザーが自分でテキストを入力できないようにしてから、コードをイベントTextBox1.Enabled=Falseに追加します。TextChanged

Private Sub TextBox1_TextChanged(sender As System.Object, e As System.EventArgs) Handles TextBox1.TextChanged
    Dim scanData As String = TextBox1.Text

    RichTextBox1.AppendText(scanData + " " + Format(TimeOfDay, "HH:mm:ss") + vbNewLine)

    TextBox1.Clear()
    TextBox1.Focus()
End Sub

RTB に追加する前に、BarCode が有効であることを確認します。

于 2013-04-19T17:30:18.303 に答える