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

タイトル Re^10: クリップボードデータの文字化けについて
投稿日: 2009/05/15(Fri) 09:56
投稿者take
ほんとに申し訳ありません。
ご指示のサイトを参考にしてみたのですが、JAVAからの変換が理解できていないのか、やはり文字化けしてうまくいきません。情けない限りです。
下記がなんとかエラーを取ったコードです。ぜんぜん的外れなのでしょうか。


Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Try
      Dim ClipData As IDataObject = Clipboard.GetDataObject() 'クリップボードデータの取得
      Dim CFTbl() As String = ClipData.GetFormats(False)
      For i As Integer = 0 To CFTbl.Length - 1
        Select Case CFTbl(i)
          Case DataFormats.Html

            Dim CData As Object = ClipData.GetData(DataFormats.Html)
            Dim b As Byte() = System.Text.Encoding.UTF8.GetBytes(CData)
            Dim ms As New System.IO.MemoryStream()
            ms.Write(b, 0, b.Length)
            Dim buf As Byte() = ms.ToArray

            Me.TextBox1.Text = System.Text.Encoding.UTF8.GetString(buf)

        End Select
      Next
    Catch ex As Exception
      MsgBox(ex.Message)
    End Try
  End Sub

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

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