MSCOMMでWバイトの半分だけを送信するには？ (ID:104692)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 あんちゃんさんご返答ありがとうございます。 バイト配列ってのがよく分かりませんが、 以下のように書いてみました。 strBuffにファイルから読み込んだ文字列を代入し、 それを変換させています。一応全角文字で変換できてそうです。 間違っていたらまた教えてくださいm(__)m ただ、strBuffに"12345あいうえお"という文字列が入ったときは 以下のコードで正しいのかが分かりません。 「1」が「310」と2バイトで変換されてしまいますが、 それでも正しいのでしょうか？ またまたよろしくお願いします。 *************************************************** Private Sub Btn_byte_Click() Dim Byte_line() As Byte Dim I As Long intFno = FreeFile Open strFname For Input As #intFno Line Input #intFno, strBuff Close #intFno Byte_line() = strBuff For I = 0 To LenB(strBuff) - 1 Byte01data = Hex(Byte_line(I)) Byte256data = Byte256data & Byte01data Debug.Print Hex(Byte01data) If I Mod 256 = 0 Then ' MSComm2.Output = Byte256data Debug.Print Byte256data End If Next ***************************************************