process.start ("blabla.exe")
If MsgBox("Would You Like To Register This Product", vbOKCancel, "Register?") = vbOK Then
'dosomething
End If

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If my.settings.trial = "0" Then
msgbox("Your Trial Has Expired. Please Register")
Else
label1.text = My.Settings.Trial
Label1.text = label1.text - 1
My.Settings.Trial = label1.text
End Sub