sItem, 2, Len(sItem) - 2)
            txtInfo(2) = ""
            cmdGetValue.Enabled = False
            cmdSetValue.Enabled = False
            cmdDeleteKey.Enabled = False
        Else
            sItem = lstIni.List(lstIni.ItemData(lstIni.ListIndex))
            txtInfo(1) = Mid$(sItem, 2, Len(sItem) - 2)
            sItem = lstIni.List(lstIni.ListIndex)
            iPos = InStr(sItem, "=")
            txtInfo(2) = Left$(sItem, (iPos - 1))
            txtInfo(3) = Mid$(sItem, (iPos + 1))
            cmd