ĐỒNG HỒ ĐẾM NGƯỢC tài liệu, giáo án, bài giảng , luận văn, luận án, đồ án, bài tập lớn về tất cả các lĩnh vực kinh tế, k...
Tự thiết kế đồng hồ đếm ngược trong PowerPoint thaygiaolang 30-09-2007, 14:25 Dùng đồng hồ đếm ngược mà thầy Thiên Hoàng đã giới thiệu (http://www.dayhocintel.org/diendan/showthread.php?t=818) thì rất tiện lợi. Nhưng nếu ta tự thiết được một đồng hồ ngay trong PP theo đúng ý của mình thì lý thú biết bao. Tôi xin gợi ý cách thực hiện : • Đầu tiên ta tạo ra một Textbox (để làm đồng hồ) theo cách làm bình thường. Định dạng Textbox đó theo ý mình muốn (Font, cỡ chữ, màu sắc, .) • Chọn Textbox, vào menu Draw -> Order -> Bring to Front để đảm bảo rằng Textbox này luôn nằm trên cùng. • Mở cửa sổ Visual Basic Editor (ALT+F11), chọn Insert -> Module rồi gõ vào (hoặc copy) các dòng sau đây : Const Slide_Number = 1 Const Thoi_Gian = 10 Sub Dem_Nguoc() Dim Ngung As Boolean, Dem As Integer, Gio_Cu As Single, Gio_Moi As Single, N As Integer Ngung = False Dem = Thoi_Gian Gio_Cu = Int(Timer) N = ActivePresentation.Slides(Slide_Number).Shapes.Cou nt ActivePresentation.Slides(Slide_Number).Shapes(N). TextFrame.TextRange.Text = Format(Dem, "00") Do While Not Ngung DoEvents Gio_Moi = Int(Timer) If Gio_Moi > Gio_Cu Then Dem = Dem - 1 Gio_Cu = Gio_Moi ActivePresentation.Slides(Slide_Number).Shapes(N). TextFrame.TextRange.Text = Format(Dem, "00") If Dem = 0 Then Ngung = True End If Loop End Sub Trong đó Slide_Number là thứ tự của Slide ta chứa đồng hồ, Thoi_Gian là thời gian đếm (có thể thay đổi 2 thông số này cho phù hợp) • Trở lại cửa sổ PP, nhấp chuột phải vào thanh công cụ rồi chọn Control Toolbox để hiện thanh công cụ này. • Chọn nút Command Button rồi vẽ nút lệnh vào vị trí tùy ý trên Slide • Nhấp chuột phải vào nút lệnh vừa tạo, chọn View Code • Trong cửa sổ hiện ra, gõ vào Dem_Nguoc (là tên của Macro trên) Như vậy là xong. Bây giờ trở lại PP chạy trình chiếu, nhấp chuột vào nút lệnh sẽ thấy đồng hồ hoạt động. Trên đây tôi chỉ trình bày những gợi ý cơ bản, các bạn có thể nghiên cứu, tìm tòi thêm để làm hoàn thiện chiếc đồng hồ của mình. Các bạn có thể tham khảo vì dụ trên file đính kèm. Tạo hiệu ứng lật sách cho bài trình diễn PowerPoint ITGAT.COM - Với thao tác dễ dàng, không đòi hỏi nhiều kỹ năng chuyên môn về thiết kế đồ hoạ là bạn đã có ngay một bài trình diễn (PP) thật độc đáo với Flip PowerPoint 1.2. Tham khảo và tải về bản FP dùng thử miễn phí với dung lượng 3.57MB tại địa chỉ http://www.a-pdf.com/ (hay http://www.mediafire.com/?g1h9njajksa3agz ), chương trình hổ trợ tốt các phiên bản PowerPoint 2000, 2003, 2007, 2010. * Gợi ý khai thác: 1. Trên giao diện tương tác chính nhấp nút Import PPT để đưa vào tập tin PP cần xử lý (chương trình cũng hỗ trợ Import các định dạng ảnh thông dụng). 2. Sử dụng thanh công cụ định dạng để xử lý lại các Slide trình diễn: phóng to, thu nhỏ, xoay, lật, cắt tuỳ biến, chuyển đen trắng . (thật chất lúc này FP hiểu các Slides của bài trình diễn của PP là các tập tin ảnh nên không hỗ trợ việc chỉnh sửa nội dung; việc này được tiến hành trực tiếp trên PowerPoint trước khi Import dữ liệu vào chương trình). 3.Nhấp chọn Page Layout để tiến hành chọn lựa cách trình bày trên giao diện hiển thị của 10 12 16 23 22 21 20 30 29 28 27 26 25 11 13 15 19 18 17 24 14 Hết 10 12 16 23 22 21 20 30 29 28 27 26 25 32 36 50 52 56 60 11 13 15 19 18 17 24 31 33 35 40 39 38 37 42 46 51 53 55 59 58 57 14 34 41 45 44 43 49 48 47 54 Hết 60 10 12 16 23 22 21 20 30 29 28 27 26 25 32 36 50 52 56 00 11 13 15 19 18 17 24 31 33 35 40 39 38 37 42 46 51 53 55 59 58 57 14 34 41 45 44 43 49 48 47 54 Hết phút 60 10 12 16 23 22 21 20 30 29 28 27 26 25 32 36 50 52 56 00 11 13 15 19 18 17 24 31 33 35 40 39 38 37 42 46 51 53 55 59 58 57 14 34 41 45 44 43 49 48 47 54 Hết phút Thoi gianThoi gian 012345678109 Thoi gianThoi gian 012345678109 Thoi gianThoi gian 012345678109 không hợp lệ hoặc file đã bị xóa (violet.vn/uploads/resources/516/206532//Anhdep%20hieuung %20donghodemnguoccucdep.ppt) Quay trở về http://violet.vn