读取配置文件的问题,如何查询有没有这个值?

l4ever

CityCode.dat文件是这样的

[城市]
深圳=1
北京=2
....=....

想输入城市返回对应的数字,但是当输入的城市没有的时候,返回其他值.怎么写?
我是这样写的,感觉似乎不是很完美


msgbox(32,"",_city2id("深圳"))

func _city2id($city)
        $ReadCityid = IniReadSection("CityCode.dat", "城市")
If @error Then
    MsgBox(4096, "", "读取数据库失败")
Else
    For $i = 1 To $ReadCityid[0][0]
        Select
                case $ReadCityid[$i][0] = $city
                        return $ReadCityid[$i][1]
                EndSelect
    Next
        return "没有这个城市"
EndIf
EndFunc

顽固不化

正确的结果。