ユーザ定義変数の中身を一気にクリアするには

解決


you  2003-11-19 23:45:10  No: 110054

お世話になります。
type hogehage
    hoge as string
    hage as string
end type
dim data as hogehage
こんな感じで宣言したもののデータをまとめて消去するにはどうしたらいいのでしょうか?
ひとつひとつ
data.hoge = vbnullstring
こんな感じで指定してあげないといけないのでしょうか?


とろ  2003-11-20 00:00:54  No: 110055

例えば、こんな感じ?

Option Explicit
Private Type typeData
  I As Integer
  D As Date
  s As String
End Type
Private Declare Sub ZeroMemory Lib "kernel32.dll" Alias "RtlZeroMemory" (Destination As Any, ByVal length As Long)
Private Sub Form_Load()
  Dim data As typeData
  data.I = 999
  data.D = #11/4/2003#
  data.s = "askdfjlksjdf"
  Debug.Print data.I, data.D, data.s
  ZeroMemory data, LenB(data)
  Debug.Print data.I, data.D, data.s
End Sub


you  2003-11-20 01:09:01  No: 110056

お答えありがとうございます。
>Private Declare Sub ZeroMemory Lib "kernel32.dll" Alias "RtlZeroMemory" (Destination As Any, ByVal length As Long)
この行が何をしているのか全く分からないのですが、とりあえずこれを書いておいて
ZeroMemory data, LenB(data)
こうしてしまえばばっちり消えました!


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

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






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