C# to VB.NET conversion

[prorata.net]

Hi All,
I am converting a C# Web Application to VB.NET. The problem occurs with the line of code in Bold. I am unable to find a VB.NET equivalent of this line.


ArrayList arrSymbologies = new ArrayList();

// get all public static properties
PropertyInfo[] propertyInfos;
propertyInfos = typeof(BarCodeReadType).GetProperties(BindingFlags .Public |
BindingFlags.Static);
// sort properties by name
Array.Sort(
propertyInfos, delegate(PropertyInfo propertyInfo1, PropertyInfo propertyInfo2)
{ return propertyInfo1.Name.CompareTo(propertyInfo2.Name); }
);

​I tried different online (free) C# to VB.NET converters, they convert is as follows, but the Visual studio give errors (BC30201: Expression expected. ; BC32017: Comma, ')', or a valid expression continuation expected.)

Array.Sort(propertyInfos, Function(propertyInfo1 As PropertyInfo, propertyInfo2 As PropertyInfo) propertyInfo1.Name.CompareTo(propertyInfo2.Name))

Please help in this regard.
Thanks in Advamce
Babar

[Janos™]

Check the corrections done:

using System.Reflection;  // reflection namespace

// get all public static properties of MyClass type
PropertyInfo[] propertyInfos;
propertyInfos = typeof(MyClass).GetProperties(BindingFlags.Public |
                                              BindingFlags.Static);
// sort properties by name
Array.Sort(propertyInfos,
        delegate(PropertyInfo propertyInfo1, PropertyInfo propertyInfo2)
        { return propertyInfo1.Name.CompareTo(propertyInfo2.Name); });

// write property names
foreach (PropertyInfo propertyInfo in propertyInfos)
{
  Console.WriteLine(propertyInfo.Name);
}

[prorata.net]

I am sorry if I misinterpreted. The source code that you provided, I need to convert this into VB.NET.

Can you please provide me the VB.NET equivalent of this source?

[Mr Alfa]

You can try going here and the service provided over there will translate the code for you, just start typing the code or upload a file to convert it. Hope that helps you out.

[fiedel]

First, make sure you're using a recent version of Visual Studio. VB .NET didn't have full anonymous method support until 2010, but 2008 might be sufficient. The problem is VB won't let you go straight from the anonymous method (which would be Func(Of PropertyInfo, PropertyInfo, Integer)) to Comparison(Of T), whereas C# had a bit of syntax to help with that conversion. You can address it by storing the lambda in a variable:

Dim comparison As Comparison(Of PropertyInfo) = Function(left As PropertyInfo, right As PropertyInfo)
Return left.Name.CompareTo(right.Name)
End Function

Array.Sort(propertyInfos, comparison)