Kinh doanh - Marketing
Kinh tế quản lý
Biểu mẫu - Văn bản
Tài chính - Ngân hàng
Công nghệ thông tin
Tiếng anh ngoại ngữ
Kĩ thuật công nghệ
Khoa học tự nhiên
Khoa học xã hội
Văn hóa nghệ thuật
Sức khỏe - Y tế
Văn bản luật
Nông Lâm Ngư
Kỹ năng mềm
Luận văn - Báo cáo
Giải trí - Thư giãn
Tài liệu phổ thông
Văn mẫu
Giới thiệu
Đăng ký
Đăng nhập
Tìm
Danh mục
Kinh doanh - Marketing
Kinh tế quản lý
Biểu mẫu - Văn bản
Tài chính - Ngân hàng
Công nghệ thông tin
Tiếng anh ngoại ngữ
Kĩ thuật công nghệ
Khoa học tự nhiên
Khoa học xã hội
Văn hóa nghệ thuật
Y tế sức khỏe
Văn bản luật
Nông lâm ngư
Kĩ năng mềm
Luận văn - Báo cáo
Giải trí - Thư giãn
Tài liệu phổ thông
Văn mẫu
Thông tin
Điều khoản sử dụng
Quy định bảo mật
Quy chế hoạt động
Chính sách bản quyền
Giới thiệu
Đăng ký
Đăng nhập
0
Trang chủ
Công Nghệ Thông Tin
Kỹ thuật lập trình
GIÁO TRÌNH MICOSOFT VISUAL BASIC - Chương 4 Các cấu trúc điều khiển
Đang chuẩn bị liên kết để tải về tài liệu:
GIÁO TRÌNH MICOSOFT VISUAL BASIC - Chương 4 Các cấu trúc điều khiển
Thành Tín
73
6
pdf
Đang chuẩn bị nút TẢI XUỐNG, xin hãy chờ
Tải xuống
Dạng 1: If then Chỉ có một viết sau then Ví dụ: Max = a If Max then end if Dạng này được sử dụng thay cho dạng 1 khi có nhiều lệnh sau then Dạng 3: If then elseif then . elseif then else end if Ví dụ: If a b then Max = a Else Max = b End if II. LỆNH CHỌN LỰA CASE Chọn lựa lệnh thực hiện theo giá trị Select Case . Case . | Giáo trình Visual Basic 6.0 35 Chương 4 Các cấu trúc điều khiển I. LỆNH ĐIỀU KIỆN IF Dạng 1 If Điều kiện then lệnh Chỉ có một Lệnh viết sau then Ví dụ Max a If Max b then max b Dạng 2 If Điều kiện then lệnh end if Dạng này được sử dụng thay cho dạng 1 khi có nhiều lệnh sau then Dạng 3 If Điều kiện 1 then lệnh 1 elseif Điều kiện 2 then lệnh 2 . elseif Điều kiện n then lệnh n else lệnh n 1 end if Ví dụ If a b then Max a Else Max b End if II. LỆNH CHỌN LỰA CASE Chọn lựa lệnh thực hiện theo giá trị Select Case Biểu thức . Case Danh sách trị n lệnh n Nguyễn Đăng Quang 36 Giáo trình Visual Basic 6.0 Case else lệnh n 1 End select Ví dụ Select Case Round Diem Case 0 to 4 Labell.Caption Kem Case 5 6 Label1.Caption Trung binh Case 7 8 Label1.Caption Khá Case 9 10 Label1.Caption Giỏi Case else Label1.Caption Không hợp lệ End select III. LỆNH LẶP FOR . NEXT Dạng For Biến Trị đầu to Trị cuối Step Bước tăng lệnh Next Biến lệnh được thực hiện từ trị đầu đến trị cuối giá trị của biến được thay đổi theo bước tăng Ví dụ Tính tổng các số nguyên từ 1 đến 10 S 0 For i 1 to 10 s s i Next i Tính tổng các số chắn For i 0 to 10 step 2 s s i Next i Tạo ra một chuỗi có 10 chữ a strS For i 1 to 10 strS strS a Next i Ví dụ Vòng lặp sau tạo ra 10 chuỗi với cùng nội dung Dim Words Chars MyString For Words 10 To 1 Step -1 For Chars 0 To 9 MyString MyString Chars Next Chars Giáo trình Visual Basic 6.0 37 MyString MyString Next Words IV. LỆNH LẶP DO . LOOP Dạng 1 Do while Điều kiện Lệnh Loop Các lệnh trong vòng lặp bắt đầu được thực hiện nếu điều kiện đúng và lặp lại cho đến khi nào điều kiện sai Ví dụ Dim I As Integer Dim strS As String i 1 Do while i 10 StrS strS a i i 1 Loop Dạng 2 Do Lệnh Loop Until điều kiện Các lệnh trong vòng lặp được thực hiện cho đến khi nào điều kiện đúng Ví dụ Dim I As Integer Dim strS As String i 1 Do StrS strS a i i 1 Loop Until I 10 Ví dụ Đếm số chữ số của 1 số nguyên dương Dim Dem So As Integer So Text1.Text Dem 0 Do So So 10 Dem Dem 1 Loop Until So 0 Ví dụ Tìm ước .
TÀI LIỆU LIÊN QUAN
GIÁO TRÌNH MICOSOFT VISUAL BASIC - Chương 16 Lập trình Drag-and-Drop
GIÁO TRÌNH MICOSOFT VISUAL BASIC - Chương 1: GIỚI THIỆU
GIÁO TRÌNH MICOSOFT VISUAL BASIC - Chương 2 Đối Tượng và cách sử dụng Đối Tượng
GIÁO TRÌNH MICOSOFT VISUAL BASIC - Chương 3 Kiểu dữ liệu – Hằng – Biến
GIÁO TRÌNH MICOSOFT VISUAL BASIC - Chương 4 Các cấu trúc điều khiển
GIÁO TRÌNH MICOSOFT VISUAL BASIC - Chương 5 Mảng – Chuỗi – Collection
GIÁO TRÌNH MICOSOFT VISUAL BASIC - Chương 6 TextBox - ListBox-ComboBox
GIÁO TRÌNH MICOSOFT VISUAL BASIC - Chương 7 Scrollbar – Image – Timer
GIÁO TRÌNH MICOSOFT VISUAL BASIC - Chương 8 Truy xuất dữ liệu
GIÁO TRÌNH MICOSOFT VISUAL BASIC - Chương 9 PictureBox – Xử lý mouse
crossorigin="anonymous">
Đã 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.