THIẾT kế PHẦN mềm QUẢN lý PHÒNG NGHỈ

Mục lục Tên mục dòng Trang Mở đầu Nội dung Chương I Phân tích yêu cầu Đặc điểm hệ thống thông tin quản lý 1.1 Phân cấp quản lý .7 1.2 Các luồng thông tin 1.2.1 Luồng thông tin vào: 1.2.2 Luồng thông tin ra: 1.3 Mơ hình hệ thống thông tin quản lý 1.4 Kết luận Chương II 10 Phân tích hệ thống quản lý 10 Phân tích hệ thống quản lý quan niệm người làm quản lý 10 Phân tích hệ thống quản lý quan niệm người làm Tin học 10 Lựa chọn hệ quản trị (Ngôn ngữ sử dụng-Thế mạnh hệ) 11 3.1 Lựa chọn ngôn ngữ sử dụng: 11 3.2 Lựa chọn sở liệu: 25 Kết luận: 25 Chương III 26 Phân tích thết kế hệ thống 26 phân tích chức hệ thống 26 1.1 Lý thuyết: .26 1.2 áp dụng vào đề tài: 27 Biểu đồ luồng liệu (BLD) 27 BLD mức khung cảnh 28 Xét yêu cầu thuê phòng (Lập phiếu thuờ phũng) 28 Sinh viên: Hoàng Viết Tân, MS: PĐ 811127 4.1 Thit k d liệu với tính đắn 28 4.1.1 biểu mẫu liên quan 28 4.1.2 Sơ đồ luồng liệu 29 4.1.3 Sơ đồ luồng liệu cho trình kiểm tra phòng trống 29 4.1.4 Sơ đồ luồng liệu cho q trình th phòng 30 4.2 Các thuộc tính 31 4.2.1 Sơ đồ lớp 31 4.2.2 Sơ đồ logic 32 4.2.3 Qui định liên quan 32 4.2.4 Các thuộc tính 32 4.2.5 Sơ đồ lớp 32 4.2.6 Các thuộc tính trừu tượng .32 4.2.7 Sơ đồ logic 33 Xét yêu cầu báo cáo tháng 33 5.1 Biểu mẫu liên quan 33 5.2 Sơ đồ luồng liệu .34 5.3 Các thuộc tính 35 5.4 Sơ đồ lớp .35 5.5 Các thuộc tính trừu tượng 35 5.6 Sơ đồ logic .35 Xét yêu cầu lập hoá đơn 36 6.1 Thiết kế liệu với tính đắn 36 6.1.1 Biểu mẫu liên quan 36 6.1.2 Sơ đồ luồng liệu 36 6.1.3 Các thuộc tính 37 6.1.4 Sơ đồ lớp 37 6.1.5 Các thuộc tình trừu tượng 37 6.1.6 Sơ đồ logic 38 6.2 Thiết kế liệu với tính tiến hố 38 Sinh viên: Hoàng Viết Tân, MS: PĐ 811127 6.2.1 Quy nh liờn quan 38 6.2.2 Sơ đồ luồng liệu 38 6.2.3 Sơ đồ lớp 39 6.2.4 Các thuộc tính trừu tượng 39 6.2.5 Sơ đồ logic 40 Xét yêu cầu lập danh mục phòng 40 7.1 Thiết kế liệu với tính đắn 40 7.1.1 Sơ đồ luồng liệu 40 7.1.2 Sơ đồ lớp 41 7.1.3 Thuộc tính trừu tượng .41 7.1.4 Sơ đồ logic 41 7.2 Thiết kế liệu với tính tiến hố 41 7.2.1 Qui định liên quan 41 7.2.2 Sơ đồ luồng liệu 42 7.2.3 Các thuộc tính 42 7.2.4 Sơ đồ lớp 42 7.2.5 Các thuộc tính trừu tượng 42 7.2.6 Sơ đồ logic 42 Xét yêu cầu kiểm tra phòng trống 42 8.1 Thiế kế biểu mẫu liên quan 42 8.2 Sơ đồ luồng liệu .43 8.3 Các thuộc tính 43 8.4 Sơ đồ lớp .44 8.5 Các thuộc tính trừu tượng 44 8.6 Sơ đồ logic .44 kết luận: 45 chương IV 46 Thiết kế giao diện chương trình 46 1.Màn hình chương trình 47 Sinh viªn: Hoàng Viết Tân, MS: PĐ 811127 1.1 Thit k hình tạo phòng 48 Danh sách biến cố .49 1.2 Thiết kế hình xố phòng 50 Danh sách biến cố 51 1.3 Thiết kế giao diện hình tiếp nhận khách 53 Danh sách biến cố 53 1.4 Thiết kế giao diện cho hình tra cứu phòng .56 1.4.1 Màn hình tra cứu theo thời gian 56 Danh sách biến cố .56 1.4.2 Màn hình tra cứu theo loại phòng 58 1.4.3 Màn hình tra cứu theo phòng 60 1.5 Thiết kế hình cho yêu cầu báo cáo tháng 62 Một số code chương trình 64 Code form main (FrmMain.vb) 64 kết luận .87 Kết luận hướng phát triển .88 Kết luận: 88 hướng phát triển: .88 Lời cam đoan .89 Tài liệu tham khảo .90 Sinh viên: Hoàng Viết Tân, MS: PĐ 811127 M u Trong nhng nm gần phát triển mạnh mẽ công nghệ thông tin, hệ thống quản lý tin học hoá phần, tiến tới tin học hố tồn Cơng việc đóng góp phần đáng kể công tác quản lý Hiện cơng tác quản lý dựa chủ yếu yếu tố nguời, thủ công, điều bộc lộ nhiều vấn đề bất hợp lý, dẫn tới hiệu công việc thấp không đáp ứng nhu cầu công việc thực Trong hệ thống quản lý nay, cấu tổ chức chồng chéo nhiều phòng ban, khơng thuận tiện việc lưu trữ, lưu chuyển thơng tin vòng vèo, ùn tắc, làm cho hiệu xuất đáp ứng công việc không cao, hiệu Trước tình hình đó, nảy sinh u cầu nâng cao tính tự động hố việc quản lý, nhằm đáp ứng cung cấp thơng tin đầy đủ, xác, kịp thời, xử lý chặt chẽ, tạo điều kiện phục vụ tốt cho cơng việc quản lý Vì thế, quản lý đề tài mà gần tất quan hành chính, tổ chức hoạt động quan tâm đến, định hoạt động quan, tổ chức có hiệu tối ưu để hoạt động tốt hay không Đặc biệt ngành du lịch việc quản lý phòng nghỉ lại vấn đề cấp thiết Bởi đặc điểm riêng ngành, người làm cơng tác quản lý phòng nghỉ ln ln cần phải nắm rõ đặc điểm, trình hoạt động nhà hàng, khách sạn để theo dõi kịp thời xác tình trạng hoạt động nhà hàng, khách sạn, ví dụ (Quản lý khách hàng, dịch vụ, trang thiết bị sử dụng, ), để từ có biện pháp kế hoạch đón nhận khách, bảo quản, Làm tăng tính hiệu cơng tác quản lý phòng nghỉ Qua đó, ta thấy vấn đề quản lý phòng nghỉ ln vấm đề cấp thiết Vì vậy, em mạnh dạn chọn: “Thiết kế phần mềm quản lý phòng nghỉ ” để làm đề tài cho đồ án tốt nghiệp Chương trình Quản lý phòng nghỉ viết dạng phần mềm tin học dùng để ứng dụng khách sạn, nhà hàng có phòng nghỉ, phòng Sinh viên: Hoàng Viết Tân, MS: PĐ 811127 cho thuê trọ…, với mục đích quản lý mặt như: Tiếp nhận khách, Báo cáo doanh thu, lập hoá đơn, Nhằm tăng tính hiệu cho cơng việc quản lý Từ nhiều năm qua công tác quản lý khách sạn, nhà hàng, hầu hết dùng cơng cụ có sẵn Word, Excel Em dùng ngôn ngữ Microsoft Visual Studio NET 2003 làm ngôn ngữ sở liệu Access để viết quản lý này, nhằm sử dụng sở liệu cách hiệu hơn, tạo giao diện thân thiện với người sử dụng nhằm mục đích rèn luyện kỹ tự lập trình, tập làm chương trình lớn, học hỏi thêm ngơn ngữ Chương trình quản lý phòng nghỉ có chức phân cấp rõ ràng theo cấp để làm cơng tác quản lý sử dụng Mặt khác, chương trình cho phép người sử dụng quản trị hệ thống mạnh, tìm kiếm thơng tin nhanh, xác Song bên cạnh thời gian có hạn, nghiệp vụ chưa tìm hiểu chuyên xâu, khả lập trình chưa thành thạo, Mặt khác phần mềm em tìm hiểu, phân tích viết đầu tay, nên em vào tìm hiểu phân tích sơ chức năng, tìm hiểu nghiệp vụ quản lý nói chung nghiệp vụ quản lý Phòng nghỉ nói riêng Vì chương trình em chứa đựng nhiều hạn chế mà em chưa có thời gian khắc phục Em mong nhận đóng góp ý kiến tất thầy cô giáo, tồn thể bạn Chương trình tìm hiểu phân tích thiết kế phần mềm quản lý phòng nghỉ thực sinh viên: Hoàng Viết Tân lớp 811b khoa CNTT trường ĐHDL Phương Đông, Dưới hướng dẫn kỹ sư tin học Dương Mạnh Nam, em xin chân thành cảm ơn hướng dẫn thầy Dương Mạnh Nam giúp em hoàn thành tốt đồ án Sinh viên: Hoàng Viết Tân, MS: PĐ 811127 Ni dung Chương I Phân tích yêu cầu Tổng quan hệ thống thông tin ứng dụng công tác quản lý Phòng nghỉ Trước bắt tay vào thiết kế xây dựng hệ thống quản lý phòng nghỉ có số khái niệm hệ thống thơng tin quản lý: Đặc điểm hệ thống thông tin quản lý 1.1 Phân cấp quản lý Hệ thống thông tin quản lý hệ thống tổ chức thống từ xuống Có chức tổng hợp thông tin giúp nhà quản lý quản lý tốt sở Một hệ thống quản lý phân cấp từ xuống Mọi thông tin tổng hợp từ lên chuyển từ xuống 1.2 Các luồng thông tin 1.2.1 Luồng thông tin vào: Luồng thông tin bao gồm thông tin định hướng hệ thống cấp thông tin liên hệ trao đổi với môi trường Mỗi phận có lượng thơng tin lớn đa dạng cần phải xử lý Các thông tin cần phải xử lý chia làm loại: - Các thông tin luân chuyển: Là loại thông tin chi tiết hoạt động hàng ngày hệ thống Khối lượng thơng tin lớn nên đòi hỏi có xử lý nhanh, kịp thời - Các thơng tin tổng hợp định kỳ: Là thông tin tổng hợp hoạt động cấp báo lên cấp Những thông tin thu thập thông tin ghi chép trực tiếp từ phận hệ thống thừa hành - Thông tin dùng để tra cứu: Là thông tin dùng chung hệ thống Các thông tin tồn thời gian dài hệ thống thay đổi, dùng để tra cứu việc xử lýcác thông tin luân chuyển v thụng tin tng hp Sinh viên: Hoàng Viết Tân, MS: P§ 811127 1.2.2 Luồng thơng tin ra: Thơng tin đầu tổng hợp từ thông tin đầu vào phụ thuộc vào yêu cầu quản lý cụ thể Thông tin việc tra cứu nhanh đối tượng cần quan tâm Mỗi lần tra cứu u cầu thơng tin hồn tồn khác điều quan trọng thơng tin phải xác, kịp thời Các báo cáo, tổng hợp, thống kê, thông báo thông tin quan trọng tổng hợp trình xử lý Các biểu mẫu báo thống kê phải phản ánh cụ thể, trực tiếp sát với đơn vị, đối tượng Đối với cán quản lý cấp cao (là người xây dựng mục tiêu hoạt động hệ thống, đặt hướng cho hệ thống) : - Thơng tin ngồi quan trọng - Thơng tin cung cấp cần có tính khái qt, đọng tổng hợp Đối với cán cấp trung gian với nhiệm vụ chủ yếu tiến hành hoá mục tiêu nhiệm vụ cụ thể, liên kết phận tổ chức - Thông tin quan trọng - Thơng tin mang tính chi tiết định hướng Đối với cán cấp sở: Là người trực tiếp thực nhiệm vụ cụ thể cần cung cấp thơng tin cho họ đầy đủ chi tiết tốt 1.3 Mơ hình hệ thống thông tin quản lý Để tổ chức thông tin phục vụ quản lý, cần xây dựng modul liệu gồm: Các modul cập nhật, xử lý thơng tin tổng hợp thơng tin ln chuyển: lượng thơng tin lớn đòi hỏi tốc độ xử lý nhanh xác, xây dựng cần phải quan tâm đến yêu cầu sau: - Tổ chức hình hợp lý giảm thao tác người sử dụng - Nắm vững thông tin quan trọng từ thông tin cần cập nhật - Tự động nạp giá trị biết giá trị lặp lại - Kiểm tra, phát nhanh sai sót nhập liệu có thơng báo cho người sử dụng bit Sinh viên: Hoàng Viết Tân, MS: PĐ 811127 1.4 Kết luận Việc phân tích yêu cầu vấn đề thiếu làm đồ án, đề tài, công việc cụ thể đó,… Đây bước đầu tiên, để giải thích câu hỏi (cần phải làm gì?) Việc phân tích yêu cầu giúp cho biết hiểu rõ vấn đề toán, giúp người thực hiểu cần biết chuẩn bị thực thực hiện, cụ thể như: Nắm đặc điểm hệ thống quản lý - Phân cấp quản lý - Các luồng thông tin vào - Mơ hình hệ thống thơng tin quản lý - Yêu cầu đơn vị - Yêu cầu người sử dụng Từ yêu cầu mà hệ thống quản lý cần, lại tiếp tục vào phân tích hệ thống quản lý, để từ biết hệ thống hiểu Trên quan niệm người làm quản lý, quan niệm người làm tin học, với biết định hướng người viết hệ thống dùng ngôn ngữ công cụ hỗ trợ để thực đồ án Sinh viªn: Hoàng Viết Tân, MS: PĐ 811127 Chng II Phõn tích hệ thống quản lý Phân tích hệ thống quản lý quan niệm người làm quản lý Mỗi đơn vị có yêu cầu đặc điểm riêng Hệ thông tin quản lý phải đáp ứng yêu cầu quản lý đơn vị Nhà quản lý đơn vị phải người đề đạt định đưa ứng dụng tin học vào công tác quản lý Như hệ thông tin quản lý cần phải nắm chiến lược phát triển chung đơn vị quản lý, không để thay đổi nhỏ tổ chức quản lý làm sai lệch thơng tin tập hợp Trong q trình phát triển hệ thống cần phải kiểm chứng tính đắn, tính khoa học đồng thời hệ thống ln phải hồn thiện, điều chỉnh cho phù hợp Các thơng tin đầu phải đảm bảo tính mục tiêu, rõ ràng, xác, đầy đủ đáp ứng yêu cầu nhà quản lý Phân tích hệ thống quản lý quan niệm người làm Tin học Đây yêu cầu người sử dụng hệ thống không đơn thao tác vói máy Điều quan trọng hệ thống không đáp ứng cho người thông thạo tin học mà đáp ứng cho người hiêủ biết máy tính Khi thiết kế phải đảm bảo yêu cầu sau: - Yêu cầu nhập liệu: Hệ thống phải có khả truy nhập liệu từ xa, nhanh chóng, thuận lợi , chuẩn xác, thao tác phải thuận lợi, đơn giản phải đáp ứng đầy đủ yêu cầu truy nhập liệu từ xa -Yêu cầu hệ thống thông tin: Hệ thống phải bảo mật, bảo trì, có tính mở để phát triển, điều chỉnh Đặc biệt phải có khả kiểm tra đắn liệu khả phát lỗi xử lý lỗi - Yêu cầu giao diện: Giao diện người máy phải thiết kế khoa học, đẹp, khơng cầu kỳ, phải có tính thống phương pháp làm việc, cách trình bày, khả trợ giúp tốt kịp thời giải tốt thắc mắc người sử dụng Sinh viªn: Hoàng Viết Tân, MS: PĐ 811127 10 ' 'lblChnhsuaphng ' Me.lblChỡnhsuaphũng.BackColor = System.Drawing.Color.Turquoise Me.lblChỡnhsuaphũng.Font = New System.Drawing.Font("Times New Roman", 14.0!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Underline), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.lblChỡnhsuaphũng.ForeColor = System.Drawing.Color.WhiteSmoke Me.lblChỡnhsuaphũng.Location = New System.Drawing.Point(0, 128) Me.lblChỡnhsuaphũng.Name = "lblChỡnhsuaphũng" Me.lblChỡnhsuaphũng.Size = New System.Drawing.Size(248, 32) Me.lblChỡnhsuaphũng.TabIndex = 12 Me.lblChỡnhsuaphũng.Text = "Xoỏ Phũng" Me.lblChỡnhsuaphũng.TextAlign = System.Drawing.ContentAlignment.MiddleLeft Me.ToolTip1.SetToolTip(Me.lblChỡnhsuaphũng, "lập danh mục phũng") ' 'Panel2 ' Me.Panel2.Controls.Add(Me.PictureBox2) Me.Panel2.Location = New System.Drawing.Point(248, 48) Me.Panel2.Name = "Panel2" Me.Panel2.Size = New System.Drawing.Size(576, 408) Me.Panel2.TabIndex = ' 'PictureBox2 ' Me.PictureBox2.Font = New System.Drawing.Font("Times New Roman", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.PictureBox2.Image = CType(resources.GetObject("PictureBox2.Image"), System.Drawing.Image) Me.PictureBox2.Location = New System.Drawing.Point(0, 0) Me.PictureBox2.Name = "PictureBox2" Me.PictureBox2.Size = New System.Drawing.Size(480, 408) Me.PictureBox2.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage Me.PictureBox2.TabIndex = Me.PictureBox2.TabStop = False ' Sinh viên: Hoàng Viết Tân, MS: PĐ 811127 72 'frmMain ' Me.AutoScaleBaseSize = New System.Drawing.Size(7, 19) Me.BackColor = System.Drawing.Color.FromArgb(CType(255, Byte), CType(192, Byte), CType(192, Byte)) Me.ClientSize = New System.Drawing.Size(728, 453) Me.Controls.Add(Me.Panel2) Me.Controls.Add(Me.Panel1) Me.Controls.Add(Me.lbTimer) Me.Controls.Add(Me.Label1) Me.Font = New System.Drawing.Font("Times New Roman", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.ForeColor = System.Drawing.SystemColors.ActiveCaption Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle Me.MaximizeBox = False Me.Name = "frmMain" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "Phan Mem Quan Ly Phũng Nghi " Me.Panel1.ResumeLayout(False) Me.Panel5.ResumeLayout(False) Me.Panel2.ResumeLayout(False) Me.ResumeLayout(False) End Sub #End Region Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick lbTimer.Text = Format(Now, "hh:mm:ss") End Sub Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick lbTimer.Text = Format(Now, "dd:mm:yy") End Sub Private Sub xulychuot() Select Case (movemouse) Sinh viên: Hoàng Viết Tân, MS: PĐ 811127 73 J Case r lblChỡnhsuaphũng.Cursor = System.Windows.Forms.Cursors.Hand Àu32 ? lbTiepnhankhỏch.Cursor = System.Windows.Forms.Cursors.Default lbTraphũng.Cursor = System.Windows.Forms.Cursors.Default > lbTracuuphũng.Cursor = System.Windows.Forms.Cursors.Default ỉ lbBaocaodoanhthu.Cursor = System.Windows.Forms.Cursors.Default lbQuangtri.Cursor = System.Windows.Forms.Cursors.Default Àu32 ? lbGioithieuchuongtrỡnh.Cursor = System.Windows.Forms.Cursors.Default lbThoat.Cursor = System.Windows.Forms.Cursors.Default F lblTaomoiphũng.Cursor = System.Windows.Forms.Cursors.Default ỡ lblChỡnhsuaphũng.ForeColor = Color.Red V lbTiepnhankhỏch.ForeColor = Color.WhiteSmoke ề lbTraphũng.ForeColor = Color.WhiteSmoke D lbTracuuphũng.ForeColor = Color.WhiteSmoke ) lbBaocaodoanhthu.ForeColor = Color.WhiteSmoke : lbQuangtri.ForeColor = Color.WhiteSmoke lbGioithieuchuongtrỡnh.ForeColor = Color.WhiteSmoke lbThoat.ForeColor = Color.WhiteSmoke % lblTaomoiphũng.ForeColor = Color.WhiteSmoke _ Case D lblChỡnhsuaphũng.Cursor = System.Windows.Forms.Cursors.Default ọ lbTiepnhankhỏch.Cursor = System.Windows.Forms.Cursors.Hand ! lbTraphũng.Cursor = System.Windows.Forms.Cursors.Default _ lbTracuuphũng.Cursor = System.Windows.Forms.Cursors.Default ê lbBaocaodoanhthu.Cursor = System.Windows.Forms.Cursors.Default J lbQuangtri.Cursor = System.Windows.Forms.Cursors.Default ĩ lbGioithieuchuongtrỡnh.Cursor = System.Windows.Forms.Cursors.Default Š lbThoat.Cursor = System.Windows.Forms.Cursors.Default _ lblTaomoiphũng.Cursor = System.Windows.Forms.Cursors.Default ỉ lblChỡnhsuaphũng.ForeColor = Color.WhiteSmoke lbTiepnhankhỏch.ForeColor = Color.Red Ô lbTraphũng.ForeColor = Color.WhiteSmoke _ lbTracuuphũng.ForeColor = Color.WhiteSmoke ễ lbBaocaodoanhthu.ForeColor = Color.WhiteSmoke u32 ? lbQuangtri.ForeColor = Color.WhiteSmoke Sinh viên: Hoàng Viết Tân, MS: PĐ 811127 74 ~ lbGioithieuchuongtrnh.ForeColor = Color.WhiteSmoke €u32 ? é lbThoat.ForeColor = Color.WhiteSmoke lblTaomoiphũng.ForeColor = Color.WhiteSmoke ợ Case _ lblChỡnhsuaphũng.Cursor = System.Windows.Forms.Cursors.Default ả lbTiepnhankhỏch.Cursor = System.Windows.Forms.Cursors.Default T lbTraphũng.Cursor = System.Windows.Forms.Cursors.Hand ‹ lbTracuuphũng.Cursor = System.Windows.Forms.Cursors.Default | lbBaocaodoanhthu.Cursor = System.Windows.Forms.Cursors.Default _ lbQuangtri.Cursor = System.Windows.Forms.Cursors.Default ‡ lbGioithieuchuongtrỡnh.Cursor = System.Windows.Forms.Cursors.Default \ lbThoat.Cursor = System.Windows.Forms.Cursors.Default lblTaomoiphũng.Cursor = System.Windows.Forms.Cursors.Default ƒ lblChỡnhsuaphũng.ForeColor = Color.WhiteSmoke €u32 ? lbTiepnhankhỏch.ForeColor = Color.WhiteSmoke „ lbTraphũng.ForeColor = Color.Red ố lbTracuuphũng.ForeColor = Color.WhiteSmoke ` lbBaocaodoanhthu.ForeColor = Color.WhiteSmoke > lbQuangtri.ForeColor = Color.WhiteSmoke P lbGioithieuchuongtrỡnh.ForeColor = Color.WhiteSmoke Ú lbThoat.ForeColor = Color.WhiteSmoke F lblTaomoiphũng.ForeColor = Color.WhiteSmoke À Case : lblChỡnhsuaphũng.Cursor = System.Windows.Forms.Cursors.Default ˆ lbTiepnhankhỏch.Cursor = System.Windows.Forms.Cursors.Default & lbTraphũng.Cursor = System.Windows.Forms.Cursors.Default lbTracuuphũng.Cursor = System.Windows.Forms.Cursors.Hand N lbBaocaodoanhthu.Cursor = System.Windows.Forms.Cursors.Default ợ lbQuangtri.Cursor = System.Windows.Forms.Cursors.Default lbGioithieuchuongtrỡnh.Cursor = System.Windows.Forms.Cursors.Default lbThoat.Cursor = System.Windows.Forms.Cursors.Default ẳ lblTaomoiphũng.Cursor = System.Windows.Forms.Cursors.Default \ lblChỡnhsuaphũng.ForeColor = Color.WhiteSmoke lbTiepnhankhỏch.ForeColor = Color.WhiteSmoke V lbTraphng.ForeColor = Color.WhiteSmoke Sinh viên: Hoàng Viết Tân, MS: PĐ 811127 75 lbTracuuphng.ForeColor = Color.Red lbBaocaodoanhthu.ForeColor = Color.WhiteSmoke * lbQuangtri.ForeColor = Color.WhiteSmoke " lbGioithieuchuongtrỡnh.ForeColor = Color.WhiteSmoke lbThoat.ForeColor = Color.WhiteSmoke _ lblTaomoiphũng.ForeColor = Color.WhiteSmoke ’ Case & lblChỡnhsuaphũng.Cursor = System.Windows.Forms.Cursors.Default Z lbTiepnhankhỏch.Cursor = System.Windows.Forms.Cursors.Default ứ lbTraphũng.Cursor = System.Windows.Forms.Cursors.Default " lbTracuuphũng.Cursor = System.Windows.Forms.Cursors.Default & lbBaocaodoanhthu.Cursor = System.Windows.Forms.Cursors.Hand À lbQuangtri.Cursor = System.Windows.Forms.Curlors.Default _ lbGioithieuchuongtrỡnh.Cursor = System.Windows.Forms.Cursors.Default _u32 ? Ž lbThoat.Cursor = System.Windows.Forms.Cursors.Default lblTaomoiphũng.Cursor = System.Windows.Forms.Cursors.Default lblChỡnhsuaphũng.ForeColor = Color.WhiteSmoke Ù lbTiepnhankhỏch.ForeColor = Color.WhiteSmoke ( lbTraphũng.ForeColor = Color.WhiteSmoke š lbTracuuphũng.ForeColor = Color.WhiteSmoke _ lbBaocaodoanhthu.ForeColor = Color.Red ế lbQuangtri.ForeColor = Color.WhiteSmoke ụ lbGioithieuchuongtrỡnh.ForeColor = Color.WhiteSmoke ~ lbThoat.ForeColor = Color.WhiteSmoke lblTaomoiphũng.ForeColor = Color.WhiteSmoke d Case ẹ lblChỡnhsuaphũng.Cursor = System.Windows.Forms.Cursors.Default , lbTiepnhankhỏch.Cursor = System.Windows.Forms.Cursors.Default ấ lbTraphũng.Cursor = System.Windows.Forms.Cursors.Default Í lbTracuuphũng.Cursor = System.Windows.Forms.Cursors.Default ứ lbBaocaodoanhthu.Cursor = System.Windows.Forms.Cursors.Default ˜ lbQuangtri.Cursor = System.Windows.Forms.Cursors.Hand & lbGioithieuchuongtrỡnh.Cursor = System.Windows.Forms.Cursors.Default ˆ lbThoat.Cursor = System.Windows.Forms.Cursors.Default ` lblTaomoiphng.Cursor = System.Windows.Forms.Cursors.Default Sinh viên: Hoàng Viết Tân, MS: P§ 811127 76 _u32 ? lblChỡnhsuaphũng.ForeColor = Color.WhiteSmoke „ lbTiepnhankhỏch.ForeColor = Color.WhiteSmoke ỳ lbTraphũng.ForeColor = Color.WhiteSmoke l lbTracuuphũng.ForeColor = Color.WhiteSmoke ọ lbBaocaodoanhthu.ForeColor = Color.WhiteSmoke b lbQuangtri.ForeColor = Color.Red € lbGioithieuchuongtrỡnh.ForeColor = Color.WhiteSmoke P lbThoat.ForeColor = Color.WhiteSmoke ẳ lblTaomoiphũng.ForeColor = Color.WhiteSmoke Case | lblChỡnhsuaphũng.Cursor = System.Windows.Forms.Cursors.Default ỵ lbTiepnhankhỏch.Cursor = System.Windows.Forms.Cursors.Default œ lbTraphũng.Cursor = System.Windows.Forms.Cursors.Default lbTracuuphũng.Cursor = System.Windows.Forms.Cursors.Default lbBaocaodoanhthu.Cursor = System.Windows.Forms.Cursors.Default j lbQuangtri.Cursor = System.Windows.Forms.Cursors.Default ỵ lbGioithieuchuongtrỡnh.Cursor = System.Windows.Forms.Cursors.Hand lbThoat.Cursor = System.Windows.Forms.Cursors.Default lblTaomoiphũng.Cursor = System.Windows.Forms.Cursors.Default ề lblChỡnhsuaphũng.ForeColor = Color.WhiteSmoke P lbTiepnhankhỏch.ForeColor = Color.WhiteSmoke lbTraphũng.ForeColor = Color.WhiteSmoke lbTracuuphũng.ForeColor = Color.WhiteSmoke lbBaocaodoanhthu.ForeColor = Color.WhiteSmoke lbQuangtri.ForeColor = Color.WhiteSmoke lbGioithieuchuongtrỡnh.ForeColor = Color.Red lbThoat.ForeColor = Color.WhiteSmoke lblTaomoiphũng.ForeColor = Color.WhiteSmoke Case lblChỡnhsuaphũng.Cursor = System.Windows.Forms.Cursors.Default lbTiepnhankhỏch.Cursor = System.Windows.Forms.Cursors.Default lbTraphũng.Cursor = System.Windows.Forms.Cursors.Default lbTracuuphũng.Cursor = System.Windows.Forms.Cursors.Default lbBaocaodoanhthu.Cursor = System.Windows.Forms.Cursors.Default lbQuangtri.Cursor = System.Windows.Forms.Cursors.Default lbGioithieuchuongtrỡnh.Cursor = System.Windows.Forms.Cursors.Default Sinh viên: Hoàng Viết Tân, MS: PĐ 811127 77 lbThoat.Cursor = System.Windows.Forms.Cursors.Hand lblTaomoiphũng.Cursor = System.Windows.Forms.Cursors.Default lblChỡnhsuaphũng.ForeColor = Color.WhiteSmoke lbTiepnhankhỏch.ForeColor = Color.WhiteSmoke lbTraphũng.ForeColor = Color.WhiteSmoke lbTracuuphũng.ForeColor = Color.WhiteSmoke lbBaocaodoanhthu.ForeColor = Color.WhiteSmoke lbQuangtri.ForeColor = Color.WhiteSmoke lbGioithieuchuongtrỡnh.ForeColor = Color.WhiteSmoke lbThoat.ForeColor = Color.Red lblTaomoiphũng.ForeColor = Color.WhiteSmoke Case lblChỡnhsuaphũng.Cursor = System.Windows.Forms.Cursors.Default lbTiepnhankhỏch.Cursor = System.Windows.Forms.Cursors.Default lbTraphũng.Cursor = System.Windows.Forms.Cursors.Default lbTracuuphũng.Cursor = System.Windows.Forms.Cursors.Default lbBaocaodoanhthu.Cursor = System.Windows.Forms.Cursors.Default lbQuangtri.Cursor = System.Windows.Forms.Cursors.Default lbGioithieuchuongtrỡnh.Cursor = System.Windows.Forms.Cursors.Default lbThoat.Cursor = System.Windows.Forms.Cursors.Default lblTaomoiphũng.Cursor = System.Windows.Forms.Cursors.Hand lblChỡnhsuaphũng.ForeColor = Color.WhiteSmoke lbTiepnhankhỏch.ForeColor = Color.WhiteSmoke lbTraphũng.ForeColor = Color.WhiteSmoke lbTracuuphũng.ForeColor = Color.WhiteSmoke lbBaocaodoanhthu.ForeColor = Color.WhiteSmoke lbQuangtri.ForeColor = Color.WhiteSmoke lbGioithieuchuongtrỡnh.ForeColor = Color.WhiteSmoke lbThoat.ForeColor = Color.WhiteSmoke lblTaomoiphũng.ForeColor = Color.Red Case Else lblChỡnhsuaphũng.Cursor = System.Windows.Forms.Cursors.Default lbTiepnhankhỏch.Cursor = System.Windows.Forms.Cursors.Default lbTraphũng.Cursor = System.Windows.Forms.Cursors.Default lbTracuuphng.Cursor = System.Windows.Forms.Cursors.Default Sinh viên: Hoàng Viết Tân, MS: PĐ 811127 78 lbBaocaodoanhthu.Cursor = System.Windows.Forms.Cursors.Default lbQuangtri.Cursor = System.Windows.Forms.Cursors.Default lbGioithieuchuongtrỡnh.Cursor = System.Windows.Forms.Cursors.Default lbThoat.Cursor = System.Windows.Forms.Cursors.Default lblTaomoiphũng.Cursor = System.Windows.Forms.Cursors.Default lblChỡnhsuaphũng.ForeColor = Color.WhiteSmoke lbTiepnhankhỏch.ForeColor = Color.WhiteSmoke lbTraphũng.ForeColor = Color.WhiteSmoke lbTracuuphũng.ForeColor = Color.WhiteSmoke lbBaocaodoanhthu.ForeColor = Color.WhiteSmoke lbQuangtri.ForeColor = Color.WhiteSmoke lbGioithieuchuongtrỡnh.ForeColor = Color.WhiteSmoke lbThoat.ForeColor = Color.WhiteSmoke lblTaomoiphũng.ForeColor = Color.WhiteSmoke End Select End Sub Public Sub Dongchuongtrỡnh() Dim dongmsg As Integer dongmsg = MessageBox.Show("Bạn Có Thật Sự Muốn Đóng khơng ?", "Dong Chuong Trỡnh", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button2) Select Case dongmsg Case vbYes Close() Case vbNo End Select End Sub Private Sub lblChỡnhsuaphũng_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles lblChỡnhsuaphũng.MouseMove movemouse = xulychuot() movemouse = End Sub Private Sub lbTiepnhankhỏch_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles lbTiepnhankhỏch.MouseMove movemouse = xulychuot() Sinh viên: Hoàng Viết Tân, MS: PĐ 811127 79 movemouse = End Sub Private Sub lbTraphũng_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles lbTraphũng.MouseMove movemouse = xulychuot() movemouse = End Sub Private Sub lbTracuuphũng_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles lbTracuuphũng.MouseMove movemouse = xulychuot() movemouse = End Sub Private Sub lbBaocaodoanhthu_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles lbBaocaodoanhthu.MouseMove movemouse = xulychuot() movemouse = End Sub Private Sub lbQuangtri_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles lbQuangtri.MouseMove movemouse = xulychuot() movemouse = End Sub Private Sub lbGioithieuchuongtrỡnh_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles lbGioithieuchuongtrỡnh.MouseMove movemouse = xulychuot() movemouse = End Sub Private Sub lbThoat_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles lbThoat.MouseMove movemouse = xulychuot() movemouse = Sinh viªn: Hoàng Viết Tân, MS: PĐ 811127 80 End Sub Private Sub lblTaomoiphũng_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles lblTaomoiphũng.MouseMove movemouse = xulychuot() movemouse = End Sub Private Sub lbThoat_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lbThoat.Click Dongchuongtrỡnh() End Sub Private Sub frmMain_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load movemouse = xulychuot() End Sub Private Sub lbTraphũng_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lbTraphũng.Click Dim frmLHD As New frmLaphoadon frmLHD.Text = "TraPhũng" frmLHD.ShowDialog() End Sub Private Sub lbTracuuphũng_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lbTracuuphũng.Click Dim frmTC As New frmTracuuphũng frmTC.Text = "Tra Cuu Phũng" frmTC.ShowDialog() End Sub Private Sub lbBaocaodoanhthu_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lbBaocaodoanhthu.Click Dim frmBCDT As New frmBaocaodoanhthu frmBCDT.Text = "Bao Cao Doanh Thu" frmBCDT.ShowDialog() End Sub Private Sub lbTiepnhankhỏch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lbTiepnhankhỏch.Click Dim frmTNK As New frmTiepnhankhch Sinh viên: Hoàng Viết Tân, MS: P§ 811127 81 frmTNK.Text = "Tiep Nhan Khỏch tro" frmTNK.ShowDialog() End Sub Private Sub lbGioithieuchuongtrỡnh_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lbGioithieuchuongtrỡnh.Click Dim frmabout As New frmVeChuongTrỡnh frmabout.Text = "Gioi Thieu Chuong trỡnh" frmabout.ShowDialog() End Sub Private Sub lblChỡnhsuaphũng_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lblChỡnhsuaphũng.Click Dim frmCSP As New frmChỡnhsuaphũng frmCSP.Text = "Chỡnh Sua Phũng Trong Danh Muc" frmCSP.ShowDialog() End Sub Private Sub lblTaomoiphũng_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lblTaomoiphũng.Click Dim frmTMP As New frmTaomoiphũng frmTMP.Text = "Them Phũng Moi" frmTMP.ShowDialog() End Sub Private Sub lbQuantri_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lbQuantri.Click Dim login As New frmQuantri login.Text = "Đăng nhập hệ thống" login.ShowDialog() End Sub End Class kết luận Microsoft Visual Studio NET ngôn ngữ lập trình mạnh, ngơn ngữ có cơng cụ tối ưu mà người lập trình tạo nên giao diện người sử dụng cho ứng dụng mình, Microsoft Visual Studio NET cung cấp cho người sử dụng giao diện thân thiện trực quan linh hoạt d s dng Ngy Sinh viên: Hoàng Viết Tân, MS: P§ 811127 82 thay đổi ngành cơng nghệ thơng tin tồn cầu, việc sử dụng ngơn ngữ Microsoft Visual Studio NET hướng đương thời, đại người thiết kế lập trình Với tính ưu biệt hệ, lựa chọn đắn để thiết kế viết “phần mềm quản lý phòng nghỉ” Kết luận hướng phát triển Kết luận: Phần mềm quản lý phòng nghỉ, thiết kế cài đặt dựa ngơn ngữ lập trình Microsoft Visual Studio NET, kết hợp với hệ quản trị sở liệu Microsoft Access, Phần mềm có ứng dụng cụ thể sử dụng môi trường Windows với giao diện thân thiện dễ sử dụng Phần mềm dùng hệ thống mạng nội (mạng LAN) Với bước tìm hiểu phân tích, kết hợp viết mã đến em xin tạm gọi phần mềm “Quản lý phòng nghỉ” Trong bước tìm hiểu hồn thành đồ án, em khơng thể tránh sai sót thời, chương trình thực đầu tay tìm hiểu ngôn ngữ Em mong giúp đỡ, đóng góp ý kiến tất thầy giáo tồn thể bạn, để phần mềm hoàn thiện Từ phần làm chưa làm sau định hướng phát triển phần mềm em hướng phát triển: Khi thiết kế phần mềm “Quản lý phòng nghỉ” em xây dựng ý tưởng thiết kế “Phần mềm quản lý khách sạn” với nhiều chức như: Quản lý thu chi, quản lý trang thiết bị, quản lý phòng ban, quản lý nhân viên, Đặc biệt hướng phát triển em sử dụng phần mềm mạng Internet để liên kết khách sạn, trao đổi thông tin nhanh gọn mà hiệu kinh tế đem lại lớn, phục vụ tốt cho nhu cầu khách hàng người quản lý Vì phần mềm “Quản lý phòng nghỉ” chức thiếu sót chưa hồn thiện mong mun Sinh viên: Hoàng Viết Tân, MS: PĐ 811127 83 Nhưng để có suy nghĩ hồn thành đồ án thời gian yêu cầu tận tình giúp đỡ thầy giáo hướng dẫn, thầy Dương Mạnh Nam Em xin chân thành lần cảm ơn hướng dẫn thầy, cảm ơn tất thầy tồn thể bạn bè, giúp em hon thnh ỏn ny Sinh viên: Hoàng Viết Tân, MS: P§ 811127 84 Lời cam đoan “Tơi xin cam đoan cơng trình nghiên cứu riêng tơi Những tài liệu đồ án tốt nghiệp hoàn tồn trung thực Các kết nghiên cứu thực đạo giáo viên hng dn. Sinh viên: Hoàng Viết Tân, MS: PĐ 811127 85 Tài liệu tham khảo [1] Sách bước tự học lập trình Vb.Net (Giáo trình kết hợp tập đĩa CD) [2] Tham khảo tài liệu kết hợp tập Internet trạng Web manguon.com, codproject.com … [3] Bài giảng nhập môn Kỹ nghệ phần mềm, ĐHPĐ Hà Nội, 2003, (99 trang) (TS Cao Kim ánh) [4] Sách phân tích thiết kế hệ thống thông tin kiến thức thực hành, nhà xuất lao động xã hội, (450 trang) (TS Lê Văn Phùng) Sinh viên: Hoàng Viết Tân, MS: PĐ 811127 86 ... lý phòng nghỉ ln vấm đề cấp thiết Vì vậy, em mạnh dạn chọn: Thiết kế phần mềm quản lý phòng nghỉ ” để làm đề tài cho đồ án tốt nghiệp Chương trình Quản lý phòng nghỉ viết dạng phần mềm tin học... cơng tác quản lý Phòng nghỉ Trước bắt tay vào thiết kế xây dựng hệ thống quản lý phòng nghỉ có số khái niệm hệ thống thông tin quản lý: Đặc điểm hệ thống thông tin quản lý 1.1 Phân cấp quản lý Hệ... (Quản lý khách hàng, dịch vụ, trang thiết bị sử dụng, ), để từ có biện pháp kế hoạch đón nhận khách, bảo quản, Làm tăng tính hiệu cơng tác quản lý phòng nghỉ Qua đó, ta thấy vấn đề quản lý phòng