01/10/2010 1 Lập Trình Ứng Dụng Quản Lý 1 Chương 3 Trừu tượng hóa dữ liệu với VB NET GV Trương Phước Lộc Khoa CNTT ĐH KHTN Nội dung • Khái niệm • Cú pháp • Ví dụ • Áp dụng 2 ThS Nguyễn Tấn Trần Minh K[.]
01/10/2010 Khoa CNTT-ĐH.KHTN Nội dung Lập Trình Ứng Dụng Quản Lý Chương 3: Trừu tượng hóa liệu với VB.NET • • • • Khái niệm Cú pháp Ví dụ Áp dụng GV Trương Phước Lộc GV Trương Phước Lộc Khoa CNTT-ĐH.KHTN Khái niệm Khoa CNTT-ĐH.KHTN Cú pháp • Trừu tượng hóa liệu phương pháp tích hợp liệu sở kiểu liệu có sẵn nhằm mơ tả, biểu diễn khái niệm hay đối tượng giới thực GV Trương Phước Lộc ThS Nguyễn Tấn Trần Minh Khang [Public, Protected, Private] Class [inherits baseclass] … End Class GV Trương Phước Lộc Khoa CNTT-ĐH.KHTN Ví dụ ThS Nguyễn Tấn Trần Minh Khang Khoa CNTT-ĐH.KHTN Ví dụ (tt) • Chương trình nhập vào họ tên, điểm tốn, điểm văn học sinh Tính điểm trung bình xuất kết • Cấu trúc học sinh: Class HocSinh Dim HoTen As String Dim Van, Toan As Double Dim DTB As Double GV Trương Phước Lộc ThS Nguyễn Tấn Trần Minh Khang ThS Nguyễn Tấn Trần Minh Khang Sub Nhap() Console.Write("Nhap ho ten:") HoTen = Console.ReadLine() Console.Write("Nhap diem toan:") Toan = Console.Read() Console.Write("Nhap diem van:") Van = Console.Read() End Sub GV Trương Phước Lộc ThS Nguyễn Tấn Trần Minh Khang 01/10/2010 Khoa CNTT-ĐH.KHTN Ví dụ (tt) Ví dụ (tt) Sub Xuat() Console.WriteLine("Ho ten: {0}", HoTen) Console.WriteLine("Toan: {0}", Toan) Console.WriteLine("Van: {0}", Van) Console.WriteLine("Diem trung binh: {0}", DTB) End Sub Sub XuLy() DTB = (Toan + Van) / End Sub End class GV Trương Phước Lộc Khoa CNTT-ĐH.KHTN ThS Nguyễn Tấn Trần Minh Khang Sub Main() Dim hs As HocSinh hs.Nhap() hs.XuLy() hs.Xuat() End Sub GV Trương Phước Lộc Khoa CNTT-ĐH.KHTN Áp dụng ThS Nguyễn Tấn Trần Minh Khang Khoa CNTT-ĐH.KHTN Câu hỏi • Nhập hai điểm (mỗi điểm có tọa độ x, y) Tính khoảng cách hai điểm • Nhập tam giác (tam giác có đỉnh) Tính chu vi tam giác • Nhập đa thức (đa thức gồm nhiều đơn thức) x0 Tính giá trị đa thức x = x0 GV Trương Phước Lộc ThS Nguyễn Tấn Trần Minh Khang GV Trương Phước Lộc 10 ThS Nguyễn Tấn Trần Minh Khang