vb如何读取系统已安装软件并获取软件版本号答:Case vbString '''// 字符串, 扩展环境字符串或多段字符串... strValue = Value Select Case Flag Case IsExpandableString retVal = RegSetValueEx(handle, ValueName, 0, REG_EXPAND_SZ, ByVal strValue, 255) Case IsMultiString retVal = RegSetValueEx(handle, ValueName, 0, REG_MULTI_SZ, ByVal st...