SỞ GIÁO DỤC VÀ ĐÀO TẠO AN GIANG TRƯỜNG THPT NGUYỄN QUANG DIÊU
BÁO CÁO TÓM TẮT SÁNG KIẾN
TÊN ĐỀ TÀI
SỬ DỤNG LẬP TRÌNH VBA THIẾT KẾ ĐỒ DÙNG DẠY HỌC TRÊN POWERPOINT PHỤC VỤ HIỆU QUẢ VÀO GIẢNG DẠY
: Chuyên môn : Võ Thành Sơn : Tin học
Lĩnh vực Họ và tên Tổ Điện thoại : 0377 955 964
Năm học: 2019 - 2020
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
CỘNG HÒA XÃ HỘI CHỦ NGHĨA VIỆT NAM Độc lập – Tự do – Hạnh phúc
PHIẾU ĐĂNG KÝ SÁNG KIẾN
1. Họ và tên người đăng ký: Võ Thành Sơn 2. Chức vụ: Giáo viên 3. Đơn vị công tác: Trường THPT Nguyễn Quang Diêu 4. Nhiệm vụ được giao trong đơn vị: Giảng dạy và phụ trách phòng máy tính 5. Tên đề tài sáng kiến: Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint
phục vụ hiệu quả vào giảng dạy
6. Lĩnh vực đề tài sáng kiến: Chuyên môn 7. Tóm tắt nội dung sáng kiến:
- Xây dựng bài giảng tương tác trực tiếp trên nền PowerPoint để hỗ trợ học tập môn Tin học 11 vừa mang tính trực quan, sinh động vừa cung cấp cho các em tương đối đầy đủ các kiến thức trọng tâm theo từng bài dạy, các dạng bài tập và đánh giá được năng lực học sinh. Bài giảng tương tác VBA tuy chỉ được xây dựng đơn giản với công cụ thực hiện là ngôn ngữ lập trình Visual Basic for Appliacations được tích hợp trong Microsoft Office nhưng nội dung kiến thức bám sát chương trình tin học phổ thông, từ đó kích thích các đối tượng học sinh đặc biệt là các đối tượng trung bình, yếu để nâng cao chất lượng học tập của các em.
- Áp dụng dạy học trên nền PowerPoint là rất quen thuộc đối với học sinh nên khả năng tiếp thu bài học của các em sẽ nhanh hơn, tạo môi trường tương tác bài học thuận lợi trong tiết học giúp mang lại hiệu quả cao tiết dạy.
- Để thực hiện dạy học tương tác với học sinh trong các bài giảng ta cần sử dụng phần mềm ActivInspire với bảng tương tác ActivBoard. Tuy nhiên, sử dụng bộ công cụ trên thì tốn rất nhiều kinh phí để mua thiết bị. Vì vậy, khi tạo được bài giảng tương tác bằng cách sử dụng lập trình VBA trong PowerPoint giúp không tốn khoản phí lớn để mua bộ công cụ trên; hoạt động giảng dạy rất thuận lợi, khắc phục được những khó khăn của bộ môn trong việc tăng cường phát huy các kỹ năng cho học sinh trong học tập, mang lại hiệu quả cao. Bài giảng có tính tương tác cao, dễ sử dụng, thao tác trên bài học đạt độ chính xác cao, luôn ổn định và tiện lợi trong dạy học với nhiều dạng bài học, bài tập khác nhau.
- Giáo viên có thể vận dụng lập trình VBA tạo một vài sản phẩm trò chơi khởi động thu hút học sinh giúp tiết học thêm phần sôi động với nhiều môn học khác nhau như: Lý, Hóa, Sinh, Anh Văn..... nhằm tạo môi trường học tập yêu thích, tăng cường phát triển kỹ năng cho học sinh.
8. Thời gian, địa điểm, công việc áp dụng sáng kiến:
- Thời gian áp dụng sáng kiến năm học 2015 - 2016 đến nay - Địa điểm áp dụng sáng kiến là trường THPT Nguyễn Quang Diêu - Công việc đảm bảo năng cao các kỹ năng học sinh trong học tập, nắm vững kiến thức môn
học, năng cao chất lượng bộ môn.
GV: Võ Thành Sơn 2
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
9. Các điều kiện cần thiết để áp dụng sáng kiến:
Sự hỗ trợ giúp đỡ của Ban giám hiệu nhà trường tạo điều kiện thuận lợi cho giáo viện ứng dụng công nghệ thông tin, sáng tạo đồ dùng dạy học tự làm phục vụ giảng dạy; cùng với sự hỗ trợ giúp đỡ của tổ bộ môn trong việc thảo luận về nội dung kiến thức đưa vào giảng dạy phù hợp với học sinh.
10. Đơn vị áp dụng sáng kiến: Trường THPT Nguyễn Quang Diêu 11. Kết quả đạt được:
- Bài giảng ứng dụng VBA giúp học sinh học tập môn Tin học 11 một cách sôi động, phát triển các kỹ năng trong học tập, kỹ năng làm việc nhóm hiệu quả, ý thức học tập cao, giáo viên có thể đánh giá kiến thức học sinh tại lớp một cách trực quan nhằm điều chỉnh phương pháp giảng dạy phù hợp với đối tượng học sinh. Học sinh được tiếp cận với phương pháp học tập mới, phát huy tính tự học, sáng tạo của bản thân, kích thích học sinh càng yêu thích ngành công nghệ thông tin, tạo động lực học tập tốt góp phần cải thiện được kết quả học tập bộ môn.
An Giang, ngày 25 tháng 12 năm 2019 Tác giả
- Sau khi áp dụng đồ dùng vào giảng dạy học sinh đạt loại khá giỏi tăng đáng kể qua hàng năm, học sinh trung bình giảm; góp phần nâng cao tỉ lệ học sinh giỏi bộ môn tăng hàng năm, giảm tỉ lệ học sinh trung binh và không có học sinh yếu. Võ Thành Sơn
GV: Võ Thành Sơn 3
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
MỤC LỤC
I. Sơ lược lý lịch tác giả ............................................................................................. Trang 6
II. Sơ lược đặc điểm tình hình đơn vị ........................................................................ Trang 6
III. Mục đích yêu cầu của sáng kiến ........................................................................... Trang 7
1. Thực trạng ban đầu trước khi áp dụng sáng kiến ........................................... Trang 7
2. Sự cần thiết phải áp dụng sáng kiến ................................................................. Trang 9
3. Nội dung sáng kiến ........................................................................................... Trang 10
3.1. Tiến trình thực hiện ................................................................................. Trang 10
3.2. Biện pháp tổ chức .................................................................................... Trang 21
3.3. Thời gian thực hiện .................................................................................. Trang 26
IV. Hiệu quả đạt được ............................................................................................... Trang 27
1. Hiệu quả đạt được sau khi áp dụng sáng kiến ............................................... Trang 27
2. Lợi ích thu được khi áp dụng sáng kiến .......................................................... Trang 31
V. Mức độ ảnh hưởng .............................................................................................. Trang 32
VI. Kết luận: ............................................................................................................... Trang 33
GV: Võ Thành Sơn 4
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
DANH MỤC CHỮ VIẾT TẮT
VIẾT TẮT NỘI DUNG
Ban giám hiệu BGH
Giáo viên GV
Học sinh HS
Công nghệ thông tin CNTT
Visual Basic for Applications VBA
PowerPoint PPT
Đồ dùng dạy học ĐDDH
Trung học phổ thông THPT
Trung học cơ sở THCS
GV: Võ Thành Sơn 5
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
SỞ GIÁO DỤC VÀ ĐÀO TẠO AN GIANG TRƯỜNG THPT NGUYỄN QUANG DIÊU
CỘNG HÒA XÃ HỘI CHỦ NGHĨA VIỆT NAM Độc lập – Tự do – Hạnh phúc
An Giang, ngày 25 tháng 12 năm 2019
BÁO CÁO KẾT QUẢ THỰC HIỆN SÁNG KIẾN SỬ DỤNG LẬP TRÌNH VBA THIẾT KẾ ĐỒ DÙNG DẠY HỌC TRÊN POWERPOINT PHỤC VỤ HIỆU QUẢ VÀO GIẢNG DẠY
I. Sơ lược lý lịch tác giả
Họ và tên: Võ Thành Sơn Nam, nữ: Nam
Ngày tháng năm sinh: 01/01/1988
Nơi thường trú: Ấp Long Hiệp – Long An – TX Tân Châu – An Giang
Đơn vị công tác: Trường THPT Nguyễn Quang Diêu
Chức vụ hiện nay: Giáo viên
Lĩnh vực công tác: Giảng dạy và phụ trách phòng máy tính
II. Sơ lược đặc điểm tình hình đơn vị
1. Thuận lợi
- Đảng ủy, ban giám hiệu nhà trường quan tâm, chỉ đạo kịp thời trong các hoạt động của đơn vị. Tập thể sư phạm luôn nêu cao tinh thần đoàn kết, giúp đỡ nhau trong công việc, luôn tích cực hoàn thành tốt nhiệm vụ được giao.
- Cơ sở vật chất nhà trường khá đầy đủ tạo môi trường tốt cho học sinh đến trường sinh hoạt và học tập. Các trang thiết bị được cung cấp đầy đủ, tạo điều kiện giáo viên thực hiện việc đổi mới phương pháp giảng dạy.
- Đội ngũ giáo viên đa số trẻ, có tinh thần trách nhiệm cao, nhiệt tình, tâm huyết với nghề, có ý thức xây dựng đoàn kết nội bộ, có lòng tự trọng nghề nghiệp, có tinh thần học hỏi để vươn lên trong công tác, ý thức tổ chức kỷ luật tốt, gương mẫu trong công tác, chịu khó học hỏi kinh nghiệm, có đầu tư nghiên cứu chuyên môn, hết lòng quan tâm học sinh.
- Học sinh của trường đa số là con em của vùng nông thôn, sống chủ yếu bằng nghề nông,
có đạo đức tốt, biết vâng lời thầy cô.
GV: Võ Thành Sơn 6
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
2. Khó khăn
- Tập thể giáo viên trong đơn vị đa số trẻ, chưa tích lũy nhiều kinh nghiệm trong giảng dạy
và sáng tạo trong việc quản lý học sinh, từ đó ảnh hưởng đến chất lượng giảng dạy.
- Một bộ phận học sinh chưa ngoan, ý thức phấn đấu trong học tập chưa cao, cũng như tự
học tìm tòi kiến thức nên ảnh hưởng vào chất lượng giảng dạy của bộ môn.
- Tên sáng kiến: Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint phục vụ hiệu quả vào giảng dạy
- Lĩnh vực: Chuyên môn
III. Mục đích yêu cầu của sáng kiến
1. Thực trạng ban đầu trước khi áp dụng sáng kiến
Ứng dụng đồ dùng dạy học vào giảng dạy là rất cần thiết, để phục vụ hỗ trợ tốt cho việc giảng dạy của giáo viên nhằm mang lại hiệu quả cao trong tiết học và chất lượng học tập của học sinh. Vì vậy nhà trường đã trang bị một số thiết bị đồ dùng phục vụ giảng dạy và cũng đã giúp ít cho học sinh trong học tập tương đối tốt; nhưng càng về sau theo sự phát triển hiện đại của CNTT thì đồ dùng dạy học đã lỗi thời, không còn phù hợp với bài học, không đa dạng, học sinh cảm thấy nhàm chán; do đó không đáp ứng được nhu cầu học tập của học sinh, nội dung bài học, kiến thức bộ môn. Vì vậy khi giảng dạy tại lớp giáo viên thường gặp những khó khăn như:
- Sử dụng đồ dùng dạy học phù hợp với bài giảng, phù hợp bộ môn chưa đạt; phương pháp
truyền đạt và hiệu quả giảng dạy chưa tốt.
- Các bài giảng không trực quan sinh động, không thu hút nhiều học sinh tham gia vào hoạt
động học tập, ý thức học tập của học sinh kém, chất lượng bộ môn chưa cao.
- Bản thân chưa trang bị cho học sinh phương pháp tự học hiệu quả, dụng cụ phục vụ giảng dạy, học tập chưa đạt yêu cầu; chưa chú trọng rèn luyện các kĩ năng trong học tập cho học sinh; không có biện pháp giúp học sinh nắm bắt kiến thức chủ động linh hoạt, sáng tạo.
- Đồ dùng dạy học chưa phát huy được khả năng tự học của học sinh; kích thích khả năng tự
giác trong học tập của các em còn kém, chưa thích thú trong học tập.
- Chưa tạo được môi trường học tập tốt bằng cách tương tác trực tiếp trên bài giảng với nhiều
dạng khác nhau tạo tính chủ động, hứng thú học tập cho các em.
- Giáo viên gặp khó khăn trong việc lôi kéo các em tham gia học tập, để tạo điều kiện giúp học sinh có sự hòa nhập cùng bạn bè trong các hoạt động nhóm, hoạt động trải nghiệm sáng tạo, suy luận cùng giải quyết các vấn đề học tập.
- Học sinh còn phải ghi chép nội dung bài học quá nhiều nên khó tập trung vào các kiến thức
cần đạt trong bài học, nắm bắt bài giảng chậm, không hiệu quả.
GV: Võ Thành Sơn 7
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
- Để tạo được bài giảng tương tác với học sinh chúng ta cần sử dụng phần mềm ActivInspire với bảng tương tác ActivBoard; nhưng sử dụng bộ công cụ trên thì tốn rất nhiều kinh phí nên việc mua thiết bị phục vụ giảng dạy là không khả thi.
- Đối với môn Tin học 11 có vận dụng ngôn ngữ lập trình để viết chương trình cho một số bài toán nên đòi hỏi học sinh có tính tư duy cao, vận dụng kiến thức liên quan đến môn Toán và tiếng Anh tương đối nhiều, thường thì học sinh không hiểu. Bên cạnh đó khả năng tư duy của học sinh còn hạn chế nên áp dụng vào việc giải bài tập lập trình gặp nhiều khó khăn, hầu hết là các em chưa viết được chương trình Pascal.
- Ở cấp học THCS các em chưa làm quen với môn lập trình Pascal, vì vậy khi lên THPT các em còn chưa quen với môn học dẫn đến việc giảng dạy của giáo viên và tiếp thu kiến thức mới của học sinh chưa tốt. Bản thân học sinh chưa hiểu sâu về lợi ích của môn học và được ứng dụng rộng rãi trong xã hội. Trong quá trình dạy học để giúp học sinh hiểu, vận dụng được các kiến thức đã học vào giải các bài toán là một vấn đề rất khó với giáo viên. Giáo viên phải giúp học sinh cảm nhận được việc học môn Tin học và viết chương trình Pascal là không khó; Giáo viên phải vận dụng đồ dùng dạy học giúp học sinh có thể hiểu, biết được cấu trúc và viết được chương trình Pascal. Để đạt được những yêu cầu trên là một quá trình mất nhiều thời gian bởi giáo viên phải thực hiện từng bước một. Các chương trình Pascal khiến cho học sinh khó hiểu, khó hình dung khi các em mới lần đầu làm quen với cách viết chương trình Pascal.
- Chính từ trong những thực trạng đó, chất lượng bộ môn của bản thân trong những năm đầu trước khi áp dụng sáng kiến vào giảng dạy còn thấp. Kết quả giảng dạy chưa ổn định thấp hơn mặt bằng chung của tổ, tỉ lệ học sinh khá giỏi chỉ đạt 63,06%, tỉ lệ học sinh trung bình đạt 34,23% và có học sinh yếu chiếm 2,71%.
Biểu đồ thống kê tỉ lệ môn Tin học 11
45.00
42,60%
39,14%
40.00
34,23%
35.00
31,68%
31,38%
30.00
25.00
Cá nhân
20.00
17,30%
Bình quân tổ
15.00
10.00
5.00
2,71%
0,96%
0.00
Giỏi
Khá
Trung bình
Yếu
GV: Võ Thành Sơn 8
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
2. Sự cần thiết phải áp dụng sáng kiến:
- Việc xây dựng bài giảng tương tác trực tiếp trên nền PowerPoint để hỗ trợ học tập môn Tin học 11 vừa mang tính trực quan, sinh động vừa cung cấp cho các em đầy đủ các kiến thức trọng tâm theo từng bài dạy, các dạng bài tập đánh giá được năng lực học sinh. Bài giảng tương tác VBA được xây dựng với công cụ thực hiện là ngôn ngữ lập trình Visual Basic for Appliacations được tích hợp trong Microsoft Office với nội dung kiến thức bám sát chương trình tin học phổ thông, nhằm kích thích các đối tượng học sinh đặc biệt là các học sinh trung bình - yếu nâng cao chất lượng học tập.
- ĐDDH được thiết kế trên giao diện PPT là rất quen thuộc đối với học sinh nên khả năng tiếp thu bài học của các em sẽ nhanh hơn, tạo môi trường tương tác bài học thuận lợi giúp mang lại hiệu quả cao tiết dạy.
- Khi giáo viên tạo được bài giảng tương tác bằng cách sử dụng lập trình VBA trong PPT giúp không tốn khoản phí lớn để mua thiết bị. Ngoài ra giúp hoạt động giảng dạy rất thuận lợi, khắc phục được những khó khăn của bộ môn trong việc tăng cường phát huy các kỹ năng cho học sinh trong học tập, mang lại hiệu quả cao. Bài giảng có tính tương tác cao, dễ sử dụng, thao tác trên bài học đạt độ chính xác cao, luôn ổn định và tiện lợi trong dạy học với nhiều dạng bài học, bài tập khác nhau.
- Đồ dùng dạy học được thiết kế với nhiều màu sắc trực quan sinh động gây sự hứng thú khi tham gia học; bài giảng được thiết kế bằng giao diện nền đẹp gồm nhiều màu sắc kết hợp ngôn ngữ, tính toán, sắp xếp, hình vẽ, xử lý tổng thể ..... nhằm kích thích học sinh phát triển hoạt động hai bán cầu não khi tham gia học tập; giúp bán cầu não phải và bán cầu não trái cùng phát triển cân bằng trong quá trình hoạt động từ đó học sinh sẽ tiếp thu bài tốt, tỉnh táo, tập trung khi học tập.
- Việc sử dụng ĐDDH vào giảng dạy sẽ góp phần phát triển và hình thành các năng lực sau:
+ Năng lực tự học, năng lực sáng tạo.
+ Năng lực phát hiện và giải quyết vấn đề.
+ Năng lực giao tiếp và hợp tác.
+ Năng lực sử dụng ngôn ngữ.
+ Năng lực toán học.
+ Năng lực sử dụng công nghệ thông tin(năng lực tin học).
- Qua quá trình áp dụng sản phẩm vào giảng dạy cho thấy học sinh chủ động, học tập tích cực, chất lượng bộ môn được nâng cao. Giúp học sinh biết được nhiều ứng dụng, nhiều tính năng hay của bộ môn Tin học đối với đời sống thực tế hiện nay, từ đó các em có thể vận dụng kiến thức bộ môn để bổ trợ học tập cho các môn khác.
GV: Võ Thành Sơn 9
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
- Khi áp dụng sáng kiến vào giảng dạy chất lượng bộ môn của bản thân được cải thiện rõ rệt, đạt hiệu quả cao trong năm học đầu tiên 2015 – 2016. Kết quả giảng dạy được nâng cao với tỉ lệ học sinh khá giỏi đạt 89,58%, tỉ lệ học sinh trung bình đạt 10,42% và không có học sinh yếu kém. Bên cạnh đó chất lượng của tổ bộ môn cũng tăng rõ rệt khi sử dụng đồ dùng dạy học vào phục vụ giảng dạy; tỉ lệ học sinh khá giỏi tăng lên 87,4%, tỉ lệ học sinh trung bình đạt 11,81% và tỉ lệ học sinh yếu giảm còn 0,79%. Như vậy, khi sử dụng đồ dùng dạy học tự làm vào giảng dạy ta nhận thấy đạt hiệu quả cao, kết quả giảng dạy tin học của cá nhân tăng, đã góp phần năng cao chất lượng giảng dạy chung tổ bộ môn.
Biểu đồ thống kê tỉ lệ môn Tin học 11
70.00
60,84%
60.00
51,87%
50.00
37,71%
40.00
Cá nhân
30.00
26,56%
Bình quân tổ
20.00
11,81%
10,42%
10.00
0,79%
0.00
Giỏi
Khá
Trung bình
Yếu
- Ngoài ra giáo viên có thể vận dụng lập trình VBA tạo sản phẩm trò chơi khởi động thu hút học sinh giúp tiết học thêm phần sôi động và được ứng dụng rộng rãi với nhiều môn học khác nhau như: Lý, Hóa, Sinh, Anh Văn,.... nhằm tạo môi trường học tập yêu thích, tăng cường phát triển kỹ năng cho học sinh.
3. Nội dung sáng kiến
3.1. Tiến trình thực hiện
a) Xác định đối tượng học sinh
- Trước khi tạo ra các sản phẩm ĐDDH tự làm thì giáo viên phải xác định được các khối lớp, các đối tượng học sinh còn gặp khó khăn trong việc học bộ môn, những đối tượng học sinh có kết quả học tập thấp và cần xác định được những vướn mắt các em thường gặp trong việc học.
- Đối với bộ môn Tin học 11 bản thân nhận thấy rất khó đối với học sinh, điểm số bình quân các em đạt được là thấp hơn so với khối 10 và 12. Chương trình khối 11 các em học lập trình Pascal, đa phần học sinh khi học Pascal kết quả học tập không tốt, nội dung bài tập đa
GV: Võ Thành Sơn 10
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
dạng các em không nắm bắt được kiến thức, kết quả học tập thấp. Vì vậy xây dựng đồ dùng dạy học tự làm cho Tin học 11 là mục tiêu cần thiết của giáo viên nhằm tạo nhiều phương pháp giảng dạy, khai thác, sáng tạo các đồ dùng giúp các em thích thú trong học tập, các em tiếp xúc với bộ môn nhẹ nhàng hơn, giảm tải cho việc học, củng cố được nền tảng kiến thức cơ bản bộ môn; từ đó học sinh không còn áp lực khi tham gia các hoạt động học tập tại lớp, phát triển các kỹ năng trong các hoạt động học tập để cải thiện kết quả bộ môn.
b) Lựa chọn nội dung bài học cần thiết cho đồ dùng dạy học
- Bước đầu giáo viên cần hình thành những nội dung theo chuẩn kiến thức kỹ năng cần truyền đạt cho học sinh. Sau đó giáo viên sẽ tiến hành rà soát nội dung chương trình bài học cần thiết để sáng tạo đồ dùng dạy học.
- Giáo viên thu thập thông tin tài liệu có liên quan đến nội dung bài học cũng như việc tìm hiểu các tài nguyên, khai thác phần mềm ứng dụng và nghiên cứu cách sáng tạo ra đồ dùng dạy học. Giáo viên sẽ tạo ra các dạng đồ dùng phù hợp với từng bài học, bài tập cụ thể nhằm đạt được mục tiêu về kiến thức kỹ năng cho từng bài, đồng thời tạo ra tính đa dạng cho các hoạt động học tập, các hoạt động khởi động đầu tiết học.
c) Các bước tạo đồ dùng dạy học
Việc thiết kế bài giảng ứng dụng lập trình VBA dựa trên việc sử dụng phần mềm Visual Basic for Applications; việc thiết kế ta chỉ sử dụng một vài nút lệnh đơn giản và code lập trình không cần phải viết quá nhiều lệnh phức tạp.
Thiết lập ban đầu:
- Thiết lập chế độ bảo mật: Đối với PowerPoint 2010, Chọn File Options chọn
dòng Trust Center Trust Center settings… tiếp tục tích chọn vào mục Enable all macros
- Bật thanh công cụ VBA: Chọn File Options chọn dòng Customize Ribbon sau đó tích chọn vào ô Developer. Khi đó thanh công cụ Developer sẽ có trên thanh Toolbar
Label(Nhã
Text Box
Commamd
Thiết lập thuộc tính
Mở giao diện viết code VBA
Ghi chú: Khi tạo file ta lưu với kiểu định dạng PowerPoint Macro-Enabled
Presentation (*.pptm) để sử dụng được các tính năng Macro của nút lệnh. Máy tính phải cài các loại font chữ tương ứng với bảng mã VNI-Windows.
GV: Võ Thành Sơn 11
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
Cách tạo bài giảng ứng dụng VBA:
Tạo trò chơi ô chữ:
Bước 1: Thiết kế giao diện (chọn các nút lệnh trên thanh công cụ Developer)
- Sử dụng cho bài tập điền khuyết, sắp xếp chương trình Pascal:
- Sử dụng các nút lệnh Command Button, Label, Text Box.
+ Command Button: Dùng tạo các nút lệnh Kết Quả, Làm lại. + 3 Nút lệnh Xanh Lá(Command Button): Dùng cho Đáp án bài tập, Khởi tạo bài tập, ẩn các lệnh sắp xếp. + Label: Dùng tạo cho các dòng lệnh để sắp xếp, hiển thị kết quả. + Text Box: Dùng tạo cho các dòng lệnh để sắp xếp, hiển thị kết quả.
- Sử dụng cho trò chơi ô chữ, Hoạt động trắc nghiệm cũng cố bài học:
- Sử dụng các nút lệnh Command Button, Label.
+ Command Button: Dùng tạo các nút lệnh Câu 1, câu 2, ….., câu 8, Reset, Key, các nút từ câu 1, 2, …, 7.
GV: Võ Thành Sơn 12
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
+ Label: Dùng tạo cho 8 ô chữ từ khóa, hiển thị nội dung câu hỏi, chữ cái của từ khóa, câu hỏi và đáp án trắc nghiệm, điểm số từng nhóm.
Bước 2: Thiết lập các thuộc tính cho đối tượng
+ Trên thanh công cụ Developer ta chọn Properties để thiết lập thuộc tính cho đối tượng
+ Ta thiết lập màu nền, font chữ, cỡ chữ, .....
* Thiết lập một số đối tượng sau: - Name: Đặt tên cho đối tượng
+ Từ khóa 1: C11, C12, ......., C17 + Từ khóa 2: C21, C22, ......., C28 + Làm tương tự cho bộ từ khóa 3 8 + Câu 1 C1, câu 2 C2, ......, câu 8 C8 + Reset Lamlai; Key key
- BackColor: Chọn màu nền cho đối tượng - Caption: Nội dung hiển thị trên đối tượng + Sử dụng cho câu 1 câu 8 + Các ô từ khóa thì bỏ trống
- Enabled: True(Đối tượng luôn hoạt động) - Font: Chọn font chữ và cỡ chữ cho đối tượng + Sử dụng font VNI-Times tương ứng với bảng mã VNI Windows - ForeColor: Chọn màu chữ
Bước 3: Thực hiện viết code:
- Trên thanh công cụ Developer ta chọn View Code để thực hiện viết code cho các đối
tượng được thiết kê trên giao diện
- Các câu hỏi trong code ta sử dụng bảng mã VNI Windows - Giao diện Microsoft Visual Basic for Applications dùng để viết lệnh lập trình:
Phần viết code cho đối tượng:
Phần code của trò chơi ô chữ:
* Phần code cho nút lệnh Câu 1:
GV: Võ Thành Sơn 13
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
{Đổi màu nền cho các ô từ khóa, câu hỏi} Private Sub C1_Click()
C11.Caption = "?" C12.Caption = "?" C13.Caption = "?" C14.Caption = "?" C15.Caption = "?" C16.Caption = "?" C17.Caption = "?"
End Sub C11.BackColor = &HFFFF& C12.BackColor = &HFFFF& C13.BackColor = &HFFFF& C14.BackColor = &HFFFF& C15.BackColor = &HFFFF& C16.BackColor = &HFFFF& C17.BackColor = &HFFFF&
l1.Caption = " Caâu 1: Thuû tuïc ñeå
ñöa keát quaû ra maøn hình? "
{Hiển thị đáp án từ khóa}
Private Sub C1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
C12.Caption = "R" C13.Caption = "I" C14.Caption = "T" C15.Caption = "E" C16.Caption = "L" C17.Caption = "N" Key1.Caption = "L" + " " + Key1.Caption
End Sub
C11.BackColor = &HFFFF00 C12.BackColor = &HFFFF00 C13.BackColor = &HFFFF00 C14.BackColor = &HFFFF00 C15.BackColor = &HFFFF00 C16.BackColor = &H40C0& C17.BackColor = &HFFFF00 C11.Caption = "W"
{Hiển thị từ khóa gợi ý}
Private Sub C11_Click()
C11.Caption = "W"
End Sub Private Sub C15_Click() C15.Caption = "E"
End Sub Private Sub C12_Click()
C12.Caption = "R"
End Sub Private Sub C16_Click() C16.Caption = "L"
End Sub Private Sub C13_Click() C13.Caption = "I" End Sub Private Sub C17_Click()
C17.Caption = "N"
End Sub
End Sub Private Sub C14_Click() C14.Caption = "T"
GV: Võ Thành Sơn 14
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
Phần code cho các nút lệnh từ câu 2 câu 8 ta thực hiện tương tự
* Phần code cho nút lệnh Key:
{Câu hỏi gợi ý cho từ khóa trò chơi}
Private Sub Key_Click()
l1.Caption = " Töø khoùa: Ñaây laø ngoân ngöõ ñöôïc söû duïng trong chöông trình Tin Hoïc 11."
End Sub
{Đáp án cho từ khóa trò chơi}
Private Sub Key_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Key1.Caption = "LAÄP TRÌNH PASCAL"
l1.Caption = " Töø khoùa cuûa troø chôi oâ chöõ laø "
End Sub
* Phần code cho nút lệnh Key:
{Code cho nút reset – khởi tạo lại trò chơi}
Private Sub Lamlai_Click()
Key1.Caption = ""
l1.Caption = ""
C11.Caption = ""
C12.Caption = ""
C13.Caption = ""
C14.Caption = ""
Các Label từ C15 đến C84 ta thực hiện code tương tự
C11.BackColor = &HC000&
C12.BackColor = &HC000&
C13.BackColor = &HC000&
C14.BackColor = &HC000&
Các Label từ C15 đến C84 ta thực hiện code tương tự
End Sub
Phần code của bài tập điền vào ô trống:
{Code cho nút lệnh Làm Lại}
Private Sub b1_Click() tx2.Text = ""
tx1.Text = "" tx3.Text = ""
GV: Võ Thành Sơn 15
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
tx4.Text = "" tx3.BackColor = &HFFFF80
tx5.Text = "" tx4.BackColor = &HFFFF80
tx6.Text = "" tx5.BackColor = &HFFFF80
tx7.Text = "" tx6.BackColor = &HFFFF80
l1.Caption = "" tx7.BackColor = &HFFFF80
tx1.BackColor = &HFFFF80 End Sub
tx2.BackColor = &HFFFF80
{Code cho nút lệnh Kết Quả}
Private Sub b2_Click() l1.Caption = l1.Caption + 1
l1.Caption = "0" tx4.BackColor = &H80FFFF
End If
If tx1.Text = Chr(39) + "Ha Noi Viet Nam" + Chr(39) Then
l1.Caption = l1.Caption + 1 If tx5.Text = Chr(39) + "THE GIOI" + Chr(39) Then
tx1.BackColor = &H80FFFF l1.Caption = l1.Caption + 1
End If tx5.BackColor = &H80FFFF
If tx2.Text = ">" Then End If
l1.Caption = l1.Caption + 1 If tx6.Text = "8" Then
tx2.BackColor = &H80FFFF l1.Caption = l1.Caption + 1
End If tx6.BackColor = &H80FFFF
End If
If tx3.Text = Chr(39) + "Tap Tin Hoc" + Chr(39) Then If tx7.Text = "6" Then
l1.Caption = l1.Caption + 1 l1.Caption = l1.Caption + 1
tx3.BackColor = &H80FFFF tx7.BackColor = &H80FFFF
End If End If
End Sub If tx4.Text = Chr(39) + "Tin Hoc" + Chr(39) Then
Phần code của bài tập sắp xếp chương trình:
{Code cho nút lệnh Khởi tạo bài tập}
Private Sub bt1_Click() l101.Enabled = True
tg.Caption = "" l102.Enabled = True
tg1.Caption = "" Các Label từ l103 đến l19 ta thực hiện
code tương tự tg2.Caption = ""
GV: Võ Thành Sơn 16
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
l11.Caption = " Begin" l103.Caption = " Write('Nhap GT cua x= ');"
l12.Caption = " Readln(x);"
l104.Caption = " T:= SQR(x)/SQRT(x + y);" l13.Caption = " Var T, x, y: Real;"
l21.Caption = "" l14.Caption = " Program Tinh_BT;"
l22.Caption = "" l15.Caption = " Clrscr;"
Các Label từ l23 đến l33 ta thực hiện l16.Caption = " Readln;" code tương tự l17.Caption = " Write('Nhap GT cua y= ');" l21.ForeColor = &H0&
l22.ForeColor = &H0& l18.Caption = " Writeln('GT bthuc T= ',T:4:1);"
Các Label từ l23 đến l33 ta thực hiện l19.Caption = " Readln(y);" code tương tự l101.Caption = " End." End Sub l102.Caption = " Uses Crt;"
{Code cho nút lệnh Hiển thị đáp án bài tập}
Private Sub bt3_Click() l30.Caption = " T:= SQR(x)/SQRT(x + y);"
l21.Caption = " Program Tinh_BT;"
l31.Caption = " Writeln('GT bthuc T= ',T:4:1);" l22.Caption = " Uses Crt;"
l32.Caption = " Readln;" l23.Caption = " Var T, x, y: Real;"
l33.Caption = " End." l24.Caption = " Begin"
l21.ForeColor = &H0& l25.Caption = " Clrscr;"
l22.ForeColor = &H0& l26.Caption = " Write('Nhap GT cua x= ');"
Các Label từ l23 đến l33 ta thực hiện l27.Caption = " Readln(x);" code tương tự l28.Caption = " Write('Nhap GT cua y= ');" End Sub l29.Caption = " Readln(y);"
{Code cho nút lệnh Kết Quả}
Private Sub CommandButton1_Click() l22.ForeColor = &HFF0000
tg1.Caption = "0" Else
tg1.Caption = tg1.Caption + 1
If l21.Caption <> " Program Tinh_BT;" Then End If
l21.ForeColor = &HFF0000
Else If l23.Caption <> " Var T, x, y: Real;" Then
tg1.Caption = tg1.Caption + 1 l23.ForeColor = &HFF0000
End If Else
If l22.Caption <> " Uses Crt;" Then tg1.Caption = tg1.Caption + 1
GV: Võ Thành Sơn 17
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
End If End If
If l24.Caption <> " Begin" Then
l24.ForeColor = &HFF0000
If l30.Caption <> " T:= SQR(x)/SQRT(x + y);" Then Else
l30.ForeColor = &HFF0000 tg1.Caption = tg1.Caption + 1
Else End If
tg1.Caption = tg1.Caption + 1 If l25.Caption <> " Clrscr;" Then
End If l25.ForeColor = &HFF0000
Else If l31.Caption <> " Writeln('GT bthuc T= ',T:4:1);" Then tg1.Caption = tg1.Caption + 1 l31.ForeColor = &HFF0000 End If Else
tg1.Caption = tg1.Caption + 1 If l26.Caption <> " Write('Nhap GT cua x= ');" Then
End If l26.ForeColor = &HFF0000
Else
If l32.Caption <> " Readln;" Then tg1.Caption = tg1.Caption + 1
l32.ForeColor = &HFF0000 End If
Else If l27.Caption <> " Readln(x);" Then
tg1.Caption = tg1.Caption + 1 l27.ForeColor = &HFF0000
End If Else
If l33.Caption <> " End." Then tg1.Caption = tg1.Caption + 1
l33.ForeColor = &HFF0000 End If
Else
If l28.Caption <> " Write('Nhap GT cua y= ');" Then tg1.Caption = tg1.Caption + 1
l28.ForeColor = &HFF0000 End If
If tg1.Caption = "13" Then Else
tg1.Caption = tg1.Caption + 1 tg2.Caption = tg1.Caption & "/13"
Else End If
tg2.Caption = tg1.Caption & "/13"
If l29.Caption <> " Readln(y);" Then End If
l29.ForeColor = &HFF0000 If tg1.Caption = "13" Then
Else tg2.Caption = tg1.Caption & "/13"
tg1.Caption = tg1.Caption + 1
GV: Võ Thành Sơn 18
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
MsgBox "CHUC MUNG BAN!", vbOKCancel + vbInformation, "THONG BAO ^_^" MsgBox "CHIA BUON CUNG BAN!", vbOKCancel + vbCritical, "THONG BAO ^_^"
End If End If
If tg1.Caption <> "13" Then End Sub
tg2.Caption = tg1.Caption & "/13"
{Phần code cho ghi nhận đáp án sắp xếp}
Private Sub l101_Click() tg.Caption = l103.Caption
tg.Caption = l101.Caption l103.Enabled = False
l101.Enabled = False End Sub
End Sub Private Sub l104_Click()
Private Sub l102_Click() tg.Caption = l104.Caption
tg.Caption = l102.Caption l104.Enabled = False
l102.Enabled = False End Sub
End Sub Các Label từ l11 đến l33 ta thực hiện
code tương tự Private Sub l103_Click()
{Phần code cho nút lệnh Khởi tạo lại dòng lệnh khi bị ẩn}
Private Sub r1_Click() l104.Enabled = True End Sub
l11.Enabled = True End Sub Private Sub r6_Click()
End Sub Private Sub r2_Click() l16.Enabled = True
Private Sub r10_Click() l12.Enabled = True End Sub
l101.Enabled = True End Sub Private Sub r7_Click()
End Sub Private Sub r3_Click() l17.Enabled = True
Private Sub r11_Click() l13.Enabled = True End Sub
l102.Enabled = True End Sub Private Sub r8_Click()
End Sub Private Sub r4_Click() l18.Enabled = True
Private Sub r12_Click() l14.Enabled = True End Sub
l103.Enabled = True End Sub Private Sub r9_Click()
End Sub Private Sub r5_Click() l19.Enabled = True
Private Sub r13_Click() l15.Enabled = True End Sub
GV: Võ Thành Sơn 19
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
Phần code cho hoạt động củng cố kiến thức:
* Phần code cho nút lệnh Câu 1, 2, 3, …., 7:
{Code cho nút lệnh câu 1 – thực hiện cho thao tác Click chuột}
Private Sub bt1_Click()
lda.Font.Size = 30
lda.Caption = " Caâu 1: Cho caáu truùc laëp: " + Chr(13) + " For i := 3 To 10 Do" +
Chr(13) + " Write(i);" + Chr(13) + " Haõy xaùc ñònh giaù trò ñaàu trong caáu truùc laëp
treân:"
lb1.Font.Size = 25
lb1.Caption = "Giaù trò ñaàu laø Write(i)"
lb2.Font.Size = 28
lb2.Caption = " Giaù trò ñaàu laø 10"
lb3.Font.Size = 28
lb3.Caption = " Giaù trò ñaàu laø 3"
lb4.Font.Size = 28
lb4.Caption = " Giaù trò ñaàu laø i"
bt1.BackColor = &HFF00&
lb1.ForeColor = &H0&
lb2.ForeColor = &H0&
lb3.ForeColor = &H0&
lb4.ForeColor = &H0&
End Sub
{Code cho nút lệnh câu 1 – thực hiện cho thao tác Nháy đúp chuột}
Private Sub bt1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
lda.Font.Size = 30
lda.Caption = " Caâu 1: Cho caáu truùc laëp: " + Chr(13) + " For i := 3 To 10 Do" +
Chr(13) + " Write(i);" + Chr(13) + " Haõy xaùc ñònh giaù trò ñaàu trong caáu truùc laëp
treân:"
lb1.Font.Size = 25
lb1.Caption = "Giaù trò ñaàu laø Write(i)"
lb2.Font.Size = 28
lb2.Caption = " Giaù trò ñaàu laø 10"
GV: Võ Thành Sơn 20
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
lb3.Font.Size = 28
lb3.Caption = " Giaù trò ñaàu laø 3"
lb4.Font.Size = 28 lb4.Caption = " Giaù trò ñaàu laø i"
bt1.BackColor = &HFFFF& lb3.ForeColor = &HFF&
End Sub
Code cho các nút lệnh câu 2, 3, 4, 5, 6 và 7 ta thực hiện code tương tự * Phần code cho nút lệnh Reset:
Private Sub bt8_Click() bt5.BackColor = &HFFFF00
lda.Caption = "" bt6.BackColor = &HFFFF00
lb1.Caption = "" bt7.BackColor = &HFFFF00
lb2.Caption = "" ln1.Caption = 0
lb3.Caption = "" ln2.Caption = 0
lb4.Caption = "" ln3.Caption = 0
bt1.BackColor = &HFFFF00 ln4.Caption = 0
bt2.BackColor = &HFFFF00 ln5.Caption = 0
bt3.BackColor = &HFFFF00 ln6.Caption = 0
bt4.BackColor = &HFFFF00 End Sub
* Phần code cho ô điểm số các nhóm:
Private Sub ln1_Click() Private Sub ln4_Click()
ln1.Caption = ln1.Caption + 10 ln4.Caption = ln4.Caption + 10
End Sub End Sub
Private Sub ln2_Click() Private Sub ln5_Click()
ln2.Caption = ln2.Caption + 10 ln5.Caption = ln5.Caption + 10
End Sub End Sub
Private Sub ln3_Click() Private Sub ln6_Click()
ln3.Caption = ln3.Caption + 10 ln6.Caption = ln6.Caption + 10
End Sub End Sub
3.2. Biện pháp tổ chức
a) Dạng bài học khởi động trò chơi ô chữ:
- Đầu tiết học giáo viên tổ chức hoạt động khởi động bằng trò chơi ô chữ, nhằm tạo hứng thú cho các em tham gia vui chơi, mở đầu tiết học thoải mái trước khi vào nội dung bài mới; học sinh sẽ giảm được áp lực học lập trình, phát triển tư duy lôgic rất cần thiết khi học lập trình; đồng
GV: Võ Thành Sơn 21
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
thời cũng giúp học sinh hệ thống lại kiến thức đã học ở những buổi học trước tạo nền tảng vững chắc cho bài học tiếp theo, các em tiếp cận học tập bộ môn đạt hiệu quả.
- Cách ứng dụng trò chơi ô chữ:
+ Nháy chuột chọn vào nút câu 1 câu 8(xanh dương) để hiển thị nội dung câu hỏi, đồng thời các ô chữ sẽ hiển thị màu vàng có dấu hỏi, câu hỏi gợi ý cho các ô chữ sẽ hiển thị bên dưới.
+ Khi học sinh trả lời đúng ô chữ hàng ngang ta nháy đúp chuột vào câu có từ hàng ngang
tương ứng để hiển thị đáp án và các chữ cái có trong từ khóa chính sẽ được hiển thị bên dưới.
+ Khi học sinh không thể đoán được từ hàng ngang ta sẽ nháy chuột vào ô bất kỳ để hiển
thị chữ cái gợi ý.
+ Nháy chuột vào ô Key để hiển thị câu hỏi gợi ý từ khóa chính.
+ Nháy đúp chuột vào ô Key để hiển thị đáp án từ khóa chính.
+ Nháy Reset để khởi tạo lại trò chơi.
b) Dạng bài học điền khuyết chương trình Pascal
- Khi ứng dụng đồ dùng dạy học dạng điền khuyết vào giảng dạy giúp học sinh hình thành kiến thức lập trình, xác định những thành phần quan trọng còn thiếu trong bài lập trình để hoàn thành chương trình pascal. Hình thành cho các em kỹ năng tự giác, tư duy lôgic, đặc biệt là các
GV: Võ Thành Sơn 22
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
học sinh trung bình - yếu sẽ mạnh dạn tham gia vào các hoạt động học tập. Từ đó học sinh sẽ vận dụng vào thực hành và làm bài trắc nghiệm đạt hiệu quả.
- Trong thời gian vận dụng bài tập cho học sinh giải thì giáo viên sẽ triển khai phiếu học tập theo các nhóm hoặc từng cá nhân trong lớp, giáo viên sẽ hướng dẫn học sinh về những yêu cầu trong phiếu học tập (phụ lục đính kèm)
- Trong tiết dạy giáo viên phát phiếu học tập cho các em làm bài thảo luận nhóm (nhóm 2 hoặc 3 em học sinh) theo thời gian yêu cầu của giáo viên để tăng kỹ năng cho học sinh hoạt động nhóm trao đổi học tập. Nội dung phiếu học tập chứa các bài tập được thiết kế bằng ngôn ngữ lập trình VBA trên file trình chiếu PPT, sau khi hết thời gian thảo luận làm bài tập giáo viên sẽ gọi một học sinh trong nhóm lên giải bài tập bằng cách tương tác trên giao diện PPT (phụ lục đính kèm)
- Giao diện trình chiếu sẽ được hiển thị như các hình bên dưới, giáo viên gợi ý cách học sinh giải bài tập trên PPT với các dạng bài tập chọn đáp án đúng vào khoảng trống, gõ đáp án vào khoảng trống để hoàn thành chương trình.
- Cách vận dụng bài tập chọn đáp án điền khuyết:
+ 2 nút màu xanh lá: Nháy nút bên dưới là cho ẩn hết các từ trong 2 cột. Nút phía trên dùng khởi tạo lại bài tập điền khoảng trống.
+ Khi học sinh chọn dòng nào để điền vào khoảng trống thì dòng được chọn sẽ bị ẩn (vô hiệu) phần nội dung, để học sinh biết dòng đó đã được chọn.
+ nút 1, 2, ….., 9: Để kích hoạt lại dòng lệnh tương ứng khi học sinh đã chọn nhằm dòng lệnh hoặc muốn chọn dòng lệnh khác.
+ Kết Quả: Nháy chuột vào ô này để biết kết quả làm bài của học sinh. Các dòng có nền màu vàng là sai.
GV: Võ Thành Sơn 23
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
- Cách vận dụng bài tập điền đáp án khoảng trống:
+ Làm Lại: Có tác dụng khởi tạo lại bài tập.
+ Các ô màu xanh: học sinh gõ đáp án vào các ô này.
+ Kết Quả: Nháy chuột vào ô này để biết kết quả làm bài của học sinh. Các dòng có nền màu vàng là sai.
GV: Võ Thành Sơn 24
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
c) Dạng bài học sắp xếp chương trình Pascal
- Với dạng bài tập sắp xếp chương trình học sinh sẽ hệ thống lại cấu trúc một chương trình Pascal, trình tự thực hiện để hoàn thành chương trình hoàn chỉnh; các em sẽ sắp xếp đúng theo cấu trúc một bài tập lập trình; giúp học sinh giảm tải kiến thức lập trình, các em cảm thấy kiến thức học lập trình nhẹ nhàng, để tiếp thu, hiệu quả học tập tốt. Học sinh sẽ ngày càng thành thạo các thao tác trên máy tính thông qua giao diện PPT từ bài tập được học; phát triển kỹ năng sử dụng phần mềm, sử dụng máy tính phục vụ việc học.
- Giáo viên cho bài tập thông qua phiếu học tập, yêu cầu học sinh thảo luận theo nhóm với một thời gian nhất định, tiếp theo giáo viên sẽ gợi ý học sinh về những yêu cầu kiến thức trong phiếu học tập (phụ lục đính kèm). Khi hết thời gian thảo luận làm bài tập giáo viên sẽ gọi một học sinh trong nhóm lên giải bằng cách tương tác trên giao diện PPT. (phụ lục đính kèm)
- Cách thực hiện bài tập sắp xếp chương trình:
+ 3 nút màu xanh lá: Nháy nút bên dưới là cho ẩn hết các từ trong 2 cột. Nút ở giữa dùng khởi tạo lại bài tập sắp xếp. Nút phía trên hiển thị kết quả bài giải của giáo viên.
+ Khi học sinh chọn dòng nào để điền vào khoảng trống thì dòng được chọn sẽ bị ẩn (vô hiệu) phần nội dung, để học sinh biết dòng đó đã được chọn.
GV: Võ Thành Sơn 25
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
+ Nút 1, 2, ….., 9: Để kích hoạt lại dòng lệnh tương ứng khi học sinh đã chọn nhằm dòng lệnh hoặc muốn chọn dòng lệnh khác.
+ Các dòng lệnh màu xanh dương: học sinh chọn đáp án sắp xếp chưa phù hợp.
+ Kết Quả: Nháy chuột vào ô này để biết kết quả làm bài của học sinh. Các dòng có nền màu vàng là sai.
d) Dạng bài học trắc nghiệm củng cố kiến thức
- Với dạng bài học này học sinh sẽ củng cố kiến thức, hệ thống lại nội dung bài học, tạo hứng thú cho tập thể lớp tham gia bài học (cá nhân hoặc nhóm) và có các hình thức cộng điểm hoặc khen thưởng cho các em, nhằm thúc đẩy động lực học tập cho học sinh yếu.
- Dạng bài tập này thường được áp dụng vào cuối tiết dạy, giáo viên thực hiện củng cố lại nội dung kiến thức các em đã học bằng các câu hỏi trắc nghiệm. Cho các em trả lời đáp án theo nhóm có thời gian quy định cho mỗi câu hỏi, để tạo cho các em kỹ năng trả lời nhanh, kỹ năng làm việc nhóm, tạo không khí sôi động cho các nhóm thi đua. Bên cạnh đó giúp giáo viên biết được mức độ hiểu bài của học sinh.
- Cách vận dụng trò chơi củng cố kiến thức:
+ Reset: Có tác dụng khởi tạo lại hoạt động củng cố kiến thức.
GV: Võ Thành Sơn 26
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
+ TG: Thời gian suy nghĩ và trả lời đáp án của câu hỏi trắc nghiệm.
+ Nháy nút 1, 2, …., 5: để hiển thị nội dung từng câu hỏi trắc nghiệm, đồng thời các nút sẽ đổi màu xanh lá.
+ Nháy đúp các nút để hiển thị đáp án khi học sinh trả lời đúng, đồng thời các nút sẽ đổi màu vàng.
+ Nháy chọn vào ô tròn phía dưới các nhóm để cộng điểm cho nhóm trả lời đúng.
3.3. Thời gian thực hiện:
- Đề tài sáng kiến được xây dựng và thực hiện bắt đầu từ năm học 2015 – 2016 cho đến
năm học 2019 – 2020.
GV: Võ Thành Sơn 27
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
IV. Hiệu quả đạt được:
1. Hiệu quả đạt được sau khi áp dụng sáng kiến:
Bảng so sánh về tính tiện dụng Danh mục Số TT Thiết bị dạy học Đồ dùng dạy học tự làm
1 Tốn kinh phí mua sắm Không tốn kinh phí mua sắm Đồ dùng dạy học
2 Không tốn kinh phí mua sắm Dạy học tương tác Phần mềm ActivInspire + bảng ActivBoard(Tốn nhiều kinh phí mua sắm)
3 Khi có hư hỏng Tự khắc phục được Liên hệ với nhà sản xuất để khắc phục sự cố
4 Tính chính xác Độ chính xác cao Không cao vì thiết bị có thể bị hỏng nhưng không phát hiện.
5 Tính ổn định Khó có thể xác định được lý do hỏng và không sử dụng được Ổn định cao và dễ phát hiện lỗi vì phần mềm không thao tác được. Tự khắc phục sự cố được.
Tốn kinh phí sửa chữa Không tốn kinh phí sửa chữa. 6 Kinh phí sửa chữa
7 Độ bền - Thời gian sử dụng Khoảng 5 năm là tình trạng thiết bị đồ dùng thường xuyên hư hỏng
ĐDDH tự làm được thiết kế trên phần mềm ứng dụng nên độ bền cao và sẽ được cập nhật thiết kế bổ sung khi cần thiết. Không tốn nhiều thời gian và chi phí.
- Bài giảng tương tác giúp học sinh học tập môn Tin học 11 sôi động, phát triển các kỹ năng trong học tập, kỹ năng làm việc nhóm hiệu quả, ý thức học tập cao, giáo viên có thể đánh giá kiến thức học sinh tại lớp, từ đó điều chỉnh phương pháp giảng dạy phù hợp với đối tượng học sinh.
- Học sinh được tiếp cận với phương pháp học tập mới, phát huy tính tự học, sáng tạo của
bản thân, góp phần cải thiện được kết quả học tập bộ môn.
- Đồ dùng dạy học được thiết kế với nhiều hình ảnh sinh động kết hợp với nhiều màu sắc đã tăng tính trực quan, đa dạng trong dạy học. ĐDDH còn là một phương tiện hữu hiệu giúp học sinh lĩnh hội được kiến thức bài học dễ dàng, tiếp thu bài hiệu quả; tạo hứng thú với các hoạt động học tập đa dạng phát triển nhiều kỹ năng cho các em. Đồ dùng đã giúp giáo viên nâng cao hiệu quả dạy học, tăng cường chất lượng bài dạy và truyền tải thông tin đến học sinh. - Bài giảng tương tác ứng dụng VBA khi đưa vào giảng dạy học sinh đã tiếp thu được hệ thống kiến thức cơ bản của chương trình Tin học 11, các em đã phát triển khả năng tư duy
GV: Võ Thành Sơn 28
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
lôgic, vận dụng kiến thức liên môn để giải các bài tập, viết hoàn thành được một chương trình Pascal đúng cấu trúc; bên cạnh đó học sinh thấy được thế mạnh của bộ môn được ứng dụng rộng rãi trên nhiều lĩnh vực.
- Học sinh vận dụng được kiến thức môn học để phát huy kỹ năng tự học, tự nghiên cứu
vào các môn học khác. Vì vậy học sinh càng yêu thích môn học, tạo động lực tốt học bộ môn.
- Đồ dùng tạo môi trường học tập tốt bằng cách tương tác trực tiếp trên bài giảng thông qua các thao tác kéo thả đối tượng, điền khuyết, chọn đối tượng vào ô dữ liệu phù hợp; tạo tính chủ động, hứng thú học tập cho các em.
- Giáo viên tạo được sự chú ý các em tham gia học tập, tạo điều kiện giúp học sinh có sự hòa nhập cùng bạn bè trong các hoạt động thảo luận nhóm, hoạt động trải nghiệm sáng tạo, suy luận cùng giải quyết các vấn đề học tập. Góp phần xây dựng trường học thân thiện học sinh tích cực.
Kết quả giảng dạy Tin học khối 11:
Năm học Giỏi Khá Trung bình
51,87% 37,7% 10,43% 2015 – 2016
56,61% 37,98% 5,41% 2016 – 2017
63,01% 35,62% 1,37% 2017 – 2018
64,77% 32,96% 2,27% 2018 – 2019
Biểu đồ thống kê tỉ lệ môn Tin học 11
70.00%
64.77%
63.01%
60.00%
56.61%
51.87%
50.00%
40.00%
37.70%
37.98%
35.62%
Giỏi
32.96%
Khá
30.00%
Trung bình
20.00%
10.43%
10.00%
5.41%
2.27%
1.37%
0.00%
2015 – 2016
2016 – 2017
2017 – 2018
2018 – 2019
GV: Võ Thành Sơn 29
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
+ Sau khi áp dụng đồ dùng vào giảng dạy thì tỉ lệ học sinh đạt loại giỏi tăng đáng kể qua hàng năm, tỉ lệ học sinh trung bình giảm. Đồng thời góp phần nâng cao tỉ lệ học sinh giỏi bộ môn tăng hàng năm, giảm tỉ lệ học sinh trung bình và không có học sinh yếu.
+ Qua thống kê tỉ lệ giảng dạy môn Tin học 11 ta thấy được sự hiệu quả giảng dạy khi áp dụng đồ dùng dạy học vào thực tiễn đã góp phần giúp cho các em hiểu bài và yêu thích môn học hơn, tỉ lệ điểm số khá giỏi tăng giúp cho chất lượng bộ môn được tăng cao.
Kết quả giảng dạy bộ môn Tin Học(cả tổ):
Năm học Giỏi Khá Trung bình Yếu
68,01% 27,35% 4,4% 0,24% 2015 – 2016
71,17% 26,77% 2,06% 0% 2016 – 2017
73,19% 24,91% 1,54% 0% 2017 – 2018
74,76% 23,63% 1,61% 0% 2018 – 2019
Biểu đồ thống kê tỉ lệ giảng dạy môn Tin học
80.00%
74.76%
73.19%
71.17%
68.01%
70.00%
60.00%
50.00%
Giỏi
Khá
40.00%
Trung bình
27.35%
26.77%
30.00%
24.91%
23.63%
Yếu
20.00%
10.00%
4.40%
1.61%
2.06%
1.54%
0.24%
0.00%
2015 – 2016
2016 – 2017
2017 – 2018
2018 – 2019
+ Sử dụng đồ dùng dạy học tự làm vào phục vụ giảng dạy đã cải thiện chất lượng bộ môn, tỉ lệ học sinh giỏi tăng và được giữ ổn định qua hàng năm; tỉ lệ học sinh trung bình giảm qua các năm và đặc biệt không có học sinh yếu kém kể từ năm học 2016 - 2017 đến nay.
+ Dựa vào biểu đồ ta nhận thấy hiệu quả của phương pháp dạy học tương tác rất cao và
được giữ ổn định, giúp cho chất lượng bộ môn được tăng cao.
GV: Võ Thành Sơn 30
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
Kết quả giảng dạy bộ môn Tin học cá nhân so với bình quân tổ:
2015 - 2016
2016 - 2017
2017 - 2018
2018 - 2019
Giỏi
Khá
Yếu
Giỏi
Khá
Giỏi
Khá
Giỏi
Khá
Trung bình
Trung bình
Trung bình
Trung bình
4,2%
0%
0.67%
1,23%
2,64%
Cá nhân
74,43 %
21,3 7%
70,94 %
26,42 %
79,87 %
18,79 %
74,69 %
24,07 %
4,4%
0,24%
1,54%
2,06%
1,61%
Bình quân tổ
68,01 %
27,35 %
71,17 %
26,77 %
73,19 %
24,91 %
74,76 %
23,63 %
Biểu đồ thống kê tỉ lệ giảng dạy so với bình quân tổ
79.87%
74.43%
74.69%
74.76%
70.94%
73.19%
71.17%
68.01%
Cá nhân
27.35%
26.42%
24.07%
24.91%
26.77%
23.63%
21.37%
18.79%
Bình quân tổ
4.40%
1.54%
2.64%
4.20%
0.24%
1.23%
1.61%
2.06%
0.67%
90.00% 80.00% 70.00% 60.00% 50.00% 40.00% 30.00% 20.00% 10.00% 0.00%
Giỏi Khá Trung bình
Yếu Giỏi Khá Trung bình
Giỏi Khá Trung bình
Giỏi Khá Trung bình
2015 - 2016
2016 - 2017
2017 - 2018
2018 - 2019
+ Năm đầu tiên khi sáng tạo đồ dùng đưa vào dạy học thì kết quả giảng dạy bộ môn của cá nhân được tăng nhanh ở tỉ lệ học sinh giỏi 74,43% cao hơn so với bình quân tổ 68,01% (Khi chưa áp dụng tỉ lệ thấp hơn bình quân tổ), tỉ lệ học sinh trung bình thấp hơn bình quân tổ và không có học sinh yếu (bình quân tổ là 0,24%).
+ Kết quả giảng dạy qua các năm học từ 2016 - 2017 đến nay tỉ lệ học sinh giỏi của cá nhân và bình quân tổ luôn đạt trên 70%, tỉ lệ học sinh khá luôn được giữ ổn định, tỉ lệ học sinh trung bình giảm qua từng năm và không có học sinh yếu. Như vậy, ta nhận thấy khi ĐDDH tự làm được sử dụng cho tổ chuyên môn đã giúp chất lượng giảng dạy của từng các nhận trong tổ tăng lên góp phần tăng tỉ lệ giảng dạy tổ bộ môn, được giữ ổn định ở các năm học sau và không có trường học học sinh yếu kém.
- Ngoài ra, khi đồ dùng dạy học tự làm đưa vào giảng dạy thì số tiết dạy có ứng dụng CNTT, sử dụng ĐDDH và số tiết thực hành tăng nhanh trong tổ bộ môn ở năm học 2016-2017 và sau đó được duy trì ổn định cho đến nay. Như vậy, hiệu quả của ĐDDH tự làm giúp cải thiện số lượt ứng dụng CNTT, chất lượng các tiết sử dụng đồ dùng vào giảng dạy, cải thiện kết quả học tập của học sinh, phát huy các kỹ năng học tập góp phần năng cao chất lương bộ môn.
GV: Võ Thành Sơn 31
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
- Số lượt ứng dụng CNTT, sử dụng ĐDDH và thực hành của tổ qua các năm học:
Năm học Số lượt THTN Số lượt CNTT và sử dụng ĐDDH
729 688 2015 – 2016
874 759 2016 – 2017
859 741 2017 – 2018
879 772 2018 – 2019
Ứng dụng CNTT, sử dụng ĐDDH và thực hành
1000
879
874
859
900
772
759
741
800
729
688
700
600
Số lượt CNTT và ĐDDH
500
Số lượt thực hành
400
300
200
100
0
2015 – 2016
2016 – 2017
2017 – 2018
2018 – 2019
2. Lợi ích thu được khi áp dụng sáng kiến:
- Với giải pháp áp dụng đồ dùng vào thực hiện giảng dạy chất lượng giáo dục bộ môn không ngừng tăng lên, tạo môi trường tốt cho học sinh tham gia học tập tích cực, chủ động, tham gia thảo luận làm bài tích cực, tỉ lệ học sinh khá giỏi qua mỗi năm đều tăng, học sinh trung bình giảm, không có học sinh yếu kém.
- Từ đó có thể nhận xét rằng việc sử dụng đồ dùng tự làm vào giảng dạy mang lại hiệu quả cao trong học tập, học sinh nắm vững kiến thức, vận dụng tốt vào các bài kiểm tra định kỳ. Tạo cho học sinh một nguồn nhận thức, một phương tiện học tập trực quan quý giá trong giáo dục. Sử dụng phương pháp dạy học gắn liền với các hoạt động tại lớp giúp phát triển kỹ năng học sinh thông qua việc tương tác trên đồ dùng dạy học.
- Góp phần đẩy mạnh, hướng dẫn hoạt động nhận thức cho học sinh, phát triển kỹ năng
học tập, chiếm lĩnh kiến thức, phát triển trí tuệ của học sinh.
- Đồ dùng dạy học tự làm không tốn chi phí mua sắm, chỉ cần vận dụng kiến thức lập
trình thiết kế trên nền Powerpoint phục vụ dạy học.
GV: Võ Thành Sơn 32
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
- Hoạt động với độ chính xác cao và ổn định giúp học sinh luôn nhận được kết quả đúng
khi kiểm tra kết quả làm bài.
- Ngoài ra, việc dạy học tương tác còn tạo điều kiện phát triển một số kỹ năng sống như:
+ Kỹ năng giao tiếp, kỹ năng lắng nghe tích cực.
+ Kỹ năng trình bày suy nghĩ ý tưởng, kỹ năng hợp tác.
+ Kỹ năng đảm nhận trách nhiệm, kỹ năng quản lý thời gian.
+ Kỹ năng tìm kiếm và xử lí thông tin.
- Bản thân đã đạt giải C sản phẩm đồ dùng dạy học tự làm cấp tỉnh năm học 2018-2019
(phục lục đính kèm)
- Sản phẩm đồ dùng dạy học tự làm được đưa lên website hội đồng bộ môn Tin học tỉnh
An Giang (phụ lục đính kèm)
V. Mức độ ảnh hưởng:
Đồ dùng dạy học tự làm rất tiện lợi, dễ sử dụng có thể áp dụng rộng rãi trong toàn ngành giáo dục đối với bộ môn Tin học khối 11 mà không cần phải tốn phí. Đáp ứng được yêu cầu của ngành về ứng dụng công nghệ thông tin vào giảng dạy.
Đối với học sinh:
Phát huy các kỹ năng trong học tập, kỹ năng thảo luận làm việc nhóm, học tập tích cực
chủ động, tự học tự nghiên cứu, khai thác các kiến thức thông qua bài giảng hỗ trợ học tập.
Học sinh có thể trao đổi kiến thức học tập lẫn nhau trong lúc học tại lớp, hỗ trợ, giúp đỡ
nhau cùng tiến bộ.
Học sinh thấy được thế mạnh của bộ môn tin học và những ứng dụng phong phú, đa dạng của bộ môn; các em thể áp sử dụng kiến bộ môn để bổ trợ phục vụ cho việc học tập các môn học khác từ đó các em yêu thích môn học hơn ý thức học tập được nâng cao.
Đối với bản thân:
Tạo động lực trong việc thiết kế đồ dùng dạy học tự làm phục vụ giảng dạy, phát huy khả
năng sáng tạo trong giảng dạy, ngày càng nâng cao kỹ năng tự làm đồ dùng dạy học.
Khi học sinh khai thác kiến thức bài học tại lớp, bản thân có thể phát hiện những học sinh có kỹ năng lập trình; phát hiện những kiến thức học sinh chưa nắm rõ kiến thức thông qua phần trắc nghiệm củng cố và các bài tập. Phương pháp giảng dạy sẽ được điều chỉnh hợp lí với từng đối tượng học sinh khi phát sinh trong thực tế giảng dạy.
Đối với tổ chuyên môn:
Góp phần tạo thêm tính đa dạng trong phương pháp đổi mới giảng dạy trong tổ có chất
lượng, phong trào học tập đối với bộ môn được cải thiện đáng kể. Tạo động lực cho giáo viên tiếp tục tìm tòi nghiên cứu những phương pháp, những tài liệu giảng dạy hay phục vụ học sinh.
GV: Võ Thành Sơn 33
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
Đối với nhà trường:
Tạo thêm tính đa dạng khi ứng dụng công nghệ thông tin trong giảng dạy, thúc đẩy phong trào sáng tạo đồ dùng dạy học phục vụ giảng dạy và phát huy tính tự học của học sinh theo hướng mới là khai thác kiến thức học tập tại lớp.
Đề tài đã được áp dụng ở trường trong những năm qua và có hiệu quả rõ rệt ở từng năm học. Đề tài hoàn toàn mới giúp cho mọi hoạt động giảng dạy tại lớp đạt hiệu quả cao, nâng cao chất lượng bộ môn. Chuyên môn giảng dạy của giáo viên được cải thiện, các phẩm chất năng lực học tập của các em được phát triển. Những phương pháp được nêu ra trong bài viết đã được áp dụng vào giảng dạy thực tế và bước đầu có hiệu quả, bản thân sẽ tiếp tục áp dụng tại đơn vị, mở rộng và hoàn thiện hơn trong những năm tiếp theo để từng bước năng cao chất lượng giáo dục, giúp học sinh hoàn thiện nhiều kỹ năng trong học tập, nghiên cứu.
VI. Kết luận:
Như vậy, khi xác định được tầm quan trọng của việc sử dụng đồ dùng dạy học tự làm vào giảng dạy nhằm nâng cao chất lượng học tập của học sinh, thì giáo viên không ngừng tìm tòi những sản phẩm, những đồ dùng hay và không ngừng sáng tạo ra sản phẩm mới để phục vụ giảng dạy; để áp dụng sản phẩm vào giảng dạy đạt hiệu quả, thì giáo viên phải làm sao tạo cho các em thích thú và xây dựng ý thức học tập tốt.
Việc đa dạng hóa phương pháp dạy học hiện nay là yếu tố rất cần thiết đối với mỗi giáo viên, không chỉ giúp bản thân linh hoạt, mềm dẻo khi tổ chức các hoạt động học tập mà còn giúp trình độ chuyên môn được nâng cao nhằm nắm bắt kịp thời những đổi mới trong giáo dục. Ngoài ra, học sinh được thừa hưởng những điều mới, điều hay, sự tiếp cận kiến thức một cách dễ dàng trong quá trình học tập mà còn kích thích học sinh sáng tạo không ngừng, yêu thích công nghệ thông tin, tự khám phá những điểm mạnh của bản thân từ đó đi sâu vào các nghiên cứu khoa học mang tính thực tiễn cao. Bài giảng tương tác ứng dụng VBA trong PowerPoint chủ yếu là hệ những kiến thức học sinh cần đạt đối với các kiến thức cơ bản của bộ môn Tin học 11, rèn khả năng tư duy và những kỹ năng cần thiết khi học tập bộ môn, bên cạnh đó cũng để các em thấy được thế mạnh của việc sử dụng đồ dùng dạy học có ứng dụng công nghệ thông tin làm phong phú thêm tri thức, phát huy tối đa khả năng tự học, tự nghiên cứu, kích thích học sinh càng yêu thích ngành công nghệ thông tin, tạo động lực học tập tốt đối với bộ môn.
Trên đây chỉ là một số kinh nghiệm bước đầu mà bản thân đã áp dụng đồ dùng dạy học tự làm vào việc giảng dạy đạt hiệu quả trong những năm qua. Bài viết chắc còn thiếu sót và chưa đẩy đủ, mong đồng nghiệp cùng tham khảo và góp ý.
Người viết sáng kiến Tôi cam đoan những nội dung báo cáo là đúng sự thật. Xác nhận của đơn vị áp dụng sáng kiến
Võ Thành Sơn
GV: Võ Thành Sơn 34
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
SỞ GIÁO DỤC VÀ ĐÀO TẠO AN GIANG TRƯỜNG THPT NGUYỄN QUANG DIÊU
PHỤ LỤC
BÁO CÁO SÁNG KIẾN
Họ và tên : Võ Thành Sơn Điện thoại : 0377955964 : Chuyên môn Lĩnh vực
Năm học: 2019 - 2020
GV: Võ Thành Sơn 35
Giấy khen đạt giải C sản phẩm đồ dùng dạy học tự làm cấp tỉnh năm học 2018 - 2019
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
Link tải về bài tập
Sản phẩm đồ dùng dạy học tự làm được đưa lên trang web hội đồng bộ môn tỉnh An Giang năm học 2018 – 2019
GV: Võ Thành Sơn 36
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
PHIẾU HỌC TẬP SỐ 1 Họ và tên: ................................................................. Lớp: .................... Nhóm: ..........................
BÀI 6: PHÉP TOÁN, BIỂU THỨC, CÂU LỆNH GÁN
Bài 1: Cho đoạn CT sau. Hãy sửa lỗi để hoàn thành chương trình tính diện tích hình tròn
= (với PI = 3.14 là hằng số, bán kính R được nhập từ bàn phím)
Các lệnh
Chương trình hoàn chỉnh
Số TT
1
Program DT_HTron;
2
Uses
3
Const PI=3.14;
4
Var S,R: Integer;
5
Begin
6
clrscr;
7
Write('Nhap ban kinh R: ');
8
9
10
Writeln(R); S=PI . R^2 ; Write('Dien tich S= ',S:4:2);
11
Readln;
12
End
Bài 2: Điền vào những chỗ còn thiếu để hòan thành chương trình tính vận tốc rơi tự do
= (với g = 9.8 là hằng số, độ cao h được nhập từ bàn phím)
Các lệnh
Chương trình hoàn chỉnh
Số TT
1
Program VanToc_Roi;
2
Uses crt;
3
Const ……………….;
4
Var ………….: Real;
5
Begin
6
clrscr;
7
Write('Nhap do cao h: ');
8
………………………
9
V:= ………………….
10
Write('Van toc V= ',…………….);
11
Readln;
12
End.
GV: Võ Thành Sơn 37
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
Bài 3: Cho đoạn chương trình sau. Hãy sắp xếp để hoàn thành chương trình tính giá trị
(với x, y được nhập từ bàn phím)
biểu thức =
√
Chương trình
Chương trình hoàn chỉnh
Số TT
1
Begin
2
Readln(x);
3
Var T,x,y: Real;
4
Program Tinh_BieuThuc;
5
Clrscr;
6
Readln;
7 Write('Nhap gia tri cua y = ');
8 Writeln('Gia tri bieu thuc T = ',T:4:1);
9
Readln(y);
10
End.
11 Uses Crt;
12 Write('Nhap gia tri cua x = ');
13
T:= SQR(x)/SQRT(x + y);
GV: Võ Thành Sơn 38
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
CHƯƠNG TRÌNH ỨNG DỤNG VBA TƯƠNG ỨNG VỚI PHIẾU HỌC TẬP BÀI 6: PHÉP TOÁN, BIỂU THỨC, CÂU LỆNH GÁN
- Bài tập khởi động kiểm tra kiến thức
- Bài tập sửa lỗi hoàn thành chương trình Pascal
- Bài tập điền khuyết vào ô trống
- Bài tập sắp xếp chương trình
- Bài tập điền khuyết
GV: Võ Thành Sơn 39
Sử dụng lập trình VBA thiết kế đồ dùng dạy học trên PowerPoint 2019 - 2020
PHIẾU HỌC TẬP SỐ 2 Họ và tên: ................................................................. Lớp: .................... Nhóm: .......................... BÀI 9: CẤU TRÚC RẼ NHÁNH Bài 1: Viết câu lệnh IF – THEN hoặc IF – THEN – ELSE tương ứng với các dạng phát biểu sau: C. Nếu a chia hết cho 2 thì thông báo a là số chẳn; A. Nếu N ≥0 thì thông báo N là số không âm; ............................................................................. .............................................................................
D. Nếu a > 0 thì gán S = a2 ngược lại thì gán S = 0; .............................................................................
B. Nếu x + y > 10 thì gán z = x + y ngược lại thì gán z = 0,5; .............................................................................
.............................................................................
Bài 2: Sắp xếp các lệnh sau để thành chương trình hoàn chỉnh cho bài toán kiểm tra N có phải là bội số của 5 hay không? STT
Chương trình hoàn chỉnh
Dòng lệnh
1
Clrscr;
2
Write('nhap so nguyen N= ');
3
Uses Crt;
4
Var N: Integer;
5
End.
6
If N mod 5 = 0 then
7
Write(N,' la boi so cua 5') Else
8
Begin
9
Write(N,' khong la boi so cua 5');
10 11
Readln(N); PROGRAM Boi_5;
Readln
12 Bài 3: Điền các lệnh thích hợp với chương trình sau (chương trình thực hiện tìm số chẵn liền sau số nguyên dương M được nhập từ bàn phím)
Chương trình
Đáp án
(1)…………………………
Program so_chan_lien_sau; Uses crt; ….(1)…. : Integer; Begin
(2)…………………………
(3)…………………………
(4)…………………………
(5)…………………………
(6)…………………………
Clrscr; ……(2)…..('Nhap so nguyen duong M: '); …..(3)……; If ….(4)…. then M:=M+2 Else ……………(5)……………. Write('So chan lien sau so M la: ', …..(6)…..); Readln;
End.
GV: Võ Thành Sơn 40
Sử dụng VBA thiết kế đồ dùng dạy học trên Power Point 2019 - 2020
CHƯƠNG TRÌNH ỨNG DỤNG VBA TƯƠNG ỨNG VỚI PHIẾU HỌC TẬP
BÀI 9: CẤU TRÚC RẼ NHÁNH
- Hoạt động khởi động bằng trò chơi ô chữ
- Bài tập 1 viết đúng câu lệnh If - Then
- Bài tập 2 thực hiện sắp xếp chương trình
- Bài tập 3 điền các lệnh vào ô thích hợp
GV: Võ Thành Sơn 41
Sử dụng VBA thiết kế đồ dùng dạy học trên Power Point 2019 - 2020
PHIẾU HỌC TẬP SỐ 3 Họ và tên: ................................................................. Lớp: .................... Nhóm: .......................... BÀI 10: CẤU TRÚC LẶP
- Bài 1: Những phát biểu sau đây đúng hay sai? Hãy đánh dấu (X) vào ô (đúng/sai) tương ứng.
Phát biểu
Đúng
Sai
Chương trình
Yêu cầu
Program InSo;
- Bài toán yêu cầu thực hiện việc gì?
............................................................................................
- Công việc nào được yêu cầu thực hiện lặp lại nhiều lần?
............................................................................................
- Nếu sử dụng cấu trúc lặp For – Do dạng tiến giải quyết yêu cầu
của bài toán trên thì giá trị đầu, giá trị cuối bằng bao nhiêu? Câu
lệnh viết như thế nào?
Clrscr; For....................to..................do Writeln(................); Readln;
+ Giá trị đầu: .............................................................
1. Biến đếm là biến đơn thường có kiểu số nguyên 2. Biểu thức giá trị đầu và giá trị cuối cùng kiểu với biến đếm 3. Trong cấu trúc lặp For – Do giá trị đầu lớn hơn giá trị cuối 4. Giá trị của biến đếm không được tự động điều chỉnh sau mỗi lần thực hiện câu lệnh lặp 5. Ở dạng lặp tiến câu lệnh sau từ khóa DO được thực hiện tuần tự, với biến đếm lần lượt nhận các giá trị tăng từ giá trị đầu cho đến giá trị cuối 6. Ở dạng lặp tiến, sau mỗi lần lặp thì giá trị biến đếm tăng thêm 2 đơn vị - Bài 2: Hãy điền vào chỗ trống để hoàn thành chương trình sau: Biết chương trình thực hiện in ra màn hình các số từ 1 đến 10. Mỗi số in trên một dòng TT 1 2 Uses Crt; 3 Var i: Integer; 4 Begin 5 6 7 8 9 End.
+ Giá trị cuối: ............................................................
+ Câu lệnh: ...............................................................
+ Câu lệnh lặp lại bao nhiêu lần? .............................
Chương trình
Chương trình hoàn chỉnh
- Bài 3: Sắp xếp để hoàn thành chương trình sau. Biết chương trình thực hiện in ra màn hình các số từ 1 đến N (N là số nguyên được nhập từ bàn phím). Mỗi số in trên một dòng TT 1 Var i,N: integer; 2 Begin 3 Readln(N); 4 Program InDaySo; 5 Write('Nhap gia tri N = '); 6 Uses Crt; 7 Clrscr; 8 Writeln(i); 9 Readln; 10 End. 11 For i:=1 to N do
GV: Võ Thành Sơn 42
Sử dụng VBA thiết kế đồ dùng dạy học trên Power Point 2019 - 2020
CHƯƠNG TRÌNH ỨNG DỤNG VBA TƯƠNG ỨNG VỚI PHIẾU HỌC TẬP
BÀI 10: CẤU TRÚC LẶP
- Hoạt động khởi động
- Bài tập điền khuyết
- Hoạt động củng cố kiến thức
- Bài tập Sắp xếp để hoàn thành chương trình sau. Biết chương trình thực hiện in ra màn hình các số từ 1 đến N (N là số nguyên được nhập từ bàn phím). Mỗi số in trên một dòng
GV: Võ Thành Sơn 43
Sử dụng VBA thiết kế đồ dùng dạy học trên Power Point 2019 - 2020
PHIẾU HỌC TẬP SỐ 4 Họ và tên: ................................................................. Lớp: .................... Nhóm: .......................... BÀI 11: KIỂU MẢNG
Bài 1: Cho mảng một chiều gồm các phần tử sau:
A
10 1
55 2
17 3
20 4
17 5
29 6
23 7
43 8
18 9
17 10
Hãy xác định các thành phần sau:
- Tên biến mảng: ................................................................................................ - Số lượng phần tử: ............................................................................................ - Kiểu dữ liệu của phần tử: ................................................................................ - Viết khai báo cho mảng trên: .......................................................................... - Cách tham chiếu đến phần tử thứ 6: ................................................................ - Dựa vào khai báo hay cho biết chỉ số đầu:………….., chỉ số cuối:…………
Bài 2: Điền vào khoảng trống để hoàn thành chương trình sau:
Khai báo mảng một chiều gồm 20 phần tử nguyên. Viết đoạn lệnh nhập giá trị N và nhập vào giá trị cho từng phần tử trong mảng. Tính tổng các phần tử có giá trị chẵn và in tổng ra màn hình.
Program BT2; Var …….: Array[………..] of Integer; ………………:Integer; Begin Write('Nhap so luong phan tu: '); Readln(…………..); For i:=1 to N do Begin write('Phan tu thu ',i,' = '); Readln(…………..); End; Tong:=…………..; For i:=1 to ………… do If ……………. then Tong:=……………..; Write('Tong phan tu co gia tri chan la: ',………); Readln End.
GV: Võ Thành Sơn 44
Sử dụng VBA thiết kế đồ dùng dạy học trên Power Point 2019 - 2020
Bài 3: Sắp xếp chương trình sau thành chương trình hoàn chỉnh.
Khai báo mảng một chiều gồm 30 phần tử nguyên. Viết đoạn lệnh nhập giá trị N và nhập vào giá trị cho từng phần tử trong mảng. In ra màn hình các phần tử có giá trị âm, mỗi số in trên một dòng
Dãy lệnh cần sắp xếp Chương trình hoàn chỉnh
For i:=1 to N do
If A[i] < 0 then
End;
Write('Nhap so luong phan tu: ');
Begin
Var A:Array[1..30] of Integer;
Write('Phan tu thu ',i,' = ');
Begin
Program BT3;
i, N:Integer;
Readln
End.
For i:=1 to N do
Readln(N);
Writeln(A[i]);
Writeln(‘Cac phan tu am: ’);
Readln(A[i]);
GV: Võ Thành Sơn 45
Sử dụng VBA thiết kế đồ dùng dạy học trên Power Point 2019 - 2020
CHƯƠNG TRÌNH ỨNG DỤNG VBA TƯƠNG ỨNG VỚI PHIẾU HỌC TẬP
BÀI 11: KIỂU MẢNG
- Bài tập điền khuyết
- Sắp xếp chương trình sau thành chương trình hoàn chỉnh.
Khai báo mảng một chiều gồm 30 phần
tử nguyên.
Viết đoạn lệnh nhập giá trị N và nhập
vào giá trị cho từng phần tử trong mảng.
In ra màn hình các phần tử có giá trị âm,
mỗi số in trên một dòng.
GV: Võ Thành Sơn 46
Sử dụng VBA thiết kế đồ dùng dạy học trên Power Point 2019 - 2020
PHIẾU HỌC TẬP SỐ 5 Họ và tên: ................................................................. Lớp: .................... Nhóm: .......................... BÀI 11: KIỂU MẢNG (tiếp theo) Bài 1: Điền vào khoảng trống để hoàn thành chương trình sau:
Khai báo mảng một chiều gồm 100 phần tử thuộc kiểu nguyên. Viết đoạn lệnh nhập giá trị N và nhập vào giá trị cho từng phần tử trong mảng. Tính tổng các phần tử là bội của 5 và in tổng ra màn hình. Ví dụ: Cho N=10 và mảng A gồm các phần tử sau:
A
12 1
35 2
17 3
30 4
29 6
15 7
17 8
6 9
17 10
17 5 Vậy tổng các phần tử là bội của 5 là: 80
Program BT1; Var……….: Array[………..] of Integer; ………………:Integer; Begin Write('Nhap so luong phan tu: '); Readln(…………..); For i:=1 to N do Begin write('Phan tu thu ',i,' = '); Readln(…………..); End; Tong:=…………..; For i:=1 to ………… do If ……………. then Tong:=……………..; Write ('Tong phan tu boi cua 5 la: ',…………..); Readln End.
Bài 2: Sắp xếp các câu lệnh sau thành chương trình hoàn chỉnh. Biết chương trình giải bài toán: Đếm số phần tử có giá trị lớn hơn 15 và in kết quả biến Đếm ra màn hình Ví dụ: Cho N=10 và mảng A gồm các phần tử sau:
A 12 1 35 2 17 3 10 4 17 5 29 6 15 7 7 8 6 9 17 10 Vậy số phần tử có giá trị lớn hơn 10 là: 5
Chương trình hoàn chỉnh Dãy lệnh cần sắp xếp
For i:=1 to N do If A[i] > 15 then Write('So ptu lon hon 15 la: ',Dem); End; Write('Nhap SL ptu: '); Readln(N); Begin Var A: Array[1..50] of Integer; GV: Võ Thành Sơn 47
Sử dụng VBA thiết kế đồ dùng dạy học trên Power Point 2019 - 2020
Write('Phan tu thu ',i,' = '); Begin Program BT2; i, N, Dem:Integer; Readln End. For i:=1 to N do Dem:=Dem + 1; Readln(A[i]); Dem:=0; Bài 3: Điền vào khoảng trống để hoàn thành chương trình sau:
17 8 12 1 6 9 17 10 30 4 a) Khai báo mảng một chiều gồm 50 phần tử thuộc kiểu nguyên. b) Viết đoạn lệnh nhập giá trị N và nhập vào giá trị cho từng phần tử trong mảng. c) In ra các phần tử có chỉ số chẵn trong mảng một chiều. Ví dụ: Cho N=10 và mảng A gồm các phần tử sau: 29 17 A 6 3 17 15 7 17 30 17 5 29
35 2 Phần tử có chỉ số chẵn là: 35 Program BT3; Var …………………………………………………… i, N:……………..; Begin Write('Nhap so luong phan tu: '); …………………………………………………… For i:=1 to N do Begin .…...……………………………………………… …………………………………………………… End; Write('Phan tu co chi so chan: '); For i:=1 to ………. do If ……………………… then ………………………………………..…… Readln End.
GV: Võ Thành Sơn 48
Sử dụng VBA thiết kế đồ dùng dạy học trên Power Point 2019 - 2020
CHƯƠNG TRÌNH ỨNG DỤNG VBA TƯƠNG ỨNG VỚI PHIẾU HỌC TẬP
BÀI 11: KIỂU MẢNG
- Bài tập điền khuyết
- Sắp xếp các câu lệnh sau thành chương trình hoàn chỉnh. Biết chương trình giải bài toán: Đếm số phần tử có giá trị lớn hơn 15 và in kết quả biến Đếm ra màn hình.
- Điền vào khoảng trống để hoàn thành chương trình sau: Khai báo mảng một chiều gồm 50 phần tử thuộc kiểu nguyên. Viết đoạn lệnh nhập giá trị N và nhập vào giá trị cho từng phần tử trong mảng. In ra các phần tử có chỉ số chẵn trong mảng một chiều. Ví dụ: Cho N=10 và mảng A gồm các phần tử sau:
GV: Võ Thành Sơn 49
Sử dụng VBA thiết kế đồ dùng dạy học trên Power Point 2019 - 2020
PHIẾU HỌC TẬP SỐ 6 Họ và tên: ................................................................. Lớp: .................... Nhóm: .......................... BÀI 12: KIỂU XÂU
Câu 1: Hãy cho biết kết quả sau khi thực hiện các hàm và thủ tục xử lý xâu:
- Ghép xâu:
A:= ‘Ha Noi’;
B:=’ Viet Nam’;
Kết quả xâu A + B là: ……………………………….
‘Bai Tap’……………
‘BAI TAP’
- So sánh xâu: - Thủ tục Delete: ST:=’Bai Tap Tin Hoc’;
Delete(ST,1,4);
Kết quả: …………………………
- Thủ tục Insert:
S1:=’Tin ’; Insert(S1,S2,1);
S2:=’Hoc’; Kết quả: ……………………........
- Hàm Copy:
S:= ‘THE GIOI DI DONG’;
Kết quả: ………………………….
- Hàm Length:
- Hàm POS:
Copy(S,1,8); Length(S); S1:= ‘A’; POS(S1,S2);
S:=’50_KY_TU’;
Kết quả: …………………………. S2:= ‘YOKOHAMA; Kết quả: ………………………....
Câu 2: Dựa vào các lệnh từ cột bên trái để hoàn thành chương trình của bài toán sau:
Chương trình sau nhập vào hai xâu không quá 150 kí tự và in ra xâu lớn hơn. (Dữ liệu nhập
vào phải luôn cho kết quả có một xâu lớn hơn) Ví dụ: A := ‘Tin hoc’; B := ‘Toan Hoc’;
Thì kết quả in ra màn hình là xâu: ‘Toan Hoc’
Chương Trình
Các lệnh
Program BT1;
Begin
Write(‘Nhap xau A: ’);
Readln(B);
IF A > B Then
Writeln(‘Xau lon hon: ’,B); Readln(A); Write(‘Nhap Xau B: ’); Writeln(‘Xau lon hon: ’,A) Var A, B : String[150];
Else
Readln;
End.
GV: Võ Thành Sơn 50
Sử dụng VBA thiết kế đồ dùng dạy học trên Power Point 2019 - 2020
Câu 3: Dựa vào các lệnh từ cột bên trái để hoàn thành chương trình của bài toán sau:
Chương trình sau nhập vào một xâu S không quá 100 kí tự và chuyển đổi xâu kí tự đó sang chữ
in hoa rồi in ra màn hình. Ví dụ:
S := ‘cong nghe thong tin’;
Thì kết quả in ra màn hình là xâu: ‘CONG NGHE THONG TIN’
Các lệnh
Chương Trình
Program BT2;
…………………………….
i : integer;
Begin
Write(‘Nhap xau S: ’);
…………………………………
For i := 1 to ……………… do
S[i] := ……………………………. ;
Writeln(‘Xau Hoa : ’, S);
Upcase(S[i]) Length(S) Copy(S) Pos(S) Readln(S); Writeln(S); Var S : String; Var S : String[50]; Var S : String[100];
Readln;
End. Câu 4: Sắp xếp các câu lệnh sau thành chương trình hoàn chỉnh:
Chương trình sau nhập vào một xâu kí tự có độ dài không quá 100. Hãy cho biết có bao
nhiêu chữ số xuất hiện trong xâu S. In kết quả ra màn hình. Ví dụ:
S := ‘Xin chao! Lop 11CB2’;
Chương trình hoàn chỉnh
Số lượng kí tự số trong xâu: 3 Dãy lệnh cần sắp xếp
IF (S[i] >= '0') and (S[i] <= '9') then
Write('SL ky tu so la: ',Dem);
End. Write('Nhap xau S: ');
Dem:=Dem + 1;
Var S:String[100];
Dem,i:Integer;
Begin Program BT3;
Readln
For i:=1 to length(S) do
Readln(S); Dem:=0;
GV: Võ Thành Sơn 51
Sử dụng VBA thiết kế đồ dùng dạy học trên Power Point 2019 - 2020
CHƯƠNG TRÌNH ỨNG DỤNG VBA TƯƠNG ỨNG VỚI PHIẾU HỌC TẬP BÀI 11: KIỂU XÂU
- Hoạt động khởi động
- Thực hiện điền kết quả vào ô trống
- Chọn dòng lệnh thích hợp vào chỗ còn thiếu(dữ kiện cho đủ):
- Chọn dòng lệnh thích hợp vào chỗ còn thiếu(dữ kiện cho có dư):
- Thực hiện sắp xếp chương trình
GV: Võ Thành Sơn 52
Sử dụng VBA thiết kế đồ dùng dạy học trên Power Point 2019 - 2020
Một số hình ảnh ứng dụng sản phẩm đồ dùng dạy học tự làm vào hoạt động giảng dạy - Bài tập được trình chiếu trên màn hình LCD: - Học sinh làm bài trên phiếu học tập:
- Học sinh xem nội dung, tham gia thảo luận bài tập:
- Học sinh làm bài tập tương tác trực tiếp trên màn hình:
GV: Võ Thành Sơn 53
Sử dụng VBA thiết kế đồ dùng dạy học trên Power Point 2019 - 2020
- Sảm phẩm đồ dùng hiển thị kết quả sau khi học sinh làm bài:
GV: Võ Thành Sơn 54
