README.md

December 5, 2022 ยท View on GitHub

Only one Instance

Description

If the programm runs, you can't start it again!

More Info

base module(insert the code)

change in project/options "form1" into "Sub Main"

Submitted On
ByDUKE
LevelUnknown
User Rating4.0 (4 globes from 1 user)
CompatibilityVB 4.0 (32-bit), VB 5.0, VB 6.0
CategoryComplete Applications
WorldVisual Basic
Archive File

Source Code

Sub Main()
Dim OldTitle$
  If App.PrevInstance Then
    OldTitle = App.Title
    App.Title = "Newapp.exe"
    AppActivate OldTitle
    End
  End If
  Form1.Show
End Sub