nazanin0
چهارشنبه 04 اسفند 1389, 09:49 صبح
سلام
از اینکه سوالم پیش پا افتاده است از شما اساتید عذر خواهی می کنم لطفاً راهنماییم کنید
برنامه در صورتی که بانک attach نباشه در ابتدا فرمی رو باز میکنه که بانک رو اتچ کنه و بعد از تأیید اتچ فرم لاگین باز میشه زمانی که دکمه خروج فرم لاگین رو کلیک می کنم اگر گزینه بلی رو فشار بدم کل برنامه بسته میشه که تا این جا درسته ولی زمانی که دکمه خیر رو می زنم برنامه باز هم بسته میشه که علتش رو نمی دونم.
البته اگه Sturtup فرم لاگین باشه مشکلی نیست درست کار می کنه من در چند جای دیگه از این کد استفاده کردم مشکلی نبود لطفاً راهنماییم کنید که باید چیکار کنم؟
کد زیر مربوط به دکمه خروج فرم لاگین است
Private Sub btn_cancle_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_cancle.Click
Dim result As MsgBoxResult
Dim MsgFarsi As MsgBoxStyle = MsgBoxStyle.YesNo Or MsgBoxStyle.Question
PersianMsgbox.PatchMsgBox(New String() {"", ""})
result = MsgBox(" ", MsgFarsi, " ")
If result = MsgBoxResult.No Then
End
End If
End Sub
از اینکه سوالم پیش پا افتاده است از شما اساتید عذر خواهی می کنم لطفاً راهنماییم کنید
برنامه در صورتی که بانک attach نباشه در ابتدا فرمی رو باز میکنه که بانک رو اتچ کنه و بعد از تأیید اتچ فرم لاگین باز میشه زمانی که دکمه خروج فرم لاگین رو کلیک می کنم اگر گزینه بلی رو فشار بدم کل برنامه بسته میشه که تا این جا درسته ولی زمانی که دکمه خیر رو می زنم برنامه باز هم بسته میشه که علتش رو نمی دونم.
البته اگه Sturtup فرم لاگین باشه مشکلی نیست درست کار می کنه من در چند جای دیگه از این کد استفاده کردم مشکلی نبود لطفاً راهنماییم کنید که باید چیکار کنم؟
کد زیر مربوط به دکمه خروج فرم لاگین است
Private Sub btn_cancle_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_cancle.Click
Dim result As MsgBoxResult
Dim MsgFarsi As MsgBoxStyle = MsgBoxStyle.YesNo Or MsgBoxStyle.Question
PersianMsgbox.PatchMsgBox(New String() {"", ""})
result = MsgBox(" ", MsgFarsi, " ")
If result = MsgBoxResult.No Then
End
End If
End Sub