Langsung ke konten utama

TUGAS MK BP1 TUGAS 1.5

Private Sub Command1_Click()
Text3 = Val(Text1) + Val(Text2)
Text6 = Val(Text4) * Val(Text5)
Text9 = Val(Text7) - Val(Text8)
Text12 = Val(Text10) / Val(Text11)
End Sub

Private Sub Command3_Click()
End
End Sub

Private Sub Command2_Click()
Text1.SetFocus
Text1 = ""
Text2 = ""
Text3 = ""
Text4 = ""
Text5 = ""
Text6 = ""
Text7 = ""
Text8 = ""
Text9 = ""
Text10 = ""
Text11 = ""
Text12 = ""
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text2.SetFocus
End If
End Sub

Private Sub Text2_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text3 = Val(Text1) + Val(Text2)
Text4.SetFocus
End If
End Sub

Private Sub Text4_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text5.SetFocus
End If
End Sub

Private Sub Text5_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text6 = Val(Text4) * Val(Text5)
Text7.SetFocus
End If
End Sub

Private Sub Text7_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text8.SetFocus
End If
End Sub

Private Sub Text8_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text9 = Val(Text7) - Val(Text8)
Text10.SetFocus
End If
End Sub

Private Sub Text10_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text11.SetFocus
End If

End Sub
Private Sub Text11_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text12 = Val(Text10) / Val(Text11)
End If
End Sub

Label:

Komentar

Posting Komentar

Postingan populer dari blog ini

Macam-macam hacker

A. Grey Hat Hacker Jenis hacker ini merupakan jenis hacker yang sifatnya berada di antara white hat hacker dan black hat hacker. Hacker yang satu ini tidak memiliki ketetapan dalam memegang prinsipnya. Oleh sebab itu, jenis hacker yang satu ini biasanya memegang standar etika yang sifatnya ganda pada setiap kegiatan hacking-nya. Jadi, bisa dalam beberapa saat hacker ini memegang teguh prinsip hacker namun pada keadaan yang lain hacker yang satu ini dapat melanggar batas-batas hukum yang telah ditetapkan. B. Script Kiddie Hacker Hacker ini merupakan jenis hacker yang tidak begitu menguasai mengenai sistem komputer. Namun bukan berarti hacker ini tidak dapat menembus suatu sistem komputer, hacker jenis ini masih dapat menembus sistem komputer dengan cara memanfaat software buatan orang lain. C. Hacktivist Hacker Kemampuan jenis hacker ini digunaka untuk menebar pesan-pesan yang sifatnya bersinggungan dengan politik, ideology beserta agama. Biasanya jenis hacker ini melak...
Posting Komentar
Baca selengkapnya

SEMINAR PENGOLAHAN DATA STATISTIK MENGGUNAKAN PROGRAM SPSS

Pringsewu, Senin (19/3).- STMIK Pringsewu kembali mengadakan seminar, kali ini bertajuk “Pengolahan Data Statistik Menggunakan Program SPSS”. Seminar ini merupakan yang terakhir dari rangkaian seminar dalam rangka peringatan HUT Kabupaten Pringsewu yang kesembilan. Seminar ini menghadirkan narasumber dosen STMIK Pringsewu, Budi Usmanto, S.Si., M.TI. dan Bernadhita Herindri Samodera Utami, S.Si., M.Sc. Seminar dimulai pada pukul 09.00 WIB yang dibuka secara resmi oleh Nur Aminudin, M.T.I selaku Wakil Ketua III STMIK Pringsewu mewakili Ketua STMIK Pringsewu Hj. Rita Irviani, M.M. Dalam sambutannya, Nur demikian disapa menyampaikan bahwa statistika dibutuhkan dalam pengambilan kebijakan bagi pihak-pihak berkepentingan. “Dengan demikian statistika sebagai ilmu penting untuk dipelajari dan diharapkan seminar ini menambah pengetahuan bagi mahasiswa-mahasiswi STMIK Pringsewu”,  Seminar yang diikuti oleh 160 mahasiswa STMIK Pringsewu mendapat antusiasme dari peserta. Materi terbagi me...
Posting Komentar
Baca selengkapnya

Jenis jenis virus komputer

1. Spoofing Spoofing adalah teknik untuk mendapatkan akses yang tidak sah ke suatu komputer atau informasi. Dalam teknik Spoofing, untuk memalsukan bahwa mereka adalah host yang terpercaya, penyerang berpura-pura agar pengguna tidak mengetahui teknik ini. 2. DDOS (distributed denial of service) Serangan DDOS merupakan serangan trhadap komputer atau server di dalam sebuah jaringan dengan cara menghabiskan resource yang dimiliki komputer. Sehingga komputer tersebut tidak bisa berjalan dengan baik sehingga secara tidak langsung mencegah pengguna lain memperoleh akses layanan dari komputer yang diserang. 3.DNS Poisoning DNS Poisoning adalah cara untuk menembus pertahanan dengan menyampaikan IP Address mengenai host. DNS Poisoning mempunyai tujuan mengalihkan lalu lintas paket data dari tujuan aslinya. 4. Sniffer Sniffer Paket atau penganalisa paket dapat pula diartikan 'penyadap paket') yang juga dikenal sebagai Network Analyzers atau Ethernet Sniffer...
Posting Komentar
Baca selengkapnya