twitter





-          MD : untuk membuat folder baru
Contoh: D:\>MD Memory
Untuk membuat folder dengan nama Memory
-          CD : untuk pindah ke folder tertentu
Contoh: D:\>CD Memory
Untuk masuk ke folder Memory
-          CD.. : untuk kembali ke folder sebelumnya
Contoh: D:\Memory\Phone\Audio>CD..
Untuk kembali dari folder Audio ke folder Phone
-          CD\ : untuk kembali ke disk awal
Contoh: D:\Memory\Phone\Audio>CD\
Untuk kembali ke disk d:
-          RD : untuk menghapus directory
Contoh: D:\Memory\Phone>RD Images
Untuk menghapus folder Images
-          DEL : untuk menghapus directory dan sub directory
Contoh: D:\Memory\Card\Java>DEL Games
Untuk menghapus folder Games dan sub foldernya
-          REN : untuk mengubah nama
Contoh: D:\Memory\Phone\Audio>REN Suara Lagu
Untuk mengubah nama folder Suara menjadi nama folder Lagu



Form1
Merah
Private Sub Command1_Click()
Label2.ForeColor = vbRed
End Sub

Hijau
Private Sub Command2_Click()
Label2.ForeColor = vbGreen
End Sub

Biru
Private Sub Command3_Click()
Label2.ForeColor = vbBlue
End Sub

Masuk
Private Sub Command4_Click()
If Text1.Text = "Tri" Then
MsgBox "Keyword di Terima", vbInformation, "Info"
Form1.Hide
Form2.Show
Else
MsgBox "Keyword di Tolak", vbCritical, "info"
End If
End Sub

Hapus
Private Sub Command5_Click()
Text1.Text = ""
Label2.Caption = ""
End Sub

OK
Private Sub Command6_Click()
Label2.Caption = Text1.Text
End Sub

Bold
Private Sub Option1_Click()
Label2.FontBold = True
Label2.FontItalic = False
Label2.FontUnderline = False
End Sub






Italic
Private Sub Option2_Click()
Label2.FontBold = False
Label2.FontItalic = True
Label2.FontUnderline = False
End Sub

Underline
Private Sub Option3_Click()
Label2.FontBold = False
Label2.FontItalic = False
Label2.FontUnderline = True
End Sub

Form2
Kembali
Private Sub Command1_Click()
Form2.Hide
Form1.Show
End Sub

Jika Text bernama Tri, maka akan menampilkan Info Keyword di Terima.

Kemudian akan menampilkan Form2.

Jika Text bukan bernama Tri, maka akan menampilkan Info Keyword di Tolak.