Den privata suben Button1_Click (den ByVal avsändaren som System.Object, ByVal e som System.EventArgs) behandlar Button1.Click
Button1.Enabled = falskt
Dunkla myProcess som ny System.Diagnostics.Process
myProcess.StartInfo.FileName = ”C:\oldf\MYEXCEL\calconepercentile.xls”,
myProcess.EnableRaisingEvents = True
AddHandler myProcess.Exited, AddressOf myProcess_Exited
myProcess.Start ()
Avsluta suben
Privat myProcess_Exited under (den ByVal avsändaren som anmärker, ByVal e som System.EventArgs)
Button1.Enabled = True
'… mer kodifierar här…,
Avsluta suben
|