Learn to Code : Membuat Simulasi Mengenal Bilangan (VBA for Powerpoint)

Bagaimana caranya membuat simulasi mengenal bilangan  pada powerpoint? Simak dan ikuti tutorial pada video ini.

download : tutorial membuat simulasi mengenal bilangan

‘Script pada module 1

Sub hideMobil()
For i = 1 To 10
ActivePresentation.Slides(1).Shapes(i).Visible = msoFalse
Next
End Sub

‘Script pada Slide 1

Private Sub SpinButton1_Change()
hideMobil
For i = 1 To Val(SpinButton1)
ActivePresentation.Slides(1).Shapes(i).Visible = msoTrue
Next
ActivePresentation.Slides(1).Shapes(“angka”).TextFrame.TextRange.Text = Val(SpinButton1)
End Sub

download : file contoh membuat simulasi mengenal bilangan

 

Author: Abdul Karim

Integrasi Matematika dan Teknologi merupakan fokus perhatian saya, dalam memberikan kontribusi kepada pendidikan matematika di Indonesi

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s