Sunday, November 3, 2013
cara membuat antivirus dengan visual basic 2013
Langsung jha yah
1. Tambahkan 2 Textbox dengan nama TextBox2, TextBox1
2. Tambahkan ListView13. Tambahkan 2 Button
Lalu copy paste kode berikut :
Imports System
Imports System.IO
Imports System.Security.Cryptography
Imports System.IO.FileStream
Imports System.Text
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim OPEN As New OpenFileDialog
OPEN.CheckFileExists = True
OPEN.CheckPathExists = True
OPEN.ShowDialog()
On Error Resume Next
Dim MD5 As New MD5CryptoServiceProvider
Dim FILE As New FileStream(OPEN.FileName, FileMode.Open, FileAccess.Read, FileShare.Read, &H2000)
Label3.Text = (OPEN.FileName)
MD5.ComputeHash(FILE)
Dim HASH As Byte() = MD5.Hash
Dim bUILD As New StringBuilder
Dim NUM As Byte
For Each NUM In HASH
bUILD.Append(String.Format("{0:x2}", NUM))
Next
Me.TextBox1.Text = bUILD.ToString
Button2.Enabled = True
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
If TextBox2.Text.Contains(TextBox1.Text) Then
MsgBox("ADA VIRUS TERDETEKSI")
ListBox1.Items.Add(TextBox1.Text)
Else
MsgBox("FILE IS CLEAN")
End If
End Sub
End Class
Link Download Oktober1992 - Wahyu Web :Wahyu Web
Cara download :
1. Ceklis file yang mu di download
2. Lihat kanan kalian muncul tulisan unduh lalu klik
3. File sudah di download
Youtube Video Saya : My Video
Moga dapat membantu
Description: Membuat Koding Antivirus Dengan VB 2010 Rating: 4.5 Reviewer: Wahyu Amaldi ItemReviewed: Membuat Koding Antivirus Dengan VB 201
0
cara membuat antivirus dengan visual basic 2013
Subscribe to:
Post Comments (Atom)
No comments:
Post a Comment