TAILIEUCHUNG - GIÁO TRÌNH MICOSOFT VISUAL BASIC - Chương 7 Scrollbar – Image – Timer

Chương 7 Scrollbar – Image – Timer I. SCROLLBAR Là một đối tượng điều khiển dùng chọn một giá trị trong một khoảng cố định cho trước một cách trực quan. Có hai loại thanh cuộn: thanh cuộn dọc (VScrollbar) và thanh cuộn ngang (HScrollbar) | Giáo trình Visual Basic 69 Chương 7 Scrollbar - Image - Timer I. SCROLLBAR Là một đối tượng điều khiển dùng chọn một giá trị trong một khoảng cố định cho trước một cách trực quan. Có hai loại thanh cuộn thanh cuộn dọc VScrollbar và thanh cuộn ngang HScrollbar 1. Các thuộc tính Min Qui định giá trị cực tiểu của thanh cuộn Max Qui định giá trị cực đại của thanh cuộn Value Giá trị đang được chọn của thanh cuộn phụ thuộc vào vị trí của con chạy trên thanh cuộn. Giá trị này có thể đọc từ vị trí của con chạy hoặc gán trong chương trinh. SmallChange Qui định khoảng tăng giảm của giá trị chọn trên thanh cuộn mỗi khi bấm nút mũi tên ở hai đầu default 1 LargeChange Qui định khoảng tăng giảm của giá trị chọn trên thanh cuộn mỗi khi click trên vùng chạy của con chạy default 1 Khi một thanh cuộn được tạo ra trên form luôn luôn cần định nghĩa các giá trị min và max 2. Sự kiện Change Sự kiện xảy ra sau khi con chạy thay đổi vị trí hoặc thuộc tính value thay đổi Scroll Sự kiện xảy ra khi con chạy thay đổi vị trí hoặc thuộc tính value thay đổi 3. Ví dụ Thiết kế form chọn màu bằng cách phối hợp 3 màu cơ bản RGB. Giá trị của các thành phần màu sẽ được chọn bằng thanh cuộn. Màu chọn được thể hiện bằng đối tượng Shape. Hình Thiết kế form chọn màu Các đối tượng trên form được chọn như sau Nguyễn Đăng Quang 70 Giáo trình Visual Basic Đối tượng Shape Các Textbox Mảng Thuộc tính Giá trị Thuộc tính Giá trị Name Shape1 Name txtColor FillStyle 0 - Solid Đối tượng Hscrollbar mảng Shape 0 - Rectangle Thuộc tính Value Name hsbColor Min 0 Max 255 Value 100 Viết lệnh cho sự kiện Form_Load như sau Private Sub Form_Load RGB hsbColor 0 .Value hsbColor 1 .Value hsbColor 2 .Value End sub Viết lệnh cho sự kiện Change của các thanh cuộn như sau Private Sub hsbColor_Change Index As Integer TxtColor Index .Text hsbColor Index .Value ChangeFillColor End Sub Định nghĩa sub ChangeFillColor trong phần General như sau Sub ChangeFillColor RGB hsbColor 0 .Value .

TỪ KHÓA LIÊN QUAN
TAILIEUCHUNG - Chia sẻ tài liệu không giới hạn
Địa chỉ : 444 Hoang Hoa Tham, Hanoi, Viet Nam
Website : tailieuchung.com
Email : tailieuchung20@gmail.com
Tailieuchung.com là thư viện tài liệu trực tuyến, nơi chia sẽ trao đổi hàng triệu tài liệu như luận văn đồ án, sách, giáo trình, đề thi.
Chúng tôi không chịu trách nhiệm liên quan đến các vấn đề bản quyền nội dung tài liệu được thành viên tự nguyện đăng tải lên, nếu phát hiện thấy tài liệu xấu hoặc tài liệu có bản quyền xin hãy email cho chúng tôi.
Đã phát hiện trình chặn quảng cáo AdBlock
Trang web này phụ thuộc vào doanh thu từ số lần hiển thị quảng cáo để tồn tại. Vui lòng tắt trình chặn quảng cáo của bạn hoặc tạm dừng tính năng chặn quảng cáo cho trang web này.