HAKI

Hak Atas Kekayaan Intelektual (HAKI) atau Hak Milik Intelektual (HMI) atau harta intelek (di Malaysia) ini merupakan padanan dari bahasa Inggris Intellectual Property Right. Kata "intelektual" tercermin bahwa obyek kekayaan intelektual tersebut adalah kecerdasan, daya pikir, atau produk pemikiran manusia (the Creations of the Human Mind) (WIPO, 1988:3)....

Selengkapnya silahkan unduh di
http://www.ziddu.com/download/16053452/HAKI-SMPAliz.ppt.html

Hasil Karya Murid

Pemutar Musik Versi 1

















Mau? Unduh Aja

Pemutar Musik Versi 2


















Mau? Unduh Aja

Pemutar Film


















Mau? Unduh Aja

Permainan Mbahkom



Programnya:

Private Sub CdKeluar_Click()
Dim pesan As String
pesan = MsgBox("Anda Mau Keluar", vbQuestion + vbOKCancel, "Keluar")
If pesan = vbOK Then
MsgBox "Terima Kasih", vbInformation + vbOKOnly, "Sampai Jumpa"
End
Else
jawab = ""
Kunci = ""
Tanya = ""
Password = ""
Kunci.SetFocus
End If
End Sub

Private Sub CmdClear_Click()
jawab = ""
Kunci = ""
Tanya = ""
Password = ""
Kunci.SetFocus
End Sub

Private Sub CmdCoba_Click()
Dim pesan As String
pesan = MsgBox("Anda Ingin Main Lagi", vbQuestion + vbOKCancel, "Main Lagi")
If pesan = vbOK Then
jawab = ""
Kunci = ""
Tanya = ""
Password = ""
Kunci.SetFocus
Else
End
End If
End Sub

Private Sub CmdPembuat_Click()
MsgBox "Lab Komputer SMP Islam AL Izhar Pondok Labu", vbInformation + vbOKOnly, "Pembuat"
End Sub

Private Sub Kunci_Change()
Dim kata As String
kata = "Mbah Jawab ya"
Password = Left(kata, Len(Kunci))
End Sub

Private Sub Kunci_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Tanya.SetFocus
End If
End Sub

Private Sub Tanya_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
jawab = Kunci
End If
End Sub

Kegiatan Belajar Murid