MsgBox (“limite Kredit Tidak Cukup…!„ & _
vbCrLf & _
“Sisa Piutang„ & vbTab & “=„ & ERV_Global.Format_Number (dblSisaPiutang) & _
vbCrLf & _
“COSÌ Belum Faktur„ & vbTab & “=„ & ERV_Global.Format_Number (dblSisaSOBelumFaktur) & _
vbCrLf & _
“Totale„ & vbTab & vbTab & “=„ & ERV_Global.Format_Number (dblSisaSOBelumFaktur + dblSisaSOBelumFaktur) & _
vbCrLf & _
“Limitare Kredit„ & vbTab & “=„ & ERV_Global.Format_Number (dblLimitKredit) & il _
vbCrLf & _
“Limite di Sisa„ & vbTab & vbTab & “=„ & ERV_Global.Format_Number (dblLimitKredit - dblSisaSOBelumFaktur + dblSisaSOBelumFaktur) & _
vbCrLf, _
MsgBoxStyle.Information, Me.Text)
|