Di bawah ini merupakan fungsi VB6 untuk mendapatkan directory system.
READ MORE - VB6 Code - Fungsi Untuk Mendapatkan Directory System
'Fungsi untuk mendapatkan directory system:
Function GetSystemPath() As String
GetSystemPath = Environ("WinDir") & "\System32"
End Function
'Contoh penggunaan fungsi untuk mendapatkan directory system:
Private Sub Form_Load()
MsgBox GetSystemPath 'menghasilkan C:\Windows\System32 jika windows _
terinstall pada drive C:\ dan menghasilkan D:\Windows\System32 jika _
Windows terinstal pada drive D:\ dan seterusnya.
End Sub