Tham khảo tài liệu 'tự học visual basic phần 3', công nghệ thông tin, kỹ thuật lập trình phục vụ nhu cầu học tập, nghiên cứu và làm việc hiệu quả | TU HOC VISUAL BASIC - PHAN 3 1 MUC LUC Dùng Do Hoa Phan II .3 Dùng Do Hoa Phan III .12 Cö sô dtf lieu Database .23 Dùng Control Lap trính vói ky thuât Lap trính vói ADO phan I .58 http TU HOC VISUAL BASIC - PHAN 3 2 http TỰ HỌC VISUAL BASIC - PHẦN 3 3 Dùng Đồ Họa Phần II In trên màn ảnh VB6 có method Print cho ta in thẳng trên Form PictureBox hay Printer. Ba loại control này được coi như những khung vải mà họa sĩ vẽ lên. Bạn hãy khởi động một chương trình VB6 mới. Đặt lên form một PictureBox tên Picture1 và một button tên CmdPrintTenLines với Caption Print Ten Lines. DoubleClick lên button này và viết code dưới đây Private Sub CmdPrintTenLines_Click Dim i As Integer String variable used for display Dim strLine As String Write 10 lines one under the other For i 1 To 10 strLine This is line CStr i strLine Print on Form strLine Print on Picturel Next End Sub Bạn hãy chạy thử program rồi click nút Print Ten Lines. Trong trường hợp này ta dùng default Font và Color để in 10 hàng. Sau mỗi Print chương trình tự động xuống hàng. Kế đó thêm một button tên CmdPrintFontSizes với Caption Print Font Sizes. DoubleClick lên button này và viết code dưới đây Private Sub CmdPrintFontSizes_Click Dim i As Integer Print numbers 1 to 10 one after the other on the same line For i 1 To 10 Define Font size i Define Color using Function QBColor QBColor i Print without moving to next line. Note the semicolon Str i Next End Sub http .
