vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
sevDataGrid - G?nnen Sie Ihrem SQL-Kommando diesen kr?nenden Abschlu?!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   RSS-Feeds  | Newsletter  | Impressum  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2015
 
zurück
Rubrik: Windows/System22.03.05
FillMemory-Funktion

Diese Funktion füllt eine beliebige Variable oder ein Array mit einer bestimmten Anzahl eines beliebigen Wertes.

Betriebssystem:  Win95, Win98, WinNT 3.1, Win2000, WinMEViews:  3.827 

Summer-Special bei Tools & Components!
Gute Laune Sommer bei Tools & Components
Top Summer-Special - Sparen Sie teilweise über 100,- EUR
Alle sev-Entwicklerkomponenten und Komplettpakete jetzt bis zu 25% reduziert!
zum Beispiel:
  • Developer CD nur 455,- EUR statt 569,- EUR
  • sevDTA 2.0 nur 224,30 EUR statt 299,- EUR
  •  
  • vb@rchiv   Vol.6 nur 18,70 EUR statt 24,95 EUR
  • sevCoolbar 3.0 nur 58,70 EUR statt 69,- EUR
  • - Werbung -Und viele weitere Angebote           Aktionspreise nur für kurze Zeit gültig

    Deklaration:

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

    Beschreibung:
    Diese Funktion füllt eine beliebige Variable oder ein Array mit einer bestimmten Anzahl eines beliebigenWertes.

    Parameter:
    DestinationErwartet eine Variable, die mit denWerten gefüllt werden soll. Wird eine Long- oder String-Variable übergeben, mussdiesem das Wort "ByVal" vorrausstehen.
    LengthErwartet die Länge der Bytes, die mit demWert in "Fill" überschrieben werden sollen.
    FillErwartet einen Wert, der die angegebeneMenge von Bytes überschreibt.

    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

    Diese Seite wurde bereits 3.827 mal aufgerufen.

    nach obenzurück
     
       

    Druckansicht Druckansicht Copyright ©2000-2015 vb@rchiv Dieter Otter
    Alle Rechte vorbehalten.

    Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

    Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel