tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル 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

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。