C# と VB.NET の質問掲示板

VB6 の高速化コード集。
可読性に難のあるコードも多いので、使いどころに注意。
http://www.xbeat.net/vbspeed/


■No4350 (ｍあ さん) に返信
>>記事の内容を読み違えているような……。
> 読み違えています？バッファリングのことだと認識していたのですが・・・
バッファです。バッファなんですが、記事中で書かれていた内容は、
　『32000 を指定すると高速アクセスできる。』
　『関数内で合計 65000 程度のバッファしか確保できない。』
であって、
　「32000 〜 65000 の範囲を指定することで、書き込み処理を高速化出来る」
では無いと思いますよ。

元の記事にもヘルプにも、65000 という値を Len に指定できるとは
書かれていませんし、実際に指定すると、実行時エラーとなりましたから。

> ノンバッファリングの Print があるってことですか？
> VB の書き込みはバッファリング無しが基本なんですか？

文字列連結の話は、たとえば
　Set RS = Con.Execute(SQL)
　Do Until RS.EOF
　　S = S & RS.Collect("ID") & ","
　　RS.MoveNext
　Loop
　Print #f, S;
のような書き方をすると低速であり、
　Set RS = Con.Execute(SQL)
　Do Until RS.EOF
　　Print #f, RS.Collect("ID") ","
　　RS.MoveNext
　Loop
の方が結果的には高速であった…という話です。

もっとも、Recordset のテキスト化なら、GetString メソッドを併用した方が早いですけれどね。


でもって、Mid ステートメントの件は：
------------
Dim S As String

S = "aaa"
Debug.Print StrPtr(S), "["; S; "]"
S = S & "bbb"
Debug.Print StrPtr(S), "["; S; "]"

S = "aaa   "
Debug.Print StrPtr(S), "["; S; "]"
Mid(S, 4) = "bbb"
Debug.Print StrPtr(S), "["; S; "]"
------------

後者(Midステートメント)では、同じアドレスがそのまま使われていることを確認できますが、
前者(& 演算子)では、文字列処理の前後で、変数のアドレスが変更されていることがわかります。

これは単純に連結すると、新たな文字列領域の確保・複写・元の領域の破棄が行われるためです。
そのため文字列が長くなればなるほど、加速度的に処理時間がかかるようになります。

Mid ステートメントは、最初に確保した文字列領域内を書き換える形で動作するので、
メモリの再確保等が行われず、高速に処理される…という話ですね。