What is wrong with this code, when i run the program i get the message: Type Mismatch

Code:
ChkTray.Value = GetSetting("SecApp", "Restrict", "NoTray", "")