HƯỚNG dẫn lập TRÌNH VBA TRONG POWERPOINT ỨNG DỤNG NGÔN NGỮ lập TRÌNH VBA TRONG SOẠN GIẢNG

Chuyên đề 2011 – 2012 Phạm Xuyên-THCS Quang Trung ỨNG DỤNG NGƠN NGỮ LẬP TRÌNH VBA TRONG SOẠN GIẢNG I/ ĐẶT VẤN ĐỀ 1/ Mở đầu Trong thời gian gần việc thiết kế giảng tương tác với hỗ trợ máy tính vấn đề quan tâm nhiều giáo viên Có nhiều phần mềm máy tính hỗ trợ thiết kế tương tác chuyên nghiệp Director, Flash, Violet phần mềm tập huấn từ chương trình VVOB Tuy nhiên đa số giáo viên ưa thích dùng Powerpoint họ quen thuộc v ới phần mềm từ trước Với Powerpoint truyền thống giáo viên thường sử dụng hiệu ứng (effect), hoạt cảnh (animation) thành phần multimedia hình ảnh, âm thanh, siêu liên kết (Hyperlink), video nhúng trực tiếp vào Powerpoint Những trình chiếu mang tính minh họa (người xem nghe tiếp nhận) không tương tác với người dùng (người nghe tác động lên trình chiếu trình chiếu trả kết tương ứng) Bằng cách sử dụng ngơn ngữ lập trình VBA (Visual Basic for Application) tích hợp sẵn Powerpoint2003 ta tạo kiểu tương tác trình chiếu Mong chuyên đề làm tiền đề cho yêu thích việc thiết kế giảng tương tác dạy học 2/ Thực trạng vấn đề Trong thời gian qua, qua thực tế giảng dạy qua dự đồng nghiệp nhận thấy giảng Power Point theo lối truyền thống có hạn chế sau: - Với học có thí nghiệm, thực hành nhóm học sinh giáo viên dạy GA ĐT giáo viên thường phải chuẩn bị bảng phụ có vẽ sẵn bảng bảng biểu để ghi kết thí nghiệm nhóm cho lớp quan sát, giáo viên khơng thể ghi kết thí nghiệm thực hành trực tiếp bảng trình chiếu Nếu muốn ghi phải dùng công cụ vẽ để vẽ chuột, số liệu ghi đường cong nguệch ngoạt, số chẳng số mà hình chẳng hình - Các số liệu kết phép tính bảng biểu bảng trình chiếu giáo viên thiết kế sẵn nhập tính linh hoạt trực tiếp bảng trình chiếu - Nếu gặp tập tương tự nhau, khác số liệu giáo viên phải thiết kế lại từ đầu đến cuối, làm nhiều thời gian mà lại khơng có tính hấp dẫn trình chiếu trước học sinh - Đối với tập điền khuyết tập trắc nghiệm nhiều lựa chọn đáp án giáo viên chuẩn bị sẵn, học sinh trả lời GV “Enter” đề cho đáp án xuất Như thiết kế bảng trình chiếu hồn tồn hiệu ứng PowerPoint giảng hồn tồn khơng có tương tác người học với bảng trình chiếu Nếu muốn tạo tương tác GV phải thiết kế hiệu ứng đơn điệu mà lại tốn thời gian - Phần mềm luyện tập thực hành “HotPotatoes” tập huấn tiện ích thiết kế tập luyện tập thực hành Tuy nhiên nhược điểm phần mềm Chuyên đề 2011 – 2012 Phạm Xuyên-THCS Quang Trung tạo giao diện không đẹp mắt; phải trải qua nhiều công đoạn để chèn vào giảng; PowerPoint đóng gói khơng hết 3/ Giới hạn chun đề Vì khơng thể trình bày hết cách rõ ràng ngơn ngữ lập trình VBA nên chun đề trọng đến vấn đề thường gặp sau: - Ghi số liệu trực tiếp vào bảng giảng trạng thái trình chiếu - Lập cơng thức để kết tính tốn thực giảng nhấp chuột - Thiết kế tập trắc nghiệm nhiều lựa chọn có tương tác, phản hồi - Thiết kế tập điền khuyết có từ gợi ý cho trước có tương tác , phản hồi - Thiết kế tập điền khuyết khơng có từ gợi ý cho trước có tương tác phản hồi II/ GIẢI QUYẾT VẤN ĐỀ Với ưu điểm PowerPoint tạo hiệu ứng trình diễn sống động, định dạng màu sắc đẹp mắt tích hợp sẵn ngơn ngữ lập trình VBA Tơi nhận thấy PowerPoint vừa khơng xa lạ lại vừa khắc phục số hạn chế thường gặp nêu nên ứng dụng PowerPoint thiết kế giảng sau: 1/Giới thiệu công cụ dùng thiết kế giảng tương tác Trong PowerPoint, công cụ dùng thiết kế giảng tương tác Control ToolBox: Để có cơng cụ ta vào View Toolbars Control Toolbox: Tên công dụng số đối tượng (công cụ) thường dùng: Chuyên đề 2011 – 2012 Phạm Xuyên-THCS Quang Trung + Label: Dùng để nhập, hiển thị số, nội dung văn hay từ Chỉ nhập, điều chỉnh nội dung hiển thị Label bảng trình chiếu trạng thái thiết kế (End show) dùng ngơn ngữ lập trình để hiển thị nội dung trình chiếu (Show) + Text Box: Cũng dùng để nhập, hiển thị nội dung Chỉ nhập, điều chỉnh nội dung trình chiếu, dùng ngơn ngữ lập trình + Check Box: Dùng để hiển thị số, nội dung văn hay từ đó, thường dùng cho trường hợp câu trắc nghiệm có nhiều lựa chọn + Option Button: Cũng giống Check Box thường dùng cho trường hợp câu trắc nghiệm có lựa chọn + Properties: Mở cửa sổ dùng dùng để định dạng: màu nền, màu chữ, cỡ chữ, đặt tên… cho đối tượng Sau nhấn vào nút xuất cửa sổ hình bên * Để vẽ đối tượng slide, ta nhấp chuột vào đối tượng nhấn giữ chuột kéo rê chuột slide Ví dụ sau vẽ Label slide: Chọn kéo rê chuột Kết vẽ Label *Để nhập nội dung cho đối tượng: Label, Check box …ta nhấn chuột phải vào đối tượng, chọn Label Object (hoặc CheckBox Object)…  chọn Edit  Nhập nội dung Chuyên đề 2011 – 2012 Phạm Xuyên-THCS Quang Trung 2/ Một số định dạng thường gặp cho đối tượng a) Cửa sổ lập trình VBA Có thể mở cửa sổ lập trình cách: + Nhấn Alt + F11 + Nhấp đôi vào đối tượng vẽ slide thiết kế (cách thường dùng) + Để định dạng cho đối tượng ta nhấp chuột vào biểu tượng Properties (có hình bàn tay) b) Một số định dạng cho đối tượng thường gặp: * Cách thực định dạng cho đối tượng: Bước 1: Nhấp chọn đối tượng cần định dạng Bước 2: Nhấp chọn nút Properties (có hình bàn tay)  Xuất cửa số định dạng Bước 3: Định dạng, đặt tên, nhập nội dung + Đặt tên: Nhấp chọn mục Name để đặt tên đối tượng (chỉ đặt tên cho đối tượng mà ngơn ngữ lập trình có nhắc đến nó, nên đặt tên cho đơn giản dễ nhớ) Ví dụ: Label để hiển thị giá trị điện trở, ta đặt tên “R”) + Chọn màu nền: Nhấp chọn mục BackColor để chọn màu Ví dụ: Theo mặc định Textbox có trắng, muốn đổi màu khác nhấp chuột vào mục BackColor xuất bảng chọn màu chọn màu mà ta muốn Chuyên đề 2011 – 2012 Phạm Xuyên-THCS Quang Trung + Chọn màu khung: Nhấp chọn mục BoderColor để chọn màu khung (làm tương tự ví dụ trên) + Nhập nội dung: Nhấp chọn mục Caption để nhập nội dung cần hiển thị Có thể nhập nội dung hiển thị cách khác mà không thấy chữ bị lỗi Font nhập là: Chọn đối tượng Nhấn chuột phải  Chọn Label Object (nếu nhập nội dung cho Label) Edit Ví dụ: Nhập nội dung hiển thị cho nút lệnh Command Button: Nhấn chuột phải vào Command Button  Conmand Button Opject  Edit (như hình dưới) để điều chỉnh nội dung hiển thị (caption) Command button Lưu ý: Trong ô “Caption” cửa số Properties ta nhìn thấy chữ bị lổi Font trình chiếu bình thường + Chọn Font: Nhấp chọn mục Font để chọn Font chữ (nên chọn bảng mã Unicode) Ví dụ: Nhấp chuột vào mục Font xuất hộp thoại chọn Font, ta chọn Font theo ý muốn  Nhấn OK + Chọn màu chữ: Nhấp chọn mục: ForeColor để chọn màu chữ Ví dụ: Nhấp chuột vào mục ForeColor xuất hộp thoại chọn màu, ta chọn màu theo ý muốn (giống chọn màu nền) Chuyên đề 2011 – 2012 Phạm Xuyên-THCS Quang Trung + Canh giữa: Sau nhấp chuột vào mục TextAlign xuất lựa chọn: 1- fmTexxtAlignLeft: Canh trái 2- fmTexxtAlignCenter: Canh 3- fmTexxtAlignRight: Canh phải 3/ Xây dựng số kiểu tương tác giảng a) Ghi số liệu, văn bản…vào giảng trình chiếu Giả sử tơi có bảng trình chiếu ghi kết thí nghiệm đo điện trở dây dẫn ampe kế vơn kế cho nhóm: K.Quả TN Nhóm Nhóm I Nhóm II Nhóm III Nhóm IV Cường độ dòng điện (A) Hiệu điện (V) Điện trở ( ) Để ghi số liệu kết thí nghiệm HS vào bảng trình chiếu, ta nhấp vào biểu tượng Text Box vẽ Text Box vào bảng biểu vị trí thích hợp sau tiến hành định dạng Khi ta hồn tồn nhập số liệu vào giảng điện tử trình chiếu Ví dụ: Bảng ghi kết sau vẽ TextBox nhập liệu trình chiếu: * Lưu ý: Ta nên định dạng cho TextBox (hoặc đối tượng đó) copy thành nhiều TextBox để khỏi thời gian Sau copy đặt TextBox vị trí trương ứng, ta hồn tồn nhập số liệu vào bảng trình chiếu b) Lập trình để kết tính tốn thực giảng Chuyên đề 2011 – 2012 Phạm Xuyên-THCS Quang Trung Ví dụ: Giả sử lập cơng thức tính điện trở R cho nhóm I (ở trên) Bước 1: -Vẽ TextBox1 cột cường độ dịng điện (nếu chưa có) Nhấp đơi vào TextBox để mở sổ lập trình (hoặc nhấn nút Properties – hình bàn tay) Trong mục Name đặt tên TextBox I: - Vẽ TextBox2 cột hiệu điện (nếu chưa có), làm tương tự để đặt tên U - Vẽ Label cột điện trở  Định dạng Đặt tên R (có thể khơng cần xóa nội dung “Label” có) Bước 2: - Nhấp đơi vào Label (R) vừa vẽ đặt tên  Mở cửa sổ VBA để bắt đầu lập trình Khi ta thấy trỏ soạn thảo nhấp nháy hai dịng chữ Đó nơi để ta viết ngơn ngữ lập trình: - Ta đánh vào dịng lệnh dưới, sau nhấn Alt + Q để đóng sổ VBA - Trình chiếu giảng  Nhập giá trị cho cường độ dòng điện 1,5A; Cho hiệu điện 3,0V  Nhấp chuột vào Label cột “điện trở” ta thấy kết  Nếu thay đổi giá trị U I sau nhấp chuột vào R ta nhận kết tương ứng Chuyên đề 2011 – 2012 Phạm Xuyên-THCS Quang Trung - Tiến hành tương tự để lập cơng thức tính điện trở cho nhóm cịn lại Nhưng nhớ tên TextBox Label không trùng * Lưu ý: Cách làm nhanh cho nhóm khác: - Để khỏi tốn thời gian cho việc tạo định dạng đối tượng I, U, R nhóm 2, 3, ta copy đối tượng vừa tạo cho nhóm đặt tên lại cho nhóm 2, 3, - Để khỏi tốn nhiều thời gian cho việc lập công thức tính điện trở nhóm cịn lại ta làm sau: 1- Đặt tên textbox label nhóm là: I2 ; U2 ; R2 - Đặt tên textbox label nhóm là: I3 ; U3 ; R3 - Đặt tên textbox label nhóm là: I4 ; U4 ; R4 2- Nhấp đơi vào Label (R) nhóm để làm xuất cơng thức tính R nhóm copy cơng thức dán xuống phía 3- Sửa tên TextBox Label lại cho tương ứng với đại lượng I, U, R nhóm Ví dụ: Như hình b) Thiết kế tập trắc nghiệm nhiều lựa chọn có tương tác, phản hồi - B1: Biên soạn câu hỏi trắc nghiệm PowerPoint thông thường làm - B2: Nhấp vào biểu tượng Check box vẽ Check box trước phương án trả lời A, B, C, D - B3: Lập trình tương tác: Làm xuất hộp thoại thông báo “Đúng” “Sai” nhấp chuột vào Nút “Kết quả” @ Đặt tên Check box “ca”, “cb”, “cc”, “cd” @ Nhấp chuột vào nút “Command Button” rrồi vẽ “Command Buttun” Chuyên đề 2011 – 2012 Phạm Xuyên-THCS Quang Trung @ Nhấp chuột vào nút Properties (có hình bàn tay) để làm xuất hộp thoại Properties Sửa thuộc tính Caption Command Button thành “Kết qủa” (Hoặc nhấp đôi vào Command Button) Ta nút lệnh “KẾT QUA”  Cũng thực điều cách nhấn chuột phải vào Command Button  Conmand Button Opject  Edit (như hình dưới) để điều chỉnh nội dung hiển thị (caption) Command button Kết thu là: @ Nhấp đôi vào nút “KẾT QUẢ” để mở cửa sổ lập trình  Đánh vào dịng lệnh hình (Trong trường hợp giả sử phương án A phương án đúng) Chuyên đề 2011 – 2012 Phạm Xuyên-THCS Quang Trung @ Sau nhấn Alt + Q để đóng sổ lập trình - B4: Trình chiếu giảng để xem kết quả: Thử Check chọn phương án A B nhấn nút “KET QUA” để thấy kết phản hồi Lưu ý: Vì VBA không hỗ trợ phông Unicode nên ta đánh Tiếng Việt có dấu sổ lập trình Vì phản hồi khơng đẹp mắt Để khắc phục vấn đề ta phải tạo thêm MsgBox giả lập sửa câu lệnh lại chút Bước 1: Nhấn Alt + F11 để mở cửa sổ VBA Bước 2: Nhấp vào nút Insert UserForm để tạo Usert Form Bước 3: Nhấp chuột công cụ có chữ A (trong cơng cụ Toolbox) để vẽ Label Usert Form sửa nội dung hiển thị thành “ĐÚNG”  Nhấn nút Properties để định dạng cỡ chữ, màu chữ …(hình dưới, bên trái) Bước 4: Vẽ thêm Comman Button sửa lại thành nút OK (hình bên phải) Bước 5: Đặt tên Usert Form “Dung” Bước 6: Nhấp đôi nút OK đánh vào dòng chữ: Unload Me (đây lệnh để làm đóng Form phản hồi)  Làm tương tự để có Usert Form phản hồi “SAI” đặt tên Form “Sai” Như ta có sẵn MsgBox giả lập cho giảng trích xuất sang giảng khác cần 10 Chuyên đề 2011 – 2012 Phạm Xuyên-THCS Quang Trung Quay trở lại tập trắc nghiệm lựa chọn nói trên, nhấp đơi vào nút lệnh “Kết quả”, sửa câu lệnh: MsgBox “DUNG” thành: Dung.Show MsgBox “SAI” thành: Sai.Show Như vậy, trình chiếu, phản hồi trở nên đẹp mắt d) Thiết kết tập điền khuyết khơng có từ gợi ý, có phản hồi tương tác - B1: Soạn thảo nội dung tập điền khuyết thường lệ - B2: Nhấp chuột vào nút TextBox để vẽ Textbox vị trí cần điền từ - B3: Vẽ Text box phụ tương ứng (các Textbox phụ ta làm ẩn trình chiếu) - B4: Định dạng, đặt tên cho cho TextBox làm (nhấp chuột vào Textbox  nhấp vào nút có hình bàn tay) VD: Một câu điền khuyết có hai từ cần điền, ta đặt tên cho Textbox T1, T2 đặt tên cho Textbox phụ Tp1, Tp2 (2 TextBox phụ chứa hai nội dung đáp án hai chỗ trống cần điền, Textbox ta cho ẩn trình chiếu) - B5: Vẽ Command Button điều chỉnh nội dung hiển thị thành “KET QUA” nhấp đôi chuột vào để mở cửa sổ lập trình Đánh vào dịng lệnh hình dưới: Hoặc thay lệnh: MsgBox “DUNG” thành lệnh Dung.Show MsgBox “SAI” thành lệnh Sai.Show - B6: Nhấn Alt + Q để đóng cửa sổ lập trình Trình chiếu giảng nhấn nút “KET QUA” để xem kết phản hồi Nhập nội dung đáp án hai từ cần điền vào hai TextBox phụ Tp1 ; Tp2 11 Chuyên đề 2011 – 2012 Phạm Xuyên-THCS Quang Trung - B7: Thiết lập thuộc tính ẩn cho hai Texbox phụ để khơng cịn thấy trình chiếu: Nhấn chọn Textbox phụ cần làm ẩn  Nhấn nút Properties (hình bàn tay) Trong khung Properties, mục Visible chọn False để ẩn hai texbox Như trình chiếu ta không thấy hai từ “thuận”, “nghịch” đáp án - B8: Trình chiếu giảng, điển từ vào chỗ trống nhấn nút “kết quả” để xem phản hồi b) Thiết kết tập điền khuyết có từ gợi ý, có phản hồi tương tác - B1: Soạn nội dung tập điền khuyết thường lệ (giả sử có hai từ cần điền, hai từ gợi ý cho trước) - B2: Vẽ Label vị trí cần điền từ, vẽ Label để ghi từ gợi ý tương ứng vẽ thêm Label trung gian - B3: Định dạng đặt tên cho Label: + Định dạng + Đặt tên: (Việc đặt tên tùy người)  Đặt tên cho Label cần điền từ L1, L2  Đặt tên cho hai Label phụ tương ứng Lp1, Lp2  Đặt tên cho Label trung gian Tg + Điều chỉnh thuộc tính Caption(nội dung hiển thị)  Đối với hai Label cần điền từ L1, L2: ta điều chỉnh nội dung hiển thị (1), (2)  Đối với hai Label phụ “Lp1”, “Lp2” ta điều chỉnh Caption thành nội dung từ gợi ý  Label trung gian “Tg” không cần điều chỉnh (Ta làm ẩn trình chiếu) - B4: Vẽ Command Button đặt thuộc tính Caption “KET QUA”, định dạng theo ý muốn, đặt tên “Kq” - B5: Lập trình:  Nhấp đơi vào hai Label: L1, L2 Đánh hai dòng lệnh tương ứng sau: Privare Sup L1_Click() L1.Caption = Tg.Caption End sup Privare Sup L2_Click() L2.Caption = Tg.Caption 12 Chuyên đề 2011 – 2012 Phạm Xuyên-THCS Quang Trung End sup (Nếu có nhiều từ cần điền copy xuống sửa lại cho nhanh)  Nhấp đôi vào hai Label phụ Lp1, Lp2 Đánh hai dòng lệnh tương ứng sau: Privare Su Lp1_Click() Tg.Caption = Lp1.Caption End sup Privare Sup Lp2_Click() Tg.Caption = Lp2.Caption End sup  Nhấp đôi vào nút “KET QUA” đánh dòng lệnh sau: Privare Sup Kq_Click() If L1.Caption = Lp1.Caption And L2.Caption = Lp2.Caption Then MsgBox “ĐÚNG” Else MsgBox “SAI” End if End sup Hoặc thay lệnh: MsgBox “DUNG” thành lệnh MsgBox “SAI” thành lệnh Dung.Show Sai.Show - B6: Nhấn Alt + Q để đóng số VBA, trình chiếu thử: + Nhấp vào từ gợi ý: Khi Label trung gian nhận Caption từ gợi ý + Nhấp vào từ cần điền: Khi Label cần điền từ nhận giá trị từ Label trung gian + Nhấp vào nút kết quả: xuất thông báo “đúng” “sai” - B7: Thiết lập thuộc tính ẩn cho Label trung gian + Nhấp chọn Label trung gian (Tg) + Mở hộp thoại Properties + Trong mục Visible chọn False Như ta làm xong dạng tập III/ KẾT LUẬN Tóm lại, cơng việc thiết kế nội dung tương tác giảng gồm bước sau: Bước 1: Soạn nội dung câu hỏi, tập PowerPoint ta thường làm Bước 2: Vẽ đối tượng: Label, TextBox, Check Box, Command Button … Bước 3: Định dạng cho đối tượng Bước 4: Đặt tên cho đối tượng Bước 5: Viết câu lệnh Bước 6: Trình chiếu thử, khắc phụ sai sót có 13 Chuyên đề 2011 – 2012 Phạm Xuyên-THCS Quang Trung Để có giảng tương tác sinh động, thời gian đầu chắn làm tốn nhiều thời gian chưa quen với ngơn ngữ lập trình Tuy nhiên quen với ngơn ngữ lập trình ta thấy thích thú kiểu giảng mà ta thường làm PowerPoint tính sinh động Việc thiết kế bảng trình chiếu tương tác đa dạng, tùy thuộc vào sáng tạo giáo viên Ở chuyên đề nêu dạng bản, điển hình, thường gặp dễ làm Mong chuyên đề làm tiền đề cho yêu thích kiểu thiết kế giảng Từ tiếp tục khám phá thêm ưu điểm ngơn ngữ lập trình để ứng dụng dạy học Mặc dù chuyên đề cố gắng để trình bày thật kĩ để người hiểu Tuy nhiên, với thân tôi, kinh nghiệm CNTT “tay ngang”, tự tìm hiểu mà có nên chắn trình bày khơng tránh khỏi sai sót, hạn chế Kính mong đồng nghiệp đóng góp, chia sẻ thêm kinh nghiệm để nội dung chuyên đề hoàn thiện Đại Hưng, ngày tháng năm 2012 NGƯỜI VIẾT Phạm Xuyên 14 ... sổ VBA để bắt đầu lập trình Khi ta thấy trỏ soạn thảo nhấp nháy hai dòng chữ Đó nơi để ta viết ngơn ngữ lập trình: - Ta đánh vào dòng lệnh dưới, sau nhấn Alt + Q để đóng sổ VBA - Trình chiếu giảng. .. số hạn chế thường gặp nêu nên ứng dụng PowerPoint thiết kế giảng sau: 1/Giới thiệu công cụ dùng thiết kế giảng tương tác Trong PowerPoint, công cụ dùng thiết kế giảng tương tác Control ToolBox:... II/ GIẢI QUYẾT VẤN ĐỀ Với ưu điểm PowerPoint tạo hiệu ứng trình diễn sống động, định dạng màu sắc đẹp mắt tích hợp sẵn ngơn ngữ lập trình VBA Tơi nhận thấy PowerPoint vừa khơng xa lạ lại vừa