ZeroMemory-Funktion Diese Funktion setzt eine angegebene Länge von Bytes einer Variable auf "Null".
Betriebssystem:  Win95, Win98, WinNT 3.1, Win2000, WinME	Views:  241

Deklaration:

Declare Sub ZeroMemory Lib "kernel32.dll" _
  Alias "RtlZeroMemory"  ( _
  Destination As Any, _
  ByVal Length As Long)

Beschreibung:
Diese Funktion setzt eine angegebene Länge von Bytes einer Variable auf "Null".

Parameter:

Destination

Erwartet eine Variable, die mit den Nullen überschrieben werden soll. Wird eine Long- oder String-Variable übergeben, muss diesen das Wort "ByVal" vorrausstehen.

Rückgabewert:
keiner

Beispiel:

Private Declare Sub FillMemory Lib "kernel32.dll" _
  Alias "RtlFillMemory"  ( _
  Destination As Any, _
  ByVal Length As Long, _
  ByVal Fill As Byte)
Private Declare Sub ZeroMemory Lib "kernel32.dll" _
  Alias "RtlZeroMemory"  ( _
  Destination As Any, _
  ByVal Length As Long)

' Beispiel mit API- Funktionen
Private Sub Command1_Click()
  Dim TmpStr As String * 16
 
  ' Variable mit 16 Sechsen füllen
  FillMemory ByVal TmpStr, Len(TmpStr), Asc("6")
  MsgBox TmpStr, vbInformation, "Der inhalt von TmpStr"
 
  ' Inhalt der Variable löschen
  ZeroMemory ByVal TmpStr, Len(TmpStr)
  MsgBox TmpStr, vbInformation, "Der inhalt von TmpStr"
End Sub

' Beispiel mit VB Bordmitteln
Private Sub Command2_Click()
  Dim TmpStr As String * 16
 
  ' Variable mit 16 Sechsen füllen
  TmpStr = String(Len(TmpStr), "6")
  MsgBox TmpStr, vbInformation, "Der inhalt von TmpStr"
 
  ' Inhalt der Variable löschen
  TmpStr = ""
  MsgBox TmpStr, vbInformation, "Der inhalt von TmpStr"
End Sub