Situs Dosen STKIP Siliwangi Bandung - Martin Bernard, S.Pd., M.Pd

Artikel Umum

Meningkatkan Kemampuan Penalaran Matematik Siswa SMA Melalui Game Adobe Flash CS 4

Membuat Volume Kubus yang Interaktif

Untuk Tombol CommandButton “Laksanakan” Private Sub CommandButton1_Click() Dim a, b As Integer a = Val(TextBox1.Text) ActivePresentation.Slides(2).Shapes(“kubus”).TextFrame.TextRange.Text = ” Volume Kubus = ” & a * a * a ActivePresentation.Slides(2).Shapes(“kubus”).Width = a * 50 ActivePresentation.Slides(2).Shapes(“kubus”).Height = a * 50 ActivePresentation.Slides(2).Shapes(“sisi1”).Visible = False ActivePresentation.Slides(2).Shapes(“sisi2”).Visible = False ActivePresentation.Slides(2).Shapes(“sisi3”).Visible = False ActivePresentation.Slides(2).Shapes(“sisi1”).TextFrame.TextRange.Text = a
baca selengkapnya…

Membuat Kalkulator dengan VBA PowerPoint

Kode-kode untuk membuat Kalkulator Private Sub CommandButton1_Click() ActivePresentation.Slides(2).Shapes(“layar”).TextFrame.TextRange.Text = ActivePresentation.Slides(2).Shapes(“layar”).TextFrame.TextRange.Text + “1” ActivePresentation.Slides(2).Shapes(“layar”).TextFrame.TextRange.Font.Name = “Algerian” ActivePresentation.Slides(2).Shapes(“layar”).TextFrame.TextRange.Font.Size = 40 ActivePresentation.Slides(2).Shapes(“kotak”).TextFrame.TextRange.Text = ActivePresentation.Slides(2).Shapes(“kotak”).TextFrame.TextRange.Text + “1” End Sub Private Sub CommandButton10_Click() ActivePresentation.Slides(2).Shapes(“layar”).TextFrame.TextRange.Text = ActivePresentation.Slides(2).Shapes(“layar”).TextFrame.TextRange.Text + “0” ActivePresentation.Slides(2).Shapes(“layar”).TextFrame.TextRange.Font.Name = “Algerian” ActivePresentation.Slides(2).Shapes(“layar”).TextFrame.TextRange.Font.Size = 40 ActivePresentation.Slides(2).Shapes(“kotak”).TextFrame.TextRange.Text = ActivePresentation.Slides(2).Shapes(“kotak”).TextFrame.TextRange.Text + “0” End Sub Private Sub CommandButton11_Click() ActivePresentation.Slides(2).Shapes(“layar”).TextFrame.TextRange.Text
baca selengkapnya…

Permainan Kotak ajaib di Microsoft Excel

Bahasa VBA untuk Microsoft Excel Private Sub CommandButton1_Click() Range(“C3:E5”) = “” End Sub Private Sub CommandButton2_Click() End Sub Private Sub CommandButton3_Click() Dim baris As Long Dim lembar As Worksheet Set lembar = Worksheets(“Kotak ajaib”) baris = lembar.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Row lembar.Cells(baris, 1).Value = Range(“B1”) lembar.Cells(baris, 3).Value = Range(“E9”) End Sub Private
baca selengkapnya…

Membuat Luas Segitiga interaktif dengan PowerPoint

Bahasa VBA pendukung gambar powerpoint yang interaktif tombol Interkatif Developer Untuk CommandButton Hitung Private Sub CommandButton1_Click() Dim a, b, d, e, f, g As Integer Dim c As Single a = Val(TextBox1.Text) b = Val(TextBox2.Text) d = Val(ActivePresentation.Slides(2).Shapes(“segitiga”).Left) + Val(ActivePresentation.Slides(2).Shapes(“segitiga”).Width) / 2 e = Val(ActivePresentation.Slides(2).Shapes(“segitiga”).Top) f = Val(ActivePresentation.Slides(2).Shapes(“segitiga”).Left) g =
baca selengkapnya…

Membuat gambar 3D menggunakan geogebra 4.4

tekan download dibawah ini

Sistem Bilangan Real R

beberapa yang saya bagikan tentang bilangan rela dari sistem bilangan real bagian pertama bagian kedua

Membuktikan rumus fibonacci dengan Induksi Matematika

rumus fibonacci menggunakan menggunakan Induksi Matematika langkah-langkahnya tekan di bawah ini! rumus fibonacci dengan induksi matematika

Penerapan Model Quantum Learning Berbasis Kategori Fatis dalam Pembelajaran Berpidato

Quantum learning ialah kiat, petunjuk, strategi, dan seluruh proses belajar yang dapat mempertajam pemahaman dan daya ingat, serta membuat belajar sebagai suatu proses yang menyenangkan dan bermanfaat. Beberapa teknik yang dikemukakan merupakan teknik meningkatkan kemampuan diri yang sudah populer dan umum digunakan. Namun, Bobbi DePorter mengembangkan teknik-teknik yang sasaran akhirnya ditujukan
baca selengkapnya…