ini contoh tugas membuatWinRaR beserta kodenya




Private Sub mnexit_Click()
End
End Sub


Private Sub mnfont_Click()
CommonDialog1.ShowFont

End Sub

Private Sub mnopen_Click()
CommonDialog1.ShowOpen
End Sub

Private Sub mnprint_Click()
CommonDialog1.ShowPrinter
End Sub

Private Sub mnsave_Click()
CommonDialog1.ShowSave
End Sub

Private Sub mnwordwrap_Click()
mnwordwrap.Checked = Not (mnwordwrap.Checked)

End Sub

Private Sub txteditor_Change()
mnundo.Enabled = True
End Sub

kalau ada salah harap maklum karna saya masih belajar :)