比如
Dim n As Integer = GetConfigValue("Count" & ComputerId,1)Dim Code As String = GetConfigValue("Register" & ComputerId,"")