Option Explicit

Private Sub Form_Resize()
If WindowState = vbMaximized Then
MsgBox "Şu anda Formunuz en büyük boyutuna ulaştı. Bu konumda olmasını istediğiniz işleri bu satıra yazacaksınız", vbInformation, "mayhemious"
ElseIf WindowState = vbMinimized Then
MsgBox "Şu anda Formunuz TaskBar'a düşürülüyor. Bu konumda olmasını istediğiniz işleri bu satıra yazacaksınız", vbInformation, "mayhemious"
End If
End Sub