Làm ô chữ bằng VB trong PowerPoint

12 1.7K 9
Làm ô chữ bằng VB trong PowerPoint

Đang tải... (xem toàn văn)

Tài liệu hạn chế xem trước, để xem đầy đủ mời bạn chọn Tải xuống

Thông tin tài liệu

II. phần Nội dung 1. Mục đích, yêu cầu khi tạo ô chữ. - Việc tạo ô chữ phải giúp học sinh tổng hợp kiến thức đã học, ô chữ không qua dài và phức tạp về cấu tạo. - Nội dung kiến thức và hệ thống câu hỏi phải rõ ràng. - Mầu sắc và Font chữ phải hợp lý. 2. Sử dụng Microsoft Visual Basic tạo ô chữ. a. Xác định nội dung ô chữ. T R ự C T â M p y t A g o t r n g t â M đ n G x i ê n h ì n h C H I ế u P h â n g i á c đ n g C a o Đầu tiên xác định nội dung cột hoặc hàng trung tâm sau đó mới xác định nội dung hàng ( cột) khác sao cho nội dung phù hợp với yêu cầu. Đặt tên cho các ô bắt đầu từ ô đầu tiên L1, L2 ., Ln Đặt các câu hỏi cho từng nội dung tại mối hàng. Hàng 1 : Tên gọ giao của ba đờng cao trong tam giác Hàng 2: Một định lý hình học mang tên nhà bác học này. Hàng 3: Tên gọi của giao ba đờng trung tuyến trong tam giác Hàng 4: Đờng thẳng khác đờng vuông góc hạ từ một điểm xuống một đờng thẳng. Hàng 5: AH vuông góc với đờng thẳng a , H đợc gọi là . của A Hàng 6: Đờng thẳng chia góc cho trớc thành hai phần bằng nhau. Hàng 7: Đờng thẳng xuất phát từ đỉnh vuông góc với cạnh đối diện trong tam giác. b. Cách thực hiện. Bớc 1: Hiện thanh công cụ Visual Basic: View/Toolbar/Control Toolbox Bớc 2: Tạo khung cho ô chữ: Nháy chuột chọn công cụ Label và kéo tạo ô vuông. Ban đầu tạo khung sẽ có chữ ô Label1 Bớc 3: Chọn hộp Label1 và hiện hộp thoại Properties để đặt tên và thay đổi thuộc tính của hộp Label Trên hộp thoại Properties thay đổi các thuộc tính sau: - Đổi tên chọn Name + Đổi Label1 thành L1 - Đổi mầu nền chọn: Back Color + Chọn một mầu bất kỳ. - Bỏ chữ label1 chọn Caption + Xoá chữ label1 ô bên phải hộp Caption. - Đổi Font chữ và cỡ chữ trong hộp Font : + Chọn font chữ có thể đánh đợc tiếng việt - Đổi mầu chữ cho ô chữ chọn: Fore Color + Chọn một ô màu tơng ứng. - Đổi căn chỉnh hiện chữ trong hộp chọn : TextAlign + fmTextAlignLeft : Căn trái. + fmTextAlignCenter: Căn giữa. + fmTextAlignRight: Căn phải. - Làm nổi ô chữ chọn : SpecialEffect + Chọn mục số 6. - Sau khi chọn các thuộc tính hộp thoại Properties và ô chữ sẽ có dạng nh hình bên. Bớc 4: Tạo ô chữ bằng cách Copy ô đầu tiên thành nhiều ô và sắp xếp theo đúng ô chữ yêu cầu. - Mỗi khi Copy ra thêm một ô chữ chỉ cần thay đổi tên của ô chữ trong hộp Name ô thứ 2 tên là L2. - Làm tơng tự nh vậy cho đến ô chữ cuối cùng. - Đỗi với những ô chữ trung tâm ta có thể đổi mầu nền để tạo sự khác biệt so với những ô chữ khác. Kết thúc ta đợc khung ô chữ nh sau: Bíc 5: T¹o hép tho¹i ®Ó hiÖn c©u hái ta nh¸y chuét vµo c«ng cô Textbox kÐo chuét t¹o hép text Box. - Chän hép Textbox vµ thay ®æi c¸c thuéc tÝnh cña hép t¹i hép tho¹i Properties. + Name : T + BackColor ( mÇu nÒn) + Font ( font ch÷ cì ch÷) + ForeColor ( mÇu ch÷) Bớc 6: Tạo các nút làm hiện câu hỏi trong hộp thoại. - Chọn hộp Command Button kéo và tạo nút lệnh - Thay đổi thuộc tính của nút lệnh vào hộp thoại Properties. + Đổi tên trong hộp Name: Name: C1 + Thay đổi Font và cỡ chữ trong hộp Font. ( chọn font tiếng việt) + Trong hộp Caption đánh : Câu 1. + Có thể thay đổi mầu chữ, mầu nền tơng tự nh cách làm trên. + Sau khi thay đổi các thuộc tính nút lệnh có dạng nh hình bên. - Tạo tiếp các nút lệnh khác bằng cách Copy , số nút lệnh tơng ứng với số câu hỏi, mỗi nút lệnh chỉ thay đổi phần + Name Đặt tên: C1, C2 + Caption - Sau khi tạo xong giao diện có dạng nh sau. Bíc 7: ViÕt c©u lÖnh lµm hiÖn néi dung c¸c c©u hái. - KÝch ®óp chuét vµo nót lÖnh C©u 1 trªn mµn h×nh hiÖn ra nh sau: Trong phÇn Private Sub C1_Click() gâ néi dung Private Sub C1_Click() L1=”?” L2=”? L3=”? L4=”? L5=”? L6=”? L7 =”?” T=”Tªn gäi giao cña ba ®êng cao trong tam gi¸c” End Sub Giải thích: L1 = ? làm cho ô tên L1 hiện lên dấu ? khi bấm vào câu1 T = Tên gọi giao của ba đờng cao trong tam giác : Làm hiện câu hỏi tại hộp thoại có tên là T Với nội dung nút lệnh Câu1 nh trên khi ta nháy chuột vào Câu1 dòng đầu tiên hiện lên 7 dấu ? và hộp thoại hiện lên câu hỏi Tên gọi giao của ba đờng cao trong tam giác. Khi chạy chơng trình bấm vào câu 1 sẽ hiện lên nh sau: - Đối với các câu còn lại ta làm tơng tự ( chú ý sử dụng Copy để làm nhanh). Bớc 8: Tạo câu trả lời( lựa chọn các ô đâu tiên của mỗi ô hàng để làm nút lệnh) - Kích đúp chuột vào ô đầu tiên hàng 1 của số soản thảo hiện ra nh sau : Trong phần Private Sub C1_Click() gõ nội dung Private Sub L1_Click() L1=T L2=R L3=ự L4=C L5=T L6= L7 =M End Sub Giải thích: Sau khi gõ nội dung trên nếu nháy vào ô L1 thì nội dung của dòng 1 sẽ hiện ra. - Làm tơng tự đối với các dòng còn lại của ô chữ. Bớc 9: Tạo nút Reset ( làm mới lại từ đầu toàn bộ nội dung của ô chữ) [...]... kiến thức đã học - Cách thực hiện trò chơi ô chữ nh trên có thể áp dụng vào nhiều môn học khác nhau 4 Kết luận - Bằng những kinh nghiệm của bản thân và các tài liệu tham khảo nên cách tạo ô chữ trên còn những điều cha chuẩn nhng tôi mong rằng đề tài này sẽ giúp ích nhiều cho các thầy cô trong các trơng phổ thông trong quá trình giảng dạy bộ môn Toán cũng nh các môn học khác ... Kích đúp chuột vào ô Reset Trong phần Private Sub reset_Click() gõ nội dung từ L1 đến Ln đều là ký tự cách Để giá trị của các ô đều rỗng Private Sub reset_Click() L1= L2= T= End Sub - Khi chạy chơng trình nháy vào nút Reset ô chữ hiện ra nh ban đầu Reset 3 Kết quả thực hiện - Sau khi thực hiện tạo ô chữ cho nhiều phần ôn tập học sinh rất hứng thú khi tham gia vào trò chơi ô chữ từ đó nắm vững . ô chữ bằng cách Copy ô đầu tiên thành nhiều ô và sắp xếp theo đúng ô chữ yêu cầu. - Mỗi khi Copy ra thêm một ô chữ chỉ cần thay đổi tên của ô chữ trong. View/Toolbar/Control Toolbox Bớc 2: Tạo khung cho ô chữ: Nháy chuột chọn công cụ Label và kéo tạo ô vuông. Ban đầu tạo khung sẽ có chữ ô Label1 Bớc 3: Chọn hộp Label1 và

Ngày đăng: 25/06/2013, 01:25

Hình ảnh liên quan

hình CHI ếu - Làm ô chữ bằng VB trong PowerPoint

h.

ình CHI ếu Xem tại trang 1 của tài liệu.

Từ khóa liên quan

Tài liệu cùng người dùng

Tài liệu liên quan