saya gunakan formula sbb:
AmountCurrency: Format([aMOUNT],'Standard')
RA-Currency: RightAL(([AmountCurrency]),30-Len([AmountCurrency])))
RightAligning: RightAL(CDbl([Amount]),20-Len([Amount]))
Fungsi RightAL sbb:
'---------start------
Function RightAL(ByVal iValues As String, ByVal intWidth As Integer) As String
sSpace = intWidth - Len(iValues)
RightAL = Space(sSpace) & iValues
End Function
'------end--------
Terlihat kalo hanya pake format hasilnya masih rata kiri.
mdh2-an membantu.
----- Original Message -----
From: [EMAIL PROTECTED]
To: [email protected]
Sent: Wednesday, November 07, 2007 01:41
Subject: [belajar-access] List Box rata kanan
> Dear All,
>
> Bagaimana ya caranya agar data yang ada di list box bisa rata kanan.
> Biar bisa seperti di bawah ini
> 10000
> 200
> 2000
> 20000
>
> Dan maaf jika pernah dibahas
> Thanks & Regards
>
> Narupi
>
> Infineon Batam
> Incoming Material
> Cat Bat Op SS
> Tel: 0778 611204 ext 405
> Fax: 0778 612127
> Cel: 0778 7226234
> Email <mailto:Email:[EMAIL PROTECTED]> :[EMAIL PROTECTED]
>
> ****Visit us at: www.infineon.com *****
>
> *Disclaimer*
> "This e-mail and any attachments are confidential and may be subject
> to legal or some other professional privilege. They are intended
> solely for the attention and use of the named addressee(s). If you are
> not the named addressee(s) you must not use, disclose, retain or
> reproduce all or any part of the information contained in this e-mail
> or any attachments. Any unauthorised use or disclosure may be
> unlawful. If you have received this e-mail by mistake, please inform
> the sender immediately and delete it and all copies from your system
> and destroy
> any hard copies of it."
>
>
>
<<form_Contoh.gif>>
