VB6ユーザー定義にてお願いいます

解決


  2007-06-18 12:40:34  No: 98995

VB6にて教えてください。
ユーザー定義にて、 a1とa2をひとまとめにした一つのデータとして扱いたいのです。
下記例を実行しますと、「コンパイルエラー 型が一致しません」が、
Print #1, T_abcにでます。
よろしくお願いします。

  ** 標準モジュール **
Type abc
 a1 As String * 6
 a2 As String * 4
End Type
Public T_abc As abc
  ** フォームモジュール **
Private Sub Form_Load()
 T_abc.a1 = "070616" '代入
 T_abc.a2 = "1234"   '代入

Open "test.txt" For Output As #1
 Print #1, T_abc
Close #1

End Sub


我龍院  2007-06-18 17:29:45  No: 98996

ユーザー定義型の保存は、バイナリ モード (Binary)で行います。


  2007-06-18 19:35:06  No: 98997

ファイル形式は異なりますが
Open "test" For Random As #1 Len = Len(T_abc)
で、解決しました。
  ありがとうございました。


※返信する前に利用規約をご確認ください。

※Google reCAPTCHA認証からCloudflare Turnstile認証へ変更しました。






  このエントリーをはてなブックマークに追加