Wurde das Programm zum ERSTEN mal gestartet? Mit diesen Tipp können Sie feststellen, ob das Programm zum ersten Mal auf dem Rechner gestartet worden ist.
Autor:   Grek Koch	Bewertung:	Views:  10.914
www.vb-future.net	System:  Win2k, WinXP, Win7, Win8, Win10, Win11	Beispielprojekt auf CD

Durch einen Eintrag in die Windows Registrierdatenbank kann man feststellen, ob das Programm zum ersten Mal gestartet wurde.

Public Class Form1
 
  Private Sub Form1_Load(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles MyBase.Load
 
    ' Registry-Eintrag // Programm zum ERSTEN mal gestartet?
    Dim KeyPath As String = "HKEY_CURRENT_USER\Software\PROGRAMM\"
    If My.Computer.Registry.GetValue(KeyPath, "FirstRun", 0) = 0 Then
      My.Computer.Registry.SetValue(KeyPath, "FirstRun", 1)
      MsgBox("Erster Start!")
    End If
 
  End Sub
 
End Class

Copyright ©2000-2024 vb@rchiv Dieter OtterAlle 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.