Mencetak Dengan Pengaturan Tata Letak Menggunakan Visual Basic 6.0
Salam sejahtera teman visual basic 6.0, mirip kita ketahui semuanya bagi kalangan pengguna komputer dalam mengoperasikan sebuah aplikasi sering kali kita menggunakan fasilitas pencetakan sebuah data yang pada umumnya telah ada disetiap aplikasi khususnya windows. Biasanya sebelum melakukan pencetakan sebuah data baik itu dokumen berupa gambar, ukiran pena tentunya data tersebut kita rapihkan terlebih dahulu mirip untuk sebuah ukiran pena menggunakan Rata kanan, rata kiri atau tengah.
Nahh…pada kesempatan kali ini admin akan membuatkan sebuah source code ringan yaitu Mencetak dengan Pengaturan Tata Letak Menggunakan Visual Basic 6.0 dan langsung saja buka Ms. Visual Basic 6.0 – StandardEXE selanjutnya buatlah sebuah form dan tambahkan beberapa komponen pendukung seperti
1. 1 Buah CommandButton
2. 3 Buah OptionButton
3. 1 Buah Module (sebagai deklarasi function)
Seperti tampilan gambar di bawah ini
Copykan syntak di bawah ini ke module
Public Sub PrintAlignedText(S As String, Alignment As String)
Printer.FontSize = 14
Printer.FontBold = True
Select Case Alignment
Case “Center”
Printer.CurrentX = (Printer.ScaleWidth – Printer.TextWidth(S)) \ 2
Case “Left”
Printer.CurrentX = 0
Case “Right”
Printer.CurrentX = Printer.ScaleWidth – Printer.TextWidth(S)
End Select
Printer.Print S
Printer.EndDoc
End Sub
Selanjutnya double klik pada commandbutton dan copykan syntak dibawah ini
Dim nTulisan As String
nTulisan = “GUDANG SOURCODE VISUAL BASIC 6.0”
If Option1.Value = True Then: Call PrintAlignedText(nTulisan, “Left”)
If Option2.Value = True Then: Call PrintAlignedText(nTulisan, “Center”)
If Option3.Value = True Then: Call PrintAlignedText(nTulisan, “Right”)
Bila dirasa semuanya telah simpulan jangan lupa save kemudian RUN/F5, pilih salah satu OptionButton kemudian klik CommandButton. Jika PC agan terhubung dengan sebuah printer maka printer tersebut akan mencetak sebuah ukiran pena dengan tata letak sesuai yang agan pilih mirip gambar di bawah ini
Untuk lebih jelasnya agan-agan sanggup langsung download source code ini pada link download yang telah admin sediakan di simpulan pembahasan ini. Terima kasih atas kunjungannya.
Link Download Source Code Mencetak dengan Pengaturan Tata Letak Menggunakan Visual Basic 6.0
