readini.bas

大量优秀的vb编程

Attribute VB_Name = "ReadINI"
Option Explicit

Public Function DBPath() As String
    DBPath = "e:\lt\db\biblio.mdb"
End Function