... VisualBasic I Giới thiệu VisualBasic6.0VisualBasic6.0 (VB6) phiên cơng cụ lập trình VisualBasic (VB), cho phép người dùng tiếp cận nhanh ... III Làm quen với VB6 III.1 Bắt đầu dự án với VB6 Từ menu Start chọn Programs, Microsoft VisualBasic6.0 Khi bạn thấy hình I.1 Trang VisualBasic Hình I.1 Cửa sổ kích hoạt VB6 Chọn Ở đây, người ... chương trình VisualBasic IDE VisualBasic nơi tập trung menu, cơng cụ cửa sổ để tạo chương trình Mỗi thành phần IDE có tính ảnh hưởng đến hoạt động lập trình khác Trang VisualBasic Hình I.3...
... (Visual Basic Versions) Phiên VisualBasic hành VisualBasic6.0 (Các phiên thông dụng trước 3 .0, 4 .0 5 .0) • Phiên VB 6.0 đời năm 1998 Visual Studio 6.0 Phiên VB 6.0 có nhiều đặc điểm mới, tăng ... 1.3 Cài đặt VB6 Yêu cầu phần cứng Để chạy Visual Basic, máy tính ta cần tối thiểu: • Hệ điều hành: Microsoft Windows 95/98/ME/ 200 0/NT (nên Service Pack trở lên) • Bộ vi xử lý: 486DX /66 MHz hay nhanh ... dụng rộng rãi ứng dụng Web 1.2 Các VisualBasic (Visual Basic Editions) VisualBasic bán khác nhau, phù hợp cho yêu cầu phát triển khác nhau: • Bản VisualBasic Learning cho phép lập trình viên...
... -1.79 769 3134 862 32E+ 308 1.79 769 3134 862 32E+ 308 Kiểu liệu gọi độ xác kép Currency Dữ liệu tiền tệ chứa giá trị số từ -922.337. 203 .68 5.477,5 808 922.337. 203 .68 5.477,5 807 String Chuỗi liệu từ đến 65 . 500 ... VisualBasic I Giới thiệu VisualBasic6.0VisualBasic6.0 (VB6) phiên cơng cụ lập trình VisualBasic (VB), cho phép người dùng tiếp cận nhanh ... Trang 16 VisualBasic Tài liệu tham khảo: - Microsoft VisualBasic6.0 Lập trình Cơ sở liệu - Chương 4, trang 49 - Nguyễn Thị Ngọc Mai (chủ biên), Nhà xuất Giáo dục - 200 0 Trang 17 Visual Basic...
... (12/1/ 200 7) TỶ LỆ SINH, CHẾT VÀ TỶ LỆ TĂNG TỰ NHIÊN DÂN SỐ ĐVT: % Tỷ lệ tăng tự Tỷ lệ sinh Tổng số 200 0 200 1 200 2 200 3 200 4 Sơ 200 5 Thành thị 200 0 200 1 200 2 200 3 200 4 200 5 Nông thôn 200 0 200 1 200 2 ... 3. 500 tấn; thuỷ sản chế biến: 2. 100 tấn; xi măng: 13 .000 tấn; gạch xây: 1 50. 000 nghìn viên; đá xây dựng: 60 0.000 m3; cát sỏi: 500 .000 m3; phân bón NPK + vi sinh: 5 .000 tấn; muối biển: 29. 500 Kinh ... 500 ngìn 1 50 20 06 Tháng 139 Mới cấp 20. 000 phép Đang xây Hà Nhà máy phôi 12 ,65 thép Hà Tĩnh 12/ 20 06 5,3 06 / 20 06 dựng 67 Đang xây dựng 25 6/ 200 7 8 76 Mới cấp phép tấn/năm Tổng 279,7 21.548 121 Về...
... -1.79 769 3134 862 32E+ 308 1.79 769 3134 862 32E+ 308 Kiểu liệu gọi độ xác kép Currency Dữ liệu tiền tệ chứa giá trị số từ -922.337. 203 .68 5.477,5 808 922.337. 203 .68 5.477,5 807 String Chuỗi liệu từ đến 65 . 500 ... VisualBasic I Giới thiệu VisualBasic6.0VisualBasic6.0 (VB6) phiên cơng cụ lập trình VisualBasic (VB), cho phép người dùng tiếp cận nhanh ... Trang 16 VisualBasic Tài liệu tham khảo: - Microsoft VisualBasic6.0 Lập trình Cơ sở liệu - Chương 4, trang 49 - Nguyễn Thị Ngọc Mai (chủ biên), Nhà xuất Giáo dục - 200 0 Trang 17 Visual Basic...
... sung : -Bộ SGK Ngữ văn THCS (phần TLV từ lớp 9) NXBGD 200 2 – 200 5 -Tư liệu ngữ văn (lớp lớp 9) NXBGD 200 3 – 20 06 Trang 15 KHÁIQUÁTVĂN HỌC DÂN GIAN VIỆT NAM A/MỤC TIÊU BÀI HỌC : Giúp học sinh ... rõ ràng dẫn (sgk) -HS tóm tắt ngắn -Cho biết nét gọn chính? -Dựa vào sgk em tóm tắt lại đọn trích? Nêu kháiquát giá trò tác phẩm Chú ý phần tóm tắt sgk từ rút ý kháiquát Nội dung I/GIỚI THIỆU ... sao, để làm rõ vấn đề này, đọc, hiểu văn Thầy Thế văn bản? Trò Nội dung Đọc SGK phần I/ KHÁIQUÁTVỀVĂN khát quát trả lời BẢN : câu hỏi -Văn lời nói viết để người giao tiếp với nhau, thường phương...
... phẩm chất nghệ thuật tác phẩm bị hạ thấp; phê bình văn học trọng đến khám phá nghệ thuật,… II Kháiquát VHVN từ năm 1975 đến hết kỉ XX: Vài nét hoàn cảnh lịch sử, xã hội văn hoá: - Xã hội: + Chiến ... tiện truyền thông khác phát triển mạnh mẽ → Đất nước bước vào công đổi mới, thúc đẩy văn học đổi Kháiquát VHVN giai đoạn từ năm 1975 đến hết kỉ XX: - Sau năm 1975, đề tài văn học mở rộng Một số ... nước, chủ nghĩa anh hùng (0. 5đ) - Nhân vật thường người tiêu biểu cho lí tưởng chung dân tộc, kết tinh phẩm chất cao quý cộng đồng, gắn bó số phận với số phận đất nước (0. 5đ) - Lời văn mang giọng...
... trình Microsoft VisualBasic6.0 sở liệu Microsoft Access CHƯƠNG 1: CƠ SỞ LÝ THUYẾT 1.1 Microsoft visualbasic6.0 1.1.1 Giới thiệu Microsoft visualbasic6.0 -Viusal Basic6.0 công cụ lập trình ... User 60 2.3.2.9 Bảng TacGia 60 2.3.2. 10 Bảng Sach 60 2.3.3 Sơ đồ thực thể liên kết 60 CHƯƠNG 3: CÀI ĐẶT CHƯƠNG TRÌNH 61 3.1 Giao diện chương trình 61 61 Giao diện ... 1.1 Microsoft visualbasic6.0 1.1.1 Giới thiệu Microsoft visualbasic6.0 .9 1.1.2 Các thành phần cửa sổ VisualBasic 1.1.3 Thiết kế giao diện 10 1.1.4 Thuộc tính, phương...
... 2.2 Các tính Visualbasic6.0 2.2.1 KháiquátvắntắtVisualbasic6.0 Nếu bạn chưa quen với Visual basic, tựa đề phần làm nhầm lẫn đôi chút Rõ ràng bạn người học ngôn ngữ, thứ Visualbasic Dù vậy, ... thuộc tính FPT Software Solution Trang:18/ 265 Giáo trình đào tạo VisualBasic6.0 cmdMove.Left= 100 cmdMove.Top= 100 b phương thức cmdMove.Move 100 , 100 Một ví dụ khác, làm biểu mẫu xuất biến hình ... . 102 10. 1.2 Modul Lớp 103 10. 1.3 Tham số tuỳ chọn 107 10. 1.4 Sự kiện lớp 108 10. 1.5 Huỷ đối tượng 1 10 10. 2 Biến đối tượng 1 10 10. 2.1 Tạo...
... String biểu diễn memory số 00 1 100 0 100 1 100 100 01 100 11 Binary hay 313233 Hex Như có cách biểu diễn số 123 mà không dùng Text String không? Dĩ nhiên Con số 123 7B Hex hay 01 11 101 1 Binary, ta chứa số ... VB6, Text String viết thành dãy chữ với dấu ngoặc kép hai đầu, thí dụ: "Hello, world" Tưởng tượng ta ghép ba mẫu tự alphabet lại với nhau: ABC, memory Text String nầy biểu diễn số 01 000 001 0 100 001 001 000 011 ... cho tất keys bàn phím đuợc gọi ASCII Theo quy ước nầy digit "1" biểu diễn số 48 (00 1 100 01) nút Enter số 13 (00 0 100 11) Chắc có lẽ bạn đoán theo quy ước ASCII, pattern (dạng) bits (1 byte) biểu diễn...
... lstHexadecimal.AddItem Format(Now, "dd/mm/yyyy hh:nn:ss") & " " & Mess ' Keep only the latest 100 0 events If lstHexadecimal.ListCount >= 100 0 Then ' Remove the first Item, i.e the oldest item lstHexadecimal.RemoveItem ... lblSurName_Click() Dim i, anItem Dim sFirstName As String * 10 ' fixed length string of 10 characters Dim sSurName As String * 10 ' fixed length string of 10 characters lstTemp.Clear ' Clear temporary Listbox ... Len(HexStr) = Then HexStr = "0" & HexStr msg = msg + HexStr & " " Next i HexDisplay = msg ' Return result string for Function End Function Trong program nầy, Listbox đạt đến 100 0 items lần hàng thêm...
... để ý thấy VB6 từ dùng hai từ Class Object lẫn lộn Đều nầy không quan trọng, miễn bạn nắm vững ý nghĩa chúng VB6 có yểm trợ Class mà ta triển khai instantiate Objects dùng Một Class VB6 có chứa ... VB6 hổ trợ Visual components, tức chứa controls TextBox, Label v.v Tuy nhiên, ta lấy control có sẵn từ bên đưa cho Object Class dùng Bây bắt đầu viết Class Bạn mở Project loại Standard EXE Visual ... có cố ta muốn chúng báo cáo cho ta biết Trong VB6, Forms, Controls hay ActiveX Objects mà ta dùng lâu Lấy thí dụ Listbox Một Listbox tự quản lý...
... Error, kết NULL Làm việc với versions khác Nếu máy bạn chạy MSAccess 200 2 bạn làm việc với Access database file version 97, 200 0 200 2 Nếu cần phải convert từ version nầy qua version khác, bạn dùng ... entry báo cáo (reports) Kèm theo với VisualBasic6.0 ta mua copy Database Engine MSAccess Tên Jet Database Engine, lõi MSAccess DBMS Các chương trình VB6 truy cập database qua Jet Database Engine ... string Khi ta tạo record lần đầu, không cho trị số field, field có trị số NULL Thường thường, VisualBasic6.0 không thích NULL value nên ta phải thử field với Function IsNULL() để đảm bảo trị số NULL...
... cha mẹ kiếm 100 ngàn trở lên năm HAY học sinh có Intelligent Quotient cao 1 60 đăng ký học sinh đại học tư: If ((StudentAge >= 18) And (ParentIncome >= 100 000 )) Or (StudentIQ > 1 60 ) Then EnrollStudentAtPrivateUniversity ... Trong thí dụ học sinh 18 tuổi trở lên cha mẹ kiếm 100 ngàn trở lên năm đăng ký học sinh đại học tư: If (StudentAge >= 18) And (ParentIncome >= 100 000 ) Then EnrollStudentAtPrivateUniversity End If ... Total + i ' Add the number to the Total Next Total 4 +6+ 8+ 10+ 12+14+ 16= 70 Trong thí dụ ta dùng STEP số âm sau: For i = 16 To Step -2 ' Iterate from 16 to with Step=-2 Total = Total + i ' Add the number...
... Vd: thể nữ trởng thành Cỡ S: 148/ 76- 80 Chiều cao 144ữ149, vòng ngực 74ữ77 Vòng bụng 62 65 , vòng mông 80 82 Cỡ XXL: 164 / 90- 94 Chiều cao 162 ữ 167 , vòng ngực 88ữ 90 Vòng bụng 72ữ75, vòng mông 92ữ95 ... đổi , kết lao động tăng 20% tiết kiệm 300 lao động d 06 / 1994 , xí nghiệp thay đổi công tác tổ chức thành Công ty may Thăng Long với tên giao dịch THALOGA Năm 19 96 , công ty đầu t tỷ đồng ... năm Đến năm số lợng công nhân lên tới 1 361 ngời , kế hoạch sản xuất đạt 102 %, đồng thời đợc trang bị thêm 400 máy đạp chân công cụ khác Ngày 31 /08 /1 965 , công ty tách phận gia công thành đơn...
... 2.2 Các tính Visualbasic6.0 2.2.1 KháiquátvắntắtVisualbasic6.0 Nếu bạn chưa quen với Visual basic, tựa đề phần làm nhầm lẫn đôi chút Rõ ràng bạn người học ngôn ngữ, thứ Visualbasic Dù vậy, ... nút lệnh: a thuộc tính cmdMove.Left= 100 cmdMove.Top= 100 b phương thức cmdMove.Move 100 , 100 FPT Software Solution Trang:18/ 2 60 Giáo trình đào tạo VisualBasic6.0 Một ví dụ khác, làm biểu mẫu xuất ... cmdBottomRight.Height - 500 'Set the size of the label lblNotify.Height = 3 60 FPT Software Solution Trang:21/ 2 60 Giáo trình đào tạo VisualBasic6.0 lblNotify.Width = 300 0 'Center the label within...