internal static string ParameterToString(ParameterInfo Parameter)
{
string str1 = "";
Type typ = Parameter.ParameterType;
if (Parameter.IsOptional)
{
str1 += "[";
}
if (typ.IsByRef)
{
str1 += "ByRef ";
typ = typ.GetElementType();
}
else if (Symbols.IsParamArray(Parameter))
{
str1 += "ParamArray ";
}
string str2 = str1 + Parameter.Name + " As " + Utils.VBFriendlyNameOfType(typ, true);
if (Parameter.IsOptional)
{
object defaultValue = Parameter.DefaultValue;
if (defaultValue == null)
{
str2 += " = Nothing";
}
else
{
Type type = defaultValue.GetType();
if (type != Utils.VoidType)
{
str2 = !Symbols.IsEnum(type) ? str2 + " = " + Conversions.ToString(defaultValue) : str2 + " = " + Enum.GetName(type, defaultValue);
}
}
str2 += "]";
}
return(str2);
}
internal static bool IsIntrinsicType(Type Type)
{
return(Symbols.IsIntrinsicType(Symbols.GetTypeCode(Type)) && !Symbols.IsEnum(Type));
}
