Cara membuat Open File / Directory VB6

Cara membuat open file vb6, Cara membuka Directory VB6, Tutorial Open File VB6, Tutorial Open Directory VB6 :

disini kami share cara membuat open file / directory dengan menggunakan CommonDialog(Micorost Common Dialog(sp3)/(sp6)).

pertama tambahkan CommandButton
lalu double klik pada CommandButtonakan terlihat Source Code berikut :
Private Sub Command1_Click()

End Sub

jika dengan cara manual untuk memasukkan source code maka klik Form lalu pilih view code dan masukkan kode berikut :
Private Sub Command1_Click()

CommonDialog1.DialogTitle = "Open File"
CommonDialog1.Filter = "*.*"
CommonDialog1.FilterIndex = 1
CommonDialog1.Flags = cdlOFNAllowMultiselect + cdlOFNExplorer
CommonDialog1.Flags = cdlOFNFileMustExist + cdlOFNHideReadOnly
CommonDialog1.CancelError = True
On Error Resume Next
CommonDialog1.ShowOpen
If Err Then
    'MsgBox "Select Folder"
    Exit Sub
End If

End sub

Thank's for reading the articelCara membuat Open File / Directory VB6 .If You want to copy paste your website please tag my link Cara membuat Open File / Directory VB6 Intro My Website.
<a href="http://operaterpm.blogspot.com/2013/11/OpenFileVB6.html">Cara membuat Open File / Directory VB6</a>