... tri: 0-Solid, 1-Transparent, 2- Horizontal Line, 3-Vertical Line, 4- Upward Diagonal, 5-Downward Diagonal, 6-Cross, 7-Diagonal Cross Hình 9.1: Các mẫu nét vẽ Giáo trình Visual Basic 6.0 101 Private ... (0,0) - (100 ,100 ) Picture1.Line - Step (50,50) ’ Vẽ tiếp từ (100 ,100 ) đến (150,150) Picture1.Line (0,0) - (100 ,100 ), vbRed , B ‘Vẽ hình chữ nhật với nét vẽ màu đỏ Picture1.Line (0,0) - (100 ,100 ), ... + 200, ScaleHeight / 2 - 200), 1500, vbBlack, -( PI * 2), - (PI / 2) FillColor = vbCyan Giáo trình Visual Basic 6.0 97 ScaleWidth = XMAX - XMIN ScaleHeight = -( YMAX - YMIN) ' Vẽ lại...