MsgBox (« limite Kredit Tidak Cukup… ! » et _
vbCrLf et _
« Sisa Piutang » et vbTab et « = » et ERV_Global.Format_Number (dblSisaPiutang) et _
vbCrLf et _
« AINSI Belum Faktur » et vbTab et « = » et ERV_Global.Format_Number (dblSisaSOBelumFaktur) et _
vbCrLf et _
« Total » et vbTab et vbTab et « = » et ERV_Global.Format_Number (dblSisaSOBelumFaktur + dblSisaSOBelumFaktur) et _
vbCrLf et _
« Limiter Kredit » et vbTab et « = » et ERV_Global.Format_Number (dblLimitKredit) et _
vbCrLf et _
« Limite de Sisa » et vbTab et vbTab et « = » et ERV_Global.Format_Number (dblLimitKredit - dblSisaSOBelumFaktur + dblSisaSOBelumFaktur) et _
vbCrLf, _
MsgBoxStyle.Information, Me.Text)
|