VB如何表示读取注册表信息失败则执行……

想用GetSetting("MyApp", "set", "startdate", Now())从注册表里读值,如果是第一次用,注册表里还没有这个键值,就用SaveSetting "MyApp", "set", "startdate", Now()写入当前日期,不知道这个语句应该如何写,请大侠赐教,谢谢!

GetSetting("MyApp", "set", "startdate", Now()) 如果注册表里没有这个键值,程序是不会出错的,因为第四个参数(即Now())就是默认值,也就是说如果没有这个键值,GetSetting函数就会返回默认值。
如果省略默认值,即 GetSetting("MyApp", "set", "startdate") ,那么当键值不存在时,函数会返回一个空字符串,仍然不会报错。
当然你可以根据返回值是否为空来判断注册表中是否存在这个键值,然后再来决定是否要写入。追问

我是新手,如何判断返回值是否为空,可以用我这个问题写个例句吗,谢谢!

追答x = GetSetting("MyApp", "set", "startdate", "")
If x = "" Or Not IsDate(x) Then
    x = Now()
    SaveSetting "MyApp", "set", "startdate", x
Else
    x = CDate(x)
End If

温馨提示:内容为网友见解,仅供参考
无其他回答
相似回答