Đang chuẩn bị liên kết để tải về tài liệu:
Tự học Visual Basic phần 3

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 6.0 - 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 Data.35 Lap trính vói ky thuât DAO.46 Lap trính vói ADO phan I .58 http ebooks.vdcmedia.com TU HOC VISUAL BASIC 6.0 - PHAN 3 2 http ebooks.vdcmedia.com TỰ HỌC VISUAL BASIC 6.0 - 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 Me.Print strLine Print on Form Picturel.Print 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 Me.Font.Size Me.Font.Size i Define Color using Function QBColor Me.ForeColor QBColor i Print without moving to next line. Note the semicolon Me.Print Str i Next End Sub http .