Bài giảng Nhúng Visual vào PowerPoint - Trần Thanh Tùng
NHUÙNG VISUAL VAỉO POWERPOINT ( VBA )
Muùc tieõu : Tớnh ủieồm ngay treõn maứn trỡnh chieỏu trong caực cuoọc thi ủoỏ em hay tri thửực treỷ.
Caựch laứm :
Vaứo view Toolbars Visual basic
Choùn Control Toolbox Command Button ( laỏy 5 nuựt ) ? ẹaởt teõn ẹieồm A, ủieồm B,reset
Choùn Control Toolbox Text Box ( laỏy 2 oõ) ? ẹoọi A, ủoọi B
Click chuoọt phaỷi Command Button 1 choùn View code vieỏt ủoaùn maừ leọnh :
Private Sub CommandButton1_Click()
Me.TextBox1.Value = Me.TextBox1.Value + 10
End Sub
Click chuoọt phaỷi Command Button 2 choùn View code vieỏt ủoaùn maừ leọnh :
Private Sub CommandButton2_Click()
Me.TextBox2.Value = Me.TextBox2.Value + 10
End Sub
Click chuoọt phaỷi Command Button 3 choùn View code vieỏt ủoaùn maừ leọnh :
Private Sub CommandButton3_Click()
Me.TextBox1.Value = 0
Me.TextBox2.Value = 0
End Sub
NHUÙNG VISUAL VAỉO POWERPOINTTớnh ủieồm ngay treõn maứn trỡnh chieỏuGV : Traàn Thanh Tuứng – Trửụứng THPT Tam NoõngNHUÙNG VISUAL VAỉO POWERPOINT ( VBA )Muùc tieõu : Tớnh ủieồm ngay treõn maứn trỡnh chieỏu trong caực cuoọc thi ủoỏ em hay tri thửực treỷ.Caựch laứm : Vaứo view Toolbars Visual basic Choùn Control Toolbox Command Button ( laỏy 5 nuựt ) ẹaởt teõn ẹieồm A, ủieồm B,reset Choùn Control Toolbox Text Box ( laỏy 2 oõ) ẹoọi A, ủoọi BClick chuoọt phaỷi Command Button 1 choùn View code vieỏt ủoaùn maừ leọnh : Private Sub CommandButton1_Click() Me.TextBox1.Value = Me.TextBox1.Value + 10 End SubClick chuoọt phaỷi Command Button 2 choùn View code vieỏt ủoaùn maừ leọnh : Private Sub CommandButton2_Click() Me.TextBox2.Value = Me.TextBox2.Value + 10 End SubClick chuoọt phaỷi Command Button 3 choùn View code vieỏt ủoaùn maừ leọnh : Private Sub CommandButton3_Click() Me.TextBox1.Value = 0 Me.TextBox2.Value = 0 End SubClick chuoọt phaỷi Command Button 3 choùn View code vieỏt ủoaùn maừ leọnh : Private Sub CommandButton1_Click() Me.TextBox1.Value = Me.TextBox1.Value - 10 End SubClick chuoọt phaỷi Command Button 4 choùn View code vieỏt ủoaùn maừ leọnh : Private Sub CommandButton2_Click() Me.TextBox2.Value = Me.TextBox2.Value - 10 End Subệu ủieồm : Deà daứng tớnh ủieồm ngay khi HS traỷ lụứi ủuựng hoaởc trửứ ủieồm khi traỷ lụứi sai Chổ caàn 1 ngửụứi sửỷ lớ maựy tớnh khi toồ chửực thi Lửu yự : Neỏu chửụng trỡnh khoõng chaùy thỡ vaứo Tools Macro Security Choùn Medium hoaởc LowTham khaỷoẹoọi Aẹoọi BChửụng IChửụng IIChửụng IIIChửụng IV& VCaõu 1 – 10 ủCaõu 2 – 10 ủCaõu 3 – 20 ủCaõu 4 – 20 ủCaõu 1 – 10 ủCaõu 1 – 10 ủCaõu 1 – 10 ủCaõu 2 – 10 ủCaõu 2 – 10 ủCaõu 2 – 10 ủCaõu 3 – 20 ủCaõu 3 – 20 ủCaõu 3 – 20 ủCaõu 4 – 20 ủCaõu 4 – 20 ủCaõu 4 – 20 ủCaõu 5 – 20 ủCaõu 5 – 20 ủCaõu 5 – 20 ủCaõu 5 – 20 ủKeỏt thuựcẹieàu naứo sau ủaõy laứ ủuựng khi noựi veà dao ủoọng ủieàu hoaứ cuỷa moọt chaỏt ủieồm ? a. Khi chaỏt ủieồm ủi qua VTCB, noự coự vaọn toỏc cửùc ủaùi, gia toỏc cửùc ủaùi.b. Khi chaỏt ủieồm ủi qua VTCB, noự coự vaọn toỏc cửùc ủaùi, gia toỏc cửùc tieồu.c. Khi chaỏt ủieồm ủi qua vũ trớ bieõn, noự coự vaọn toỏc cửùc tieồu, gia toỏc cửùc ủaùi. d. caõu b vaứ c ủuựng.Caõu 10123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960ẹaựp aựnKhi moọt vaọt dao ủoọng ủieàu hoaứ ủi tửứ VTCB ủeỏn vũ trớ bieõn thỡ : a. Li ủoọ giaỷm daàn. b. ẹoọng naờng taờng daàn. c. Vaọn toỏc giaỷm daàn. d. Theỏ naờng giaỷm daàn. Caõu 20123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960ẹaựp aựnCon laộc loứ xo dao ủoọng ủieàu hoứa thửùc hieọn 30 dao ủoọng maỏt 15 giaõy. Bieỏt khoỏi lửụùng cuỷa vaọt laứ 100 g. Laỏy = 10. ẹoọ cửựng loứ xo laứ:a. 1000 (N/m). b. 1N/mc. 400(N/cm). d. Caỷ ba ủaựp soỏ treõn ủeàu sai. Caõu 30123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960ẹaựp aựnMoọt con laộc loứ xo goàm: loứ xo coự khoỏi lửụùng nhoỷ khoõng ủaựng keồ,coự ủoọ cửựng 40 (N/m) gaộn vụựi quaỷ caàu coự khoỏi lửụùng m. Cho quaỷ caàu dao ủoọng vụựi bieõn ủoọ 5 (cm). Haừy tớnh ủoọng naờng cuỷa quaỷ caàu ụỷ vũ trớ ửựng vụựi li ủoọ 3 (cm).a. Eủ = 0,018 (J). b. Eủ = 0,5 (J).c. Eủ = 0,032 (J). d. Eủ = 320 (J).Caõu 40123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960ẹaựp aựnMoọt chaỏt ủieồm coự khoỏi lửụùng m = 500g dao ủoọng ủieàu hoứa vụựi chu kyứ 2s .Cụ naờng laứ 0,004J thỡ bieõn ủoọ dao ủoọng cuỷa chaỏt ủieồm laứ : a. A = 2 cm b. A = 4 cmc. A = 16 cm d. A = 12 cmCaõu 50123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960ẹaựp aựnBửụực soựng laứ : Khoaỷng caựch giửừa 2 ủieồm dao ủoọng cuứng pha gaàn nhau nhaỏt treõn cuứng moọt phửụng truyeàn soựng.b. Quaừng ủửụứng soựng truyeàn ủửụùc trong 1 chu kyứ dao ủoọng cuỷa soựng .c. Khoaỷng caựch giửừa 2 ủieồm dao ủoọng cuứng pha gaàn nhau nhaỏt.d. Caỷ a vaứ b ủeàu ủuựng .Caõu 10123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960ẹaựp aựnSoựng coự taàn soỏ 50 (Hz) truyeàn trong khoõng khớ vụựi vaọn toỏc 500 (m/s) thỡ coự bửụực soựng laứ :a. 25000 (m). b. 2500000 (cm)c. 10 (m). d. 0,1 (m)Caõu 20123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960ẹaựp aựnSoựng nửụực coự taàn soỏ 20 Hz truyeàn vaọn toỏc 10 m/s thỡ nhửừng ủieàu naứo sau ủaõy laứ ủuựng? a. Bửụực soựng laứ = 200 m.b. Hai ủieồm caựch nhau 50cm treõn phửụng truyeàn soựng dao ủoọng cuứng pha.c. Hai ủieồm caựch nhau 25cm treõn phửụng truyeàn soựng dao ủoọng cuứng pha.d. Bửụực soựng laứ = 50 cm.Caõu 30123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960ẹaựp aựnCho moọt soựng taàn soỏ f = 10 (Hz) truyeàn treõn sụùi daõy coự chieàu daứi l = 10 (m). Khi coự soựng dửứng ta thaỏy treõn daõy coự 5 nuựt (keồ caỷ 2 nuựt ụỷ 2 ủaàu). Vaọn toỏc truyeàn soựng treõn daõy laứ: a. v = 0,5 (m/s). b. v = 50 (m/s).c. v = 0,4 (m/s). d. v = 40 (m/s).Caõu 40123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960ẹaựp aựnMoọt soựng cụ hoùc lan truyeàn vụựi vaọn toỏc 200m/s coự bửụực soựng 4m . Taàn soỏ vaứ chu kyứ soựng laứ: a. f = 50Hz ; T = 0,02s b. f= 50Hz ; T = 0,2s c. f = 5Hz; T = 0,02s d. f = 100Hz; T = 2s Caõu 50123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960ẹaựp aựnDoứng ủieọn xoay chieàu laứ: a. Doứng ủieọn dao ủoọng ủieàu hoứa . b. Doứng ủieọn coự cửụứng ủoọ thay ủoồi .c. Doứng ủieọn coự chieàu thay ủoồi . d. Doứng ủieọn coự chieàu vaứ cửụứng ủoọ thay ủoồi . Caõu 10123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960ẹaựp aựnẹoọng cụ khoõng ủoàng boọ 3 pha hoaùt ủoọng dửùa treõn nguyeõn taộc naứo ? a. hieọn tửụùng caỷm ửựng ủieọn tửứ vaứ vieọc sửỷ duùng tửứ trửụứng quay. b. hieọn tửụùng caỷm ửựng ủieọn tửứ. c. hieọn tửụùng tửù caỷm vaứ sửỷ duùng tửứ trửụứng quay. d. hieọn tửụùng tửù caỷm.Caõu 20123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960ẹaựp aựnMoọt maựy phaựt ủieọn AC moọt pha coự phaàn roõto laứ moọt nam chaõm ủieọn coự 10 caởp cửùc. ẹeồ phaựt ra doứng ủieọn xoay chieàu coự taàn soỏ 50 Hz thỡ vaọn toỏc goực cuỷa roõto phaỷi baống: a. 500 voứng/phuựt b. 300 voứng/phuựt c. 3000 voứng /phuựt d. 1500 voứng/phuựt.Caõu 30123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960ẹaựp aựnHieọu ủieọn theỏ hieọu duùng cuỷa maùng ủieọn daõn duùng baống 220V. Giaự trũ bieõn ủoọ cuỷa hieọu ủieọn theỏ ủoự baống bao nhieõu?a. 156V b. 380V c. 310V d. 440V Caõu 40123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960ẹaựp aựnMoọt ủoaùn maùch ủieọn xoay chieàu goàm ủieọn trụỷ R=100 , cuoọn caỷm coự L= 2/ H vaứtuù ủieọn C = (1/ ).10 - 4 F ủửụùc maộc noỏi tieỏp vụựi nhau, hieọu ủieọn theỏ hai ủaàu ủoaùn maùch laứ u = 100.sin100t (v) . Toồng trụỷ cuỷa ủoaùn maùch laứ: b. 200 d. 100 Caõu 50123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960ẹaựp aựna. 100 c. 200 Sửù hỡnh thaứnh dao ủoọng ủieọn tửứ trong maùch dao ủoọng laứ do hieọn tửụùng naứo sau ủaõy: a. Caỷm ửựng ủieọn tửứ b. Coọng hửụỷng ủieọn c. Quang ủieọn d. Tửù caỷm Caõu 10123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960ẹaựp aựnẹieàu naứo sau ủaõy sai khi noựi veà sửù thu soựng ủieọn tửứ : a. AÙp duùng hieọn tửụùng coọng hửụỷng trong maùch dao ủoọng ủeồ thu soựng b. ẹeồ thu soựng ủieọn tửứ ta duứng anten thu vaứ maùch dao ủoọng L,C ủeồ choùn soựng c. ẹeồ thu soựng ủieọn tửứ ta duứng maùch L, Cd. A vaứ B ủeàu ủuựng Caõu 20123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960ẹaựp aựnChoùn caõu sai :a. Caực vaọt saựng bao goàm caực nguoàn saựng vaứ vaọt ủửụùc chieỏu saựng .b. Nguoàn saựng laứ vaọt tửù noự phaựt ra aựnh saựng .c. Khi coự hieọn tửụng nhaọt thửùc thỡ maởt traờng ụỷ khoaỷng giửừa maởt trụứi vaứ traựi ủaỏt .d. Tia saựng luoõn luoõn laứ ủửụứng thaỳng .Caõu 30123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960ẹaựp aựnChieỏu moọt tia saựng tửứ nửụực ra ngoaứi khoõng khớ ,chieỏt suaỏt cuỷa nửụực 4/3. Caõu naứo sau ủaõy ủuựng . a. Luoõn luoõn coự tia khuực xaù . b. Chổ coự tia khuực xaù khi goực tụựi i < 50 0 c. Chổ coự tia khuực xaù khi goực tụựi i < 42 050’ d. Chổ coự tia khuực xaù khi goực tụựi i < 48 036’Caõu 40123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960ẹaựp aựnChoùn caõu sai :a. Phaựp tuyeỏn laứ ủửụứng vuoõng goực vụựi maởt phaỷn xaù taùi ủieồm tụựi .b. Maởt phaỳng tụựi laứ maởt phaỳng taùo bụỷi tia tụựi vaứ phaựp tuyeỏn taùi ủieồm tụựi . c. Tia phaỷn xaù naốm trong maởt phaỳng tụựi vaứ ụỷ beõn kia phaựp tuyeỏn so vụựi tia tụựi.d. Hieọn tửụùng tia saựng bũ ủoồi hửụựng khi gaởp beà maởt nhaỹn boựng goùi laứ hieọn tửụùng phaỷn xaù aựnh saựng. Caõu 50123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960ẹaựp aựnRaỏt mong sửù goựp yự nhieọt tỡnh cuỷa caực baùn Lieõn heọ : tunglytp@gmail.com
File đính kèm:
- Nhung Visual vao PowerPoint.ppt