Giới thiệu lập trình VBA

TRUNG TÂM GDTX & DN CẦU GIẤY
----------------------
ĐỀ TÀI
TĂNG KHẢ NĂNG TRÌNH DIỄN BÀI GIẢNG
NHỜ LẬP TRÌNH VBA
Giáo viên : Nguyễn Quang Thành


1 ) Thế nào là VBA ?
+ Các ứng dụng của Microsoft Office gồm Word,
PowerPoint ...
+ Ngôn ngữ lập trình Visual Basic hạn chế trên các
ứng dụng gọi tắt là VBA, cho ta nhiều hiệu ứng
không chỉ trên một ứng dụng mà còn liên kết các
ứng dụng. VBA được cài đặt kèm theo. Ta có
thể cài đặt thêm ngôn ngữ lập trình Visual Basic
để sử dụng.

2 ) VBA cho những khả năng gì
+ Ta có thể nói: với VBA ta không bị lệ thuộc vào
thứ tự hiện ra của các đối tượng trình chiếu…
+ Ta có thể tạo được trò chơi mà có nhiều khả
năng phân nhánh, những câu hỏi trắc nghiệm...
Ví dụ: Trả lời câu hỏi - đoán chữ trong ô.(phần sau)
+ Ta có thể chương trình hoá một thuật toán, làm
nổi bật những bài toán cơ bản...(PT bậc hai )
+ Đặc biệt có thể dậy học bằng phương pháp
chương trình hoá, giải phóng sức lao động của
giáo viên. Tôi sẽ trình bầy trong một đề tài khác.

3 ) Tác dụng những hiệu ứng trong dậy học.
+ Với việc vấn đáp học sinh, nhiều câu trả lời không
thể tuân thủ đúng thứ tự thì GV không phải lảng
tránh. Hãy sử dụng VBA để bài giảng được tự
nhiên.
+ Tạo ra những trò chơi có chủ đích, giúp học sinh
được thể hiện mình, vừa chơi vừa lĩnh hội kiến
thức một cách tự nhiên không gò bó.Câu hỏi trắc
nghiệm ...làm bài giảng tự nhiên, phong phú.
+ Với 1 thuật toán hoặc 1 bài toán, ta khắc sâu
được phương pháp, cách trình bầy...HS dựa vào
một khung có sẵn giải các bài toán tương tự.
+ Sẽ thật tiện lợi khi ở nhà HS có máy tính, các em
có thể thực hiện bài tập, bài giảng của thầy cô từ
ở nhà.

Tạo thứ tự tuỳ ý khi trình chiếu:
Ví dụ : Câu hỏi : Em hãy nêu các vị trí tương đối
của 2 đường thẳng trong không gian ?
Hiệu ứng: + Nếu HS trả lời đúng vị trí nào, GV cho
hiện dòng tương ứng, bằng cách nhấn chuột
vào nút phía sau.
Sau đây tạo trình chiếu trên PoiwerPoint có sử
dụng VBA. Nút xoá để trở lại đầu. Không ảnh
hưởng gì đến các hiệu ứng khác.

Vị trí tương đối của 2 đường thẳng trong không gian
xoa
Thứ tự trên theo cách xắp sếp nào ?
□tăng dần số điểm chung □giảm dần số điểm chung

X
Bài toán: Cho tứ diện ABCD. M,N và P là trung điểm AB,
AC và BC. Quan sát BC và các đường BP; AB; MN; AD ,
nhận xét gì về số điểm chung và gọi tên vị trí tương đối ?
A
M
N
D
B
C
P
_
1 - Trïng nhau
2 - C¾t nhau
3 - Song song
4 - ChÐo nhau

Sau đây là 1 đoạn chương trình VBA
Private Sub CommandButton1_Click()
TextBox1.Text = " 1 - Trïng nhau“ ‘ bấm vào nút 1 thì hiện ra dòng 1
End Sub
Private Sub CommandButton2_Click() ‘ bấm vào nút 2 thì hiện ra dòng 2
TextBox2.Text = " 2 - C¾t nhau "
End Sub
Private Sub CommandButton3_Click() ‘ bấm vào nút 3 thì hiện ra dòng 3
TextBox3.Text = " 3 - Song song "
End Sub
Private Sub CommandButton4_Click() ‘ bấm vào nút 4 thì hiện ra dòng 4
TextBox4.Text = " 4 - ChÐo nhau "
End Sub

Private Sub CommandButton5_Click() ‘ bấm vào nút này thì xóa
TextBox1.Text = ""
TextBox2.Text = ""
TextBox3.Text = ""
TextBox4.Text = ""
End Sub

Tạo trò chơi vừa chơi vừa học
Ví dụ: Đoán ô chữ có 8 chữ cái, để lật 1 ô phải trả
lời đúng 1 câu hỏi. Vấn đề là HS có quyền lật
bất cứ ô nào. Ai nói được ô chữ trước là thắng
cuộc. Muốn lật 1 ô chỉ cần bấm vào ô đó.
Gợi ý : + Một trong các vị trí của hai đường thẳng
trong không gian.
•
Nhắc lại: Ví dụ đơn giản để dễ phát triển.
Ở cuối bài có một số phụ lục để các đồng nghiệp
tham khảo.

Ví dụ : Lật ô chữ
+Một trong các vị trí của hai đường thẳng trong không gian.
1) Có mấy vị trí của hai đường thẳng trong không gian.
2) Nếu hai đường thẳng có 2 điểm chung thì có thêm 1 điểm
chung nữa. Đúng hay sai
3) Nếu hai đường thẳng không có điểm chung thì chéo
nhau. Đúng hay sai
4) Nếu hai đường thẳng cùng nằm trên một mặt phẳng thì
cắt nhau. Đúng hay sai
Xoa