Saya mempunyai script Function seperti dibawah :
Field "Keterangan" isi datanya panjang.
Bagaimana caranya supaya data yang ditampilkan pada layar datanya semuanya
kelihatan, ( MULTILINE=TRUE)/ JIKA MARGIN KANAN STOP, KEMUDIAN BALIK KE WAL
DARI KIRI DAN SETERUSNYA.
Karena dengan script dibawah data yang ditampilkan pendek/terpotong(tidak
muncul semua.
Apa yang perlu ditambahkan pada script dibawah supaya data yang ditampilkan
supaya data mucul semua.
Terima kasih.
Function Cetaks()
Dim oRS1 As ADODB.Recordset
Set oRS1 = New ADODB.Recordset
oRS1.Open "select * from Trans1 WHERE no_Mo = '" & Text1.Text & "' ", oConn
Tampilkan.Show
Tampilkan.Font = "Courier New"
Tampilkan.Print
Tampilkan.Print
Tampilkan.Print Tab(5); " No : "; oRS1!no_mo
Tampilkan.Print Tab(5); " Time : "; oRS1!jam_trs
Tampilkan.Print Tab(5); " Description : "; oRS1!keterangan
Tampilkan.Print
Tampilkan.Print
oRS1.Close
End Function
[Non-text portions of this message have been removed]
