tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板) [ツリー表示へ]   [Home]
一括表示(VB.NET VB2005)
タイトルファイル読込み時、行単位のバイト数取得方法
記事No3537
投稿日: 2006/04/24(Mon) 15:21
投稿者POD
[OSのVer]:Windows XP SP2   [VBのVer]:VB.NET 2005 
教えて下さい。

以下のコードのようにテキストファイルの1行を読み込んだ時のバイト数の取得はどのようにすれば

いのでしょうか?ちなみにテキストファイルには半角全角混在しています。VB6等ではLENB関

なるものがあったと思うのですがVB 2005ではどのようにしたら実現可能でしょうか。

        Dim sr As New System.IO.StreamReader("C:\TEXT.txt", System.Text.Encoding.
Default)

        sr.ReadLine
        sr.Close()

宜しくお願いします。

[ツリー表示へ]
タイトルRe: ファイル読込み時、行単位のバイト数取得方法
記事No3538
投稿日: 2006/04/24(Mon) 15:56
投稿者Blue
バイト数とは何を基準にしていますか?

Shift_JISコードにしたとき

12あ    は 4バイト
あいう  は 6バイト

ということでしょうか?それとも別のコードでのバイト数でしょうか?

[ツリー表示へ]
タイトルRe^2: ファイル読込み時、行単位のバイト数取得方法
記事No3539
投稿日: 2006/04/24(Mon) 17:34
投稿者POD
[OSのVer]:Windows    [VBのVer]:VB.NET  
> バイト数とは何を基準にしていますか?
>
> Shift_JISコードにしたとき
>
> 12あ    は 4バイト
> あいう  は 6バイト
>
そうです。
12あ    は 4バイト
あいう  は 6バイト

[ツリー表示へ]
タイトルRe^3: ファイル読込み時、行単位のバイト数取得方法
記事No3540
投稿日: 2006/04/24(Mon) 18:01
投稿者POD
[OSのVer]:Windows    [VBのVer]:VB.NET 2005
すいません。自己解決致しました。
Dim A As Integer = 0
Dim B As String = ""
Dim sr As New System.IO.StreamReader("C:\TEXT.txt", System.Text.Encoding.Default)

B = sr.ReadLine
A = System.Text.Encoding.Default.GetByteCount(B)

sr.Close()

上記コードでいけました。
すいませんでした。

[ツリー表示へ]