Bài giảng cung cấp cho người học các kiến thức: Tự động hóa trong ứng dụng Microsoft và quản lý tiến trình, Sử dụng Object Browser để tìm hiểu đối tượng, khởi động và chấm dứt tiến trình,... Hi vọng đây sẽ là một tài liệu hữu ích dành cho các bạn sinh viên đang theo học môn dùng làm tài liệu học tập và nghiên cứu. Mời các bạn cùng tham khảo chi tiết nội dung bài giảng.
Hướng dẫn lập trình VB.NET Chương 13: Tự động hóa quản lý tiến trình Chương 13: Tự động hóa ứng dụng Microsoft quản lý tiến trình oOo -Nội dung thảo luận: - Sử dụng Object Browser để tìm hiểu đối tượng - Sử dụng Microsoft Excel để tính tốn chương trình VB - Xử lý bảng tính Excel từ chương trình VB.NET - Khởi động chấm dứt tiến trình Windows thành phần quản lý tiến trình Trong chương thử quản lý ứng dụng văn phịng Microsoft từ chương trình VB.NET, xem đối tượng với thuộc tính, phương thức Object Browser Chú ý: - Dù tính ActiveX dựa mơ hình cơng nghệ COM khơng cịn thiết kế VB.NET nhiên bạn sử dụng chúng nói chương trước - Các ứng dụng văn phịng truy xuất theo đặc tả COM điều khiển ứng dụng VB.NET thông qua kỹ thuật Automation Tuy nhiên tham chiếu nên sử dụng lúc biên dịch thay cho lúc chương trình thực thi - Giờ VB.NET lớp đối tượng Process đặt TOOLBOX để phục vụ cho công việc khởi tạo, điều khiển ứng dụng bên ngồi Lập trình điều khiển đối tượng ứng dụng Atomation Automation kỹ thuật dựa công nghệ tảng mơ hình thành phần đối tượng COM (Component Object Model) COM cho phép đối tượng ứng dụng khác chạy chung mơi trường Ví dụ, bạn tận dụng ứng dụng soạn thảo văn chương trình bạn Với ASP.NET bạn dùng số đối tượng soạn thảo FreeTextBox 2.0… Với VB.NET, để sử dụng COM bạn cần làm theo số bước giới thiệu sau Hiện bạn truy xuất ứng dụng văn phịng Microsoft Office sau theo mơ hình COM: - Microsoft Visual Studio.NET, Microsoft Visual - MS.World 2003, 2002, 2000, 97 - MS.Excel 2003, 2002, 2000, 97 - MS.Powerpoint 2003, 2002, 2000, 97 Biên soạn: Phạm Đức Lập -1- Add: cnt-44-dh, VIMARU Hướng dẫn lập trình VB.NET - Chương 13: Tự động hóa quản lý tiến trình MS.Outlook 2003, 2002, 2000, 97 – 98 Hiện Microsoft thức cho phép VB ngơn ngữ lập trình thức cho ứng dụng nên hầu hết ứng dụng windows hỗ trợ Automation cung cấp cho bạn cách tương tác viết lệnh giống với chương trình VB 1.1 Sử dụng Automation VB.NET Trong VB bạn vừa tạo ứng dụng dạng đối tượng dạng server, client Trong phần sử dụng đối tượng server có sẵn Trong ứng dụng microsoft office có tập hợp đối tượng với phương thức hỗ trợ riêng Bạn xem chúng qua tài liệu hướng dẫn hay nhờ đối tượng Object Browser 1.2 Công cụ Visual Studio Object Browser Công cụ cho phép bạn thực quan sát nội dung đối tượng như: - Xem tất thuộc tính, phương thức tập đối tượng VB.NET Bạn biết tham số, kiểu liệu thuộc tính mục đích sử dụng chúng - Xem tất thuộc tính, phương thức tập ứng dụng Automation server cài hệ thống bạn Bây tạo chương trình MyExcelAutomation để dùng đối tượng Object Browser xem đối tượng ứng dụng MS.Excel 2003 Chương trình MyExcelAutomation: Bạn tạo giải pháp thêm vào dự án tên MyExcelAutomation biết Sau làm theo bước sau: - Chọn Project | Add Reference làm xuất hộp thoại hình: Biên soạn: Phạm Đức Lập -2- Add: cnt-44-dh, VIMARU Hướng dẫn lập trình VB.NET - Chương 13: Tự động hóa quản lý tiến trình Co tab hình, tab chứa tập đối tượng dùng theo chức riêng biệt - Nhấn chọn tab COM, đối tượng tab hệ thống đăng ký sẵn Registry windows (bạn xem Registry cách mở hộp thoại run gõ lệnh Regedit) - Bạn cuộn xuống tìm Microsoft Excel 11.0 Object Library, nhấn nút OK hình - Chọn View | Object Browser hay ấn phím F2 để mở cửa sổ cơng cụ Object Browser hình: Biên soạn: Phạm Đức Lập -3- Add: cnt-44-dh, VIMARU Hướng dẫn lập trình VB.NET - Chương 13: Tự động hóa quản lý tiến trình Bạn nhấn vào nút (+) kế bên Excel xem chi tiết thông tin đối tượng Automation mà Excel cung cấp - Nếu cần bạn ấn tiếp nút (+) nhánh Application để xem danh sách phương thức, kiện thuộc tính dành cho đối tượng xuất khung Member of: Excel bên phải Chúng phương thức cho phép bạn truy cập bảng tính Excel - Bạn xem phương thức phần liệt kê khung member Ví dụ ta xem phương thức Quit phương thức đóng ứng dụng Excel ứng dụng Automation Bây sau xem xét phương thức, đối tượng với Object Browser sử dụng Atomation Excel chương trình Tự động hóa Atomation EXCEL chương trình Visual Basic Sau bước tổng quát để sử dụng lệnh Excel đối tượng Automation nói chung: B1 Thêm vào dự án tham chiếu trỏ đến thư viện đối tượng mà bạn muốn truy xuất lệnh Add Reference biết phần B2 Viết chương trình VB Dùng phát biểu Dim để khai báo sử dụng đối tượng Atomation Tiếp theo dùng hàm Ctype CreatObject để tạo thể cho đối tượng: Dim xlApp As Excel.Application xlApp = CType(CreateObject("Excel.Application"), _ Excel.Application) Trong VB.NET sử dụng chế ràng buộc sớm (early binding) Sau tạo đối tượng nên dùng hàm Ctype chuyển đổi đối tượng kiểu tường minh để biên dịch VB.NET biết kiểu B3 Sử dụng phương thức, thuộc tính đối tượng Atomation chương trình Nếu chưa nắm rõ bạn xem lại Object Browser biết Ví dụ: Dim loanPayment As Single loanPayment = xlApp.WorksheetFunction.Pmt _ (txtInterest.Text / 12, txtMonths.Text, txtPrincipal.Text) B4 Khi hoàn thành việc sử dụng đối tượng Automation bạn gọi phương thức Quit để chấm dứt sử dụng chúng: xlApp.Quit() Biên soạn: Phạm Đức Lập -4- Add: cnt-44-dh, VIMARU Hướng dẫn lập trình VB.NET Chương 13: Tự động hóa quản lý tiến trình Trong tập ExcelPayment sau dùng tính tốn tự động Excel để tính số tiền phải trả thuê nhà 2.1 Chương trình ExcelPayment Tìm hiểu chương trình: Chương trình có form, form có ba textbox cho phép nhập vào mức lãi suất, số tháng số tiền đơn giá thuê nhà Khi người dùng click vào nút tính tiền chương trình tính số tiền hàng tháng phải trả Thiết kế giao diện: Giao diện chương trình hình: Trong thuộc tính name textbox sau: “Lãi suất” – txtLaisuat, “Số tháng” – txtSothang, “Giá thuê nhà” – txtGia Button “Tính tiền” - btnTinhtien Viết mã: Do chương trình có sử dụng số hàm tốn học Abs nên ta cần khai báo Imports lớp Math đầu form sau: Imports System.Math Tạo thủ tục btnTinhtien_Click sau: Dim xlApp As Excel.Application Dim LoanPayment As Single xlApp = CType(CreateObject("Excel.Application"), Excel.Application) LoanPayment = xlApp.WorksheetFunction.Pmt _ (txtLaisuat.Text / 12, txtSothang.Text, txtGia.Text) MsgBox("Số tiền hàng tháng phải trả là: " & _ Format(Abs(LoanPayment), "$#.##"), , "ExcelPayment") xlApp.Quit() Biên soạn: Phạm Đức Lập -5- Add: cnt-44-dh, VIMARU Hướng dẫn lập trình VB.NET Chương 13: Tự động hóa quản lý tiến trình Chạy chương trình: Bạn chạy chương trình nhập vào ô textbox giá trị là: 0.09, 360, 150000 ấn nút Tính tiền để xem kết 2.2 Xử lý bảng tính Excel Bây xử lý bảng tính Excel thơng qua ví dụ MyExcelSheetTask sau Tìm hiểu chương trình: Chương trình đơn giản, có nút nhấn cho phép tạo bảng tính Excel với hàm tính tổng, dạng định dạng font lưu vào thư mục ổ cứng Thiết kế giao diện: Giao diện hình: Viết mã: Trước hết bạn cần tạo tham chiếu đến Automation Excel biết Tiếp theo tạo thủ tục Button1_Click sau: Biên soạn: Phạm Đức Lập -6- Add: cnt-44-dh, VIMARU Hướng dẫn lập trình VB.NET Chương 13: Tự động hóa quản lý tiến trình Dim xlApp As Excel.Application Dim xlBook As Excel.Workbook Dim xlSheet As Excel.Worksheet xlApp = CType(CreateObject("Excel.Application"), Excel.Application) xlBook = CType(xlApp.Workbooks.Add, Excel.Workbook) xlSheet = CType(xlBook.Worksheets.Add, Excel.Worksheet) 'Chèn liệu xlSheet.Cells(1, 2) = 5000 xlSheet.Cells(2, 2) = 75 xlSheet.Cells(3, 1) = "Tổng" 'Chèn cơng thức tính tổng xlSheet.Range("B3").Formula = "=Sum(R1C2:R2C2)" 'Định dạng ô xlSheet.Range("B3").Font.Bold = True 'Hiển thị bảng tính xlSheet.Application.Visible = True 'Lưu bảng tính vào thư mục xlSheet.SaveAs("D:\Data\Studying\VS.Net vb.net\Tung buoc lap trinh 05\Tung buoc lap trinh vb.net\13_Chapter13\Bai tap\MyExcelSheetTask\MyExcelSheetTask") Chạy chương trình: Bạn nhấn F5 để chạy chương trình Khởi động dừng chương trình Windows sử dụng đối tượng Process Như ta biết phương thức Process khởi động hay dừng ứng dụng hay tài liệu đăng ký Registry hệ thống Process.Start tự tìm đường dẫn chương trình để khởi động Nhược điểm ta phải tạo hàm CreatObject đối tượng Automation khác.Việc chấm dứt chương trình phải dựa vào thành phần đối tượng Process bảng công cụ Component ToolBox thực Trong tập MyStarApplication sau dùng Process để khởi động dừng chương trình NotePad windows Bạn dùng Process để khởi động hay chấm dứt chương trình windows Tìm hiểu chương trình: Chương trình gồm hai nút nhấn, nút “Start NotePad” cho phép khởi động chương trình NotePad Nút nhấn “Stop NotePad” cho phép dừng chương trình NotePad giống bạn click vào nút (X) bên góc phải chương trình thấy Thiết kế giao diện: Bạn tạo giải pháp thêm vào dự án có tên MyStartApplication, thiết kế giao diện hình: Biên soạn: Phạm Đức Lập -7- Add: cnt-44-dh, VIMARU Hướng dẫn lập trình VB.NET Chương 13: Tự động hóa quản lý tiến trình Viết mã: Bạn thêm vào form đối tượng Process ToolBox cách double click vào đối tượng hay kéo thả Đổi thuộc tính Name thành noteProcess Để cho noteProcess khởi động chương trình NotePad bạn định chương trình NotePad.exe thuộc tính FileName phần StartInfo (click vào dấu + bên trái) hay định lúc chương trình thực thi Để sử dụng lớp đối tượng Process ta cần khai báo yêu cầu sử dụng lớp phát biểu Imports đầu mã sau: Imports System.Threading Imports System.Diagnostics Ở định sẵn thuộc tính FileName NotePad.Exe Tiếp theo tạo thủ tục btnStartNote_Click (btnStartNote thuộc tính Name nút nhấn “Start NotePad”) sau: noteProcess.Start() Tạo thủ tục btnStopNote_Click (btnStopNote thuộc tính Name nút nhấn “Stop NotePad”) sau: noteProcess.CloseMainWindow() Phương thức CloseMainWindow() tương đương với việc người dùng click vào nút nhẫn close góc phải tiêu đề cửa sổ Bạn dùng phương thức Kill() phương thức khơng thân thiện, giống việc bạn dùng End Task Task Manager Chạy chương trình: Ấn F5 để thực thi chương trình Tổng kết chương 13 Bạn tạo bảng liệt kê biết chương làm lại ví dụ mở rộng thêm xuất tính tốn bảng tính excel Biên soạn: Phạm Đức Lập -8- Add: cnt-44-dh, VIMARU ... xlApp.Quit() Biên soạn: Phạm Đức Lập -5 - Add: cnt-44-dh, VIMARU Hướng dẫn lập trình VB.NET Chương 13: Tự động hóa quản lý tiến trình Chạy chương trình: Bạn chạy chương trình nhập vào ô textbox giá trị là:... bước sau: - Chọn Project | Add Reference làm xuất hộp thoại hình: Biên soạn: Phạm Đức Lập -2 - Add: cnt-44-dh, VIMARU Hướng dẫn lập trình VB.NET - Chương 13: Tự động hóa quản lý tiến trình Co tab.. .Hướng dẫn lập trình VB.NET - Chương 13: Tự động hóa quản lý tiến trình MS.Outlook 2003, 2002, 2000, 97 – 98 Hiện Microsoft thức cho phép VB ngơn ngữ lập trình thức cho ứng dụng nên hầu hết ứng