> Nah, yang menjadi pertanyaan saya dengan metode Printer.Print Tab(2),
> gimana caranya agar berapapun TAB akan mencetak rata Kanan dan seperti ini
> hasilnya
>
>     10
>   100
> 1000

Logikanya, tinggal tambahin spasi di depan kata yang pertama dan kedua
agar bisa rata kanan.

Private Function RataKanan(Kata as string,Lebar as integer) as string
  dim i as integer
  i=lebar-len(kata)
  rataKanan=tab(i)+kata
end function

Cara pakainya :

printer.print Tab(2) + ratakanan(10,4)

Best Regards,
David J M

Advess
ISV and IT Consultant

Kirim email ke