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 thanhrung75@yahoo.com 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 Chương trình hoá một thuật toán Ví dụ : Để giải phương trình bậc hai do máy đưa ra, HS phải điền vào các phần để trống theo yêu cầu. HS tính toán theo yêu cầu, sau đó nhập vào đúng mới cho đi tiếp. Cuối cùng nếu muốn giải tiếp thì tiếp tục một phương trình khác. Bộ khung để giải chính là bài mẫu trình bầy bài giải. + Có đếm số phương trình, số lần đúng để đưa ra điểm số của HS.( Số PT giải phải lớn hơn 4 ) + Hiệu ứng thêm là bất cứ phương trình bậc hai nào do HS đưa ra bằng cách nhập các hệ số, máy giải và đưa ra kết quả. [...]... trỡnh HS cú th xem im ó t c hoc tip tc gii *Chỳ ý : du chm (.) ngn cỏch phn thp phõn Vớ d : cú 7/4 ta nhp 1.75 cũn nhp 1,75 mỏy hiu l 1 Phuơng trình bậc hai một ẩn Bấm để Tập giải phuơng trình theo máy Số phuơng trình Số câu đúng Bấm để Giải một phuơng trình nhập vào Lựa chọn các nút Xem điểm Kết thúc 4 X2 + 6X 2 = 0 * Gii PT : +Nhp vo cỏc h s ca phng trỡnh: (0.75 = ắ) Buoc1 a= ;b= ;c= + Tớnh c... (0.75 = ắ) Buoc1 a= ;b= ;c= + Tớnh c giỏ tr bit thc elta: ( = 4 ) =b2 - 4ac= 3.3 - 4.(2).(-1) = + Kt lun v nghim ca phng trỡnh Chỉ dẫn : Nhập các hệ số của PT Số câu đúng / số câu sai là 1/1 Giải phuơng trình bậc hai Nhập vào các hệ số của PT :( chú ý 1.2 = 6/5 ; 1,2 = 1) Hệ số bậc hai a = Nhập xong Hệ số bậc nhất b = Giải PT khác Hệ số tự do c = Phng trỡnh: PT có biệt thức delta = Kết thúc X2 1 Trong... chộp (Copy) cỏi u tiờn Chỳ ý b trớ v trớ hp lý - Vo Controltoolbox , chn biu tng hỡnh ch nht ni(a chut vo hin ch Command Button), bm chut trỏi, ra phn trỡnh chiu kộo thnh 1hỡnh ch nht B3: To chng trỡnh VBA - Nhỏy ỳp vo nỳt lnh Command Button - Nhp vo 3 dũng chng trỡnh sau: Private Sub CommandButton1_Click() Textbox3.text = Val(Textbox1.text) + Val(Textbox1.text) End Sub - Tr v PowerPoint bng cỏch nhn . ĐỀ 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 thanhrung75@yahoo.com 1 ) Thế nào là VBA ? + Các ứng dụng của. 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