mo hinh dong ho dem nguoc
Tự thiết kế đồng hồ đếm ngược trong PowerPoint
Ngày tải lên :
11/03/2013, 08:21
... 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, ... 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 ... 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...
- 8
- 30.3K
- 277
tạo đồng hồ đếm ngược
Ngày tải lên :
24/06/2013, 01:27
... gởi về mail:
Mọi lời phản hồi xin gởi về mail:
seasonhot2003@yahoo.com
seasonhot2003@yahoo.com
Đồng hồ đếm ngược là một công cụ hữu ích cho giáo viên khi thiết kế giáo
giáo án đòi hỏi hs phải ...
settings -> chọn run macro và chọn Dem_ Nguoc (đây là tên của
macro đếm ngược thời gian mà ta đã tạo ở bước 2
Chú ý: nếu nên tạo đồng hồ sau khi ta đã ho n thành toàn bộ các nội
dung trong ... ngược thời gian: nhấn Alt + F11
để mở chức năng Visual Basic, sau đó chọn insert -> Module; sau đó
đánh ho c copy đoạn câu lệnh trong slide 3 dưới đây. Như vậy ta đã
có một câu lệnh và một...
- 4
- 4.9K
- 121
Đồng hồ đếm ngược cho trò chơi ô chữ
Ngày tải lên :
06/07/2013, 01:25
...
123456789
1011121314151617181920
Bâm vào đây
để chạy thời
gian
Đồng hồ đếm ngược cho trò chơi ô chữ
Vũ Ngọc Linh – THCS Hùng Thắng – Bình Giang - Hải Dương
...
- 2
- 3.1K
- 187
