Lo que pasa es que no estas sabiendo utilizar la clase mira prueba asi:
Código [Seleccionar]
Private Sub Form_Load()
mIni.Init
mIni.Path = App.Path
mIni.Filename = "\prueba.ini"
MsgBox mIni.ReadData("Persona", "Nombre")
MsgBox mIni.ReadData("Persona", "Apellido")
End Sub