[リストへもどる]
一括表示

投稿時間:2004/04/19(Mon) 10:10
投稿者名:モモ
Eメール:
URL :
タイトル:
バーコードの読み込み処理について
初心者です。
よろしくお願いします。

バーコードからデータを読み込み変数に格納したいのですが、
うまくいきません。

バーコードから読込んだデータは現在のフォーカスがある場所に
表示されます。
すべてのデータを読み込んでから変数に格納したいのですが、
1文字読むごとにチェンジイベントが発生してしまい、うまく変数に
格納することができません。
バーコードはTextBoxに表示されるようになっています。
よろしくお願いします。

投稿時間:2004/04/19(Mon) 12:08
投稿者名:Renard
Eメール:
URL :
タイトル:
Re: バーコードの読み込み処理について
キーボードウェッジインターフェースのバーコードリーダだと仮定して。

1.バーコードリーダの設定で、サフィックスにCRを指定
2.Text1.KeyPressイベントでCRがきたら、変数に格納

が、簡単かと。

投稿時間:2004/04/19(Mon) 13:04
投稿者名:モモ
Eメール:
URL :
タイトル:
Re^2: バーコードの読み込み処理について
Renard さんお返事ありがとうございます。

ご回答ありがとうございます。
    サフィックスCRを指定し、ひとつのレコードが読みきったら
    変数に格納することは無事できました。ありがとうございました。
    
    その次に問題になってしまったのが、
    読み込むデータに種類があり、その識別をしたいのですが
    どうしたらよいのでしょうか?
    
    
    バーコードの読み込みの種類はランダムに行われ、
  読み込まれたデータがどの種類のデータで
    あるかを文字数で識別したいのです。
    
    Len関数で3文字になったとき、としてしまうと3文字を読込んだ時点で
    バーコードの読み込みが終了してしまいます(><。
    
    フォームにテキストボックスはひとつです。 (任意に隠されています。)
    
    バーコードで 日付、機種名、台数、などのデータをそのテキストボックスに
    読み込み なんのデータであるかを判別変数に格納。
  その変数を種類別の各ラベルに表示したいのです。
    
    説明が下手でうまく伝わらずすみません。
    なにかよい策があれば、ご伝授おねがいします。
    
    

投稿時間:2004/04/19(Mon) 13:17
投稿者名:モモ
Eメール:
URL :
タイトル:
Re^3: バーコードの読み込み処理について
すみません。解決しました。
Instr関数でサフィックスCRの最後のキャラクタまで
読み込まれていないときは処理を抜ける条件をつけてあげたら
解決しました。
お騒がせ致しました(^^

投稿時間:2004/04/21(Wed) 14:50
投稿者名:nanashi
Eメール:
URL :
タイトル:
Re^4: バーコードの読み込み処理について
解決済みなら良いんですが、今ってChangeイベントを使ってるんですよね?
バーコード読み取りでもキーボード入力同様にKeyDownやKeyPressのイベントが発生するので
こちらでチェックした方が良いと思います。

普通に

    If KeyCode = vbKeyReturn Then

というように処理できます。