Just nu i M3-nätverket
Jump to content

Enkelt program


Calle-

Recommended Posts

Just det, jag behöver hjälp med ett program som jag tänkt att göra...

Jag vill att när man startar programet så ska det vara öppet i 5sek och efter 5sek ska programet stängas och öppna c:\windows\hej.exe

någon som kan göra det eller förklara hur man gör??

Tack på förhand!

Calle

Link to comment
Share on other sites

tja...

 

Du kan använda en timerkontroll för att hålla koll på tiden. Denna är inte riktigt exakt men om du skall vänta i cirka fem sekunder, så fungerar den utmärkt.

Timerkontrollen har en egenskap som heter 'interval' och denna talar om vilket intervall kontrollen skall höja eventet 'Timer', mätt i millisekunder. För att underlätta kan du sätta den till 1000, så att du får sekunder.

 

Koden borde sedan vara något sånt här:

 

Private Const ANTAL_SEKUNDER_ATT_VÄNTA=5

 

Private SUb Form_Load()

Timer1.Interval=1000

Timer1.Enabled=True

End Sub

 

Private Sub Timer1_Timer()

Static iSekunder as Integer

iSekunder=iSekunder + 1

If iSekunder>=ANTAL_SEKUNDER_ATT_VÄNTA Then

Shell("c:\windows\hej.exe")

Timer1.Enabled = False

unload me

End If

End Sub

 

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.



×
×
  • Create New...