Setiap Hari, Kaspersky Temukan 780 "Trojan Banker" Baru

Kaspersky Lab merilis laporan yang cukup mengejutkan, setiap harinya muncul 780 malware baru yang mengincar data nasabah online banking.

Atas temuan ini, Kaspersky mengingatkan pengguna komputer untuk lebih berhati-hati dalam menjaga informasi rahasia dan lebih teliti memperhatikan permintaan yang menanyakan data yang tidak biasa.

Berdasarkan data Kaspersky Security Network dalam tiga bulan terakhir, ditemukan 780 trojan banker baru dan terdeteksi di sekitar 2,000 komputer setiap harinya. Hal ini sama dengan 1,1% dari seluruh jumlah malware yang terdeteksi oleh software Kaspersky.

Di bulan Januari, para ahli Kaspersky Lab menemukan Trojan-Banker.MSIL.MultiPhishing.gen yang dirancang untuk mencuri data detail nasabah berbagai bank seperti Santander, HSBC Bank UK, Metro Bank, Bank of Scotland, Lloyds TSB, dan Barclays.

Setelah masuk dalam komputer, trojan akan menunggu layanan online banking untuk mulai bekerja. Malware ini kemudian akan memunculkan tampilan tiruan dari format otorisasi bank yang bersangkutan. Untuk memastikan data, Trojan akan melakukan pengecekan data yang dimasukkan.

Dengan cara ini, para pelaku berhasil memperoleh informasi rahasia yang memberikan mereka akses penuh atas akun bank nasabah. Trojan ini utamanya menargetkan nasabah di Inggris, dengan lebih dari 90 persen pendeteksian antivirus.

Tidak hanya Inggris, Trojan banker juga mengincar pengguna online banking di seluruh dunia. Negara yang paling sering menjadi target malware ini adalah Brazil (16,9 persen), diikuti Rusia (15,8 persen) dan China (10,8 persen).

Looping pada VB.NET

Belajar Looping pada VB.net

Cara menampilakan bilangan yang pembaginya 4 dan 7 sisa baginya 0.

Pada contoh looping kali ini, saya akan mencoba dengan 1 textbox yang diproses dengan menggunakan Botton dengan menampilakan hasil pada listbox.

Langkah awal yang kita buat adalah membuat form yang terdiri dari 1botton untuk proses, 1 textbox untuk input nilai dan 1 listbox untuk menampilkan hasilnya.

Karna untuk langkah dalam membuat form udah ada pada materi sebelumnya, jadi pada contoh kali ini kita langsung pada tampilan yang sudah ada desain.

Berikut adalah contoh desain :

Untuk keterangan properties pada control dasar semua Name-nya silahkan atur sendiri sesuai pada pembelajaran pada materi sebelumnya. Tentu masih ingat dong……

Nah setelah kita buat Desain pada Form, langkah berikutnya adalah memasukan coding.

Coding pada desain ini hanya ada pada control Botton aja, Karena Botton disini kita jadikan sebagai pengeksekusi.

Caranya gampang ko’, klick aja pada Botton lalu akan terlihat tampilan sebagai berikut :

Untuk lebih jelasnya Ni…..:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim i As Integer

ListBox1.Items.Clear()

For i = 1 To Val(TextBox1.Text)

If (i Mod 7 = 0) And (i Mod 4 = 0) Then

ListBox1.Items.Add(i)

End If

Next

End Sub

End Class

Karena pada kesempatan kali ini kita akan menampilkan bilangan yang hasil pembaginya 0 jika pembaginya 4 dan 7 dari bilangan 1 sampai 100, maka…..

Silahkan masukan coding sesuai pada tampilan diatas tanpa merubah sedikit kata apapun.

Kecuali mau menampilkan dengan hasil yang beda.

Setelah semua tertulis dengan benar, maka mari kita Running.

Jika g’ ada yang ERROR maka hasil tampilannya akan seperti berikut ini :

Pada contoh berikutnya saya akan mencoba membuat contoh yang jika pembaginya 4 sisa hasilnya adalah 3.

Caranya sama ko’ seperti pada contoh looping sebelumnya, nah..pada contoh yang akan kita buat ini kita akan pakai desain yang sama seperti contoh sebelumnya. Setelah desain jadi, langkah berikutnya yaitu memasukan coding pada Button dan Masukan Coding berikut ini :

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim i As Integer

ListBox1.Items.Clear()

For i = 1 To Val(TextBox1.Text)

If i Mod 4 = 3 Then

ListBox1.Items.Add(i)

End If

Next

End Sub

End Class

Maka pada Listbox akan menampilkan hasil seperti dibawah ini :

3 7 11 15 19 23 27 31 35 39 43 47 51 55 59 63 67 71 75 79 83 87 91 95 99

Note :

ListBox1.Items.Clear() artinya untuk membersihkan nilai yang ada di ListBox1.

For I = 1 To Val (TextBox1.Text) artinya untuk looping dari 1 sampai nilai di ListBox1

Mudah dan Gampang Kan........he...he....he....

Latihan VB

Langkah berikutnya adalah mendesign form yang telah kita buat tadi dengan tool yang ada didalam sebuah toolbox. Masih ingat kan apa itu toolbox? Klo lupa mari kita ingat kembali.
1. Tool box: merupakan kumpulan control (tool) mis: textbox, label, button.
2. Menu: Menu yang dapat dipilih.
3. Form: tempat meletakkan control (tool) mis textbox, label, button dan lain-lain.
4. Toolbar: Toolbar biasanya merupakan tombol singkat dari menu.
5. Project Explorer: di jendela ini terdapat komponen-komponen yang menyusun project kita. (Project bisa terdiri dari form,module,class dll.)
6. Properties window: properties window adalah tempat untuk mengatur control (objek).
Pertama masukan label pada form, caranya double klik pada A Label atau drag dan masukan kedalam form. Pada latihan kali ini masukan label pada form sebanyak 7 label. Setelah itu masukan juga 7 Textbox dengan cara yang sama seperti memasukan label, 2 Button dan 1 Listbox.
Lalu ubahlah properties pada masing – masing tool, untuk latihan ini saya akan ubah propertiesnya sesuai dibawah ini :

---

Tool Name Text
Label 1 Label 1 Input
Label 2 Label 2 Hasil
Label 3 Label 3 Data 1
Label 4 Label 4 Data 2
Label 5 Label 5 Data 3
Label 6 Label 6 Data 4
Label 7 Label 7 Data 5

---

Textbox1 Txtinput -
Textbox2 txthasil -
Textbox3 Txt1 -
Textbox4 Txt2 -
Textbox5 Txt3 -
Textbox6 Txt4 -
Textbox7 Txt5 -
Button1 Button1 Proses 1
Button2 Button2 Proses 2
Listbox1 Listbox1

---

Maka tampilan formnya akan menjadi seperti dibawah ini :






Lalu masukan Codingnya sebagai berikut :

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If Txtinput.Text = "TI" Then
Txthasil.Text = "Teknik informatika"
Else
If Txtinput.Text = "SI" Then
Txthasil.Text = "Sistem informasi"
End If
End If

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

ListBox1.Items.Add(Txt1.Text + " " + Txt2.Text + " " + Txt3.Text + " " + Txt4.Text + " " + Txt5.Text)
End Sub


End Class


Setelah itu kita Run (F5) dan kita isi pada masing – masing textbox (kecuali pada textbox hasil) dan kita klik pada Button Proses 1 dan Proses 2 maka akan menghasilkan :




Selesai dech…mudah kan?
Sorry kalau bahasanya gak lugas, soalnya waktunya terbatas dan rangkuman ini harus buru – buru di upload.