タイトル : Re^3: キャプションに(追記) 投稿日 : 2008/01/05(Sat) 09:11 投稿者 : 花ちゃん
> としたところ、正しく"A"が表示されます。 > > ステップ実行で見てみると、 > str = Cstr(Buffer) > までは正しく代入されているのですが、、 > Label1.Caption = str > を実行すると、左辺が "" 、右辺が"A"となり、代入が実行されません。 下記では、Label に表示されますか? Private Sub Command1_Click() Dim Buffer As Variant Dim str As String Buffer = Chr$(&H41) str = CStr(Buffer) ’ MsgBox str Label1.Caption = str End Sub 又、現在のコードを下記コードに変更した場合どうなりますか? Dim Buffer As Variant Dim str As String Buffer = MSComm1.Input str = CStr(Buffer) Debug.Print Len(str) Debug.Print str Debug.Print Asc(str) Label1.Caption = Replace(str, vbNullChar, "") 送・受信モードは、テキストになっていますよね。 MSComm1.InputMode = comInputModeText |