dim 画像(2) as image
dim 変換画像 as bitmap
for i= 0 to 2
  変換画像(i)=Directcast(画像(i),bitmap)
next
SaveMultiTiff("マルチ.tif", 変換画像, EncoderValue.CompressionLZW)

この方法で、エラーはなくなってTiffファイルができていました
ありがとうございました

現在、学校で使う「採点のアシスト」のプログラムを作ってまして
　①マルチTiffのファイルを読み込む
　②各設問の解答欄の枠を設定する
　③同じ問題を、画面上に並べて、○なのか✕なのか部分点なのかを入力
　④採点結果（点数）を、CSVファイルで出力
　ここまでができています

　今は、生徒の答案の画像データに、○✕部分点を書き込んだ画像データを作成して出力
　ここを作っています

今でも、VB6.0で可能なものはVB6.0で作ってまして
まだまだ、わからないことだらけです
これからも、よろしくお願いします