MsgBox (“límite Kredit Tidak Cukup…!” y _
vbCrLf y _
“Sisa Piutang” y vbTab y “=” y ERV_Global.Format_Number (dblSisaPiutang) y _
vbCrLf y _
“TAN Belum Faktur” y vbTab y “=” y ERV_Global.Format_Number (dblSisaSOBelumFaktur) y _
vbCrLf y _
“Total” y vbTab y vbTab y “=” y ERV_Global.Format_Number (dblSisaSOBelumFaktur + dblSisaSOBelumFaktur) y _
vbCrLf y _
“Limitar Kredit” y vbTab y “=” y ERV_Global.Format_Number (dblLimitKredit) y el _
vbCrLf y _
“Límite de Sisa” y vbTab y vbTab y “=” y ERV_Global.Format_Number (dblLimitKredit - dblSisaSOBelumFaktur + dblSisaSOBelumFaktur) y _
vbCrLf, _
MsgBoxStyle.Information, Me.Text)
|