Pa zasto ne bi hvatao DialogResult pa na osnovu toga pokretao funkciju ??
Code:
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'Prikazi Drugu formu i ako
'je rezultat klika OK onda pozovi
'Funkciju Poruka
'Proba je nzaiv druge forme
If Proba.ShowDialog = Windows.Forms.DialogResult.OK Then
Poruka()
Else
MessageBox.Show("Kliknuli ste na button cancel")
End If
End Sub
Private Function Poruka()
Dim msg As String
msg = MessageBox.Show("Poruka")
Return msg
End Function
End Class
Sto mozes danas ne ostavljaj za sutra!