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

タイトル Re^3: 値が表示されません
投稿日: 2009/07/10(Fri) 10:14
投稿者オショウ
>                 Buf1.Text = AxMSComm1.InBufferCount '受信データ数表示
>                 Buffer = AxMSComm1.Input.Substring(0, 4) 'Bufferに4文字格納
>         i = CType(Buffer, Integer) '値をIntegerに変換
>         InputData.Text = Format(i, "0000") '4桁の値を表示

  結果は別として・・・

    Buf1.Text = AxMSComm1.InBufferCount.ToString()
    if AxMSComm1.InBufferCount >= 4 Then
        Buffer = AxMSComm1.Input.Substring(0, 4)
        i = Integer.Parse(Buffer)
        InputData.Text = String.Format("{0,4:0000}", i)
    End If

  せめて、この程度は書かないと・・・

※ 宙で書いたので、スペルミスは勘弁・・・
  MSComm32を使用することを暗黙に認めているのではありません

※ あと、受信バッファにデリミタ文字とか(CR/LF等)が残っている
  可能性で文字ズレ起こしている可能性もあるので、受信後バッファ
  のクリアが必要かと。

以上。

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

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