rtrtrtrtrtrtrt
Printable View
rtrtrtrtrtrtrt
VB Code:
x = MsgBox("Update Complete!" + vbCrLf + vbCrLf + "The updated file has been placed in C:\", vbOK, "") If x = vbOK Then Kill App.Path & "\Program.exe" Unload Me End If
Change the "vbOKOnly to "vbOK".
Well actually in this code
the user has no choice of anything except OK, so you might as well just doVB Code:
x = MsgBox("Update Complete!" + vbCrLf + vbCrLf + "The updated file has been placed in C:\", vbOK, "") If x = vbOK Then Kill App.Path & "\Program.exe" Unload Me End If
VB Code:
MsgBox "Update Complete!" & vbCrLf &vbCrLf &"The updated file has been placed in C:\", vbOK, "" Kill App.Path & "\Program.exe" Unload Me