ありがとうございました。
お陰様でレコード件数表示ができました。
> 私がテストしたコードをそのまま書きます。
こちらでのテストではそのままのコピー・ペーストでは幾つかのエラーがでましたので
> Dim tdbfh As TDBFh を
Dim th As TDBFh に書き換え。
> Dim th As TThLog を
Dim log As TThLog に書き換え。
私のコードで何が悪かったのかは後で考えて見ます。
まずは Hamlog.hdb を直接読み書き出来る入り口にたどり着きました。
HDBの全てをCSVに書き出しとか、色々試して見ます。
分からない事があったらまた書き込みさせて頂きますので
今後ともよろしくお願いします。
MNI TNX and FB DX CUL