mas toni, thx ya untuk bantuannya
sukses mas...

Toni Rahayu <[EMAIL PROTECTED]> wrote:


Coba mas scriptnya ganti pake ini :

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
If UnloadMode = 0 Then
If cmbjenis.Text = "TUNAI" Then
If Format(txtgrandtotal, "#") > Format(txtbayar, "#") Then
MsgBox "Jumlah bayar Lebih Kecil Dari Grand Total", vbInformation,
""
Cancel = 1
End If
End If
End If
End Sub

Semoga membantu

yusup andrias <yorkie_3mp3r4d0r@yahoo.com> on 27/07/2006 02:35:39 PM

Please respond to Programmer-VB@yahoogroups.com

To: Programmer-VB@yahoogroups.com
cc: (bcc: Toni Rahayu/IT/domino_srv)

Subject: [Programmer-VB] tany form_unload

hai rekan, i ada masalah neh
Private Sub Form_Unload(Cancel As Integer)
If cmbjenis.Text = "TUNAI" Then
If Format(txtgrandtotal, "#") > Format(txtbayar, "#") Then
MsgBox "Jumlah bayar Lebih Kecil Dari Grand Total", vbInformation,
""
Exit Sub
End If
End If
unload me
end sub

nah kenapa jika saya masukkan nilai bayar lbh kecil dari totalharga form masih
tutup ya?

ada yang bisa bantu ga neh?tolong ya..
thx

---------------------------------
Yahoo! Messenger with Voice. Make PC-to-Phone Calls to the US (and 30+
countries) for 2

¢/min or less.





Toni Rahayu
PT. Omedata Electronics
IT Department
Hunting : (62-22) 6030805 Ext 121
Faxs : (62-22) 6030896
Homepage : http://toni.rahayu.tripod.com






Yahoo! Messenger with Voice. Make PC-to-Phone Calls to the US (and 30+ countries) for 2¢/min or less. __._,_.___

Wahana Programmer Groups Links

<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
    http://wahanaprogrammer.net

<*> Untuk menghubungi owner milis ini, kirim email ke:
    [EMAIL PROTECTED]

<*> Konsultasi pemrogramman bisa chat disini:
    Yahoo! Messenger: wahanaprogrammer





SPONSORED LINKS
Programmer Indonesia Basic programming language
Computer programming languages Programming languages


YAHOO! GROUPS LINKS




__,_._,___

Kirim email ke