using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;

using System.ComponentModel.Composition;
using System.ComponentModel.Composition.Hosting;
using System.Reflection;

namespace ConsoleTest
{
class Program
{

static void Main(string[] args)
{
Program p = new Program();
p.Run();

}

public void Run()
{
Compose();

}

private void Compose()
{
AssemblyCatalog catalog = new AssemblyCatalog(Assembly.GetExecutingAssembly());
var container = new CompositionContainer(catalog);
container.ComposeParts(this);
}

}
}

Can't get the following code to convert, it complains about an invalid TypeDecl which I can't see is wrong.

----------------

using System.Security.Cryptography;

public static string EncodePassword(string originalPassword)
{

Byte[] originalBytes;
Byte[] encodedBytes;
MD5 md5;

// Conver the original password to bytes; then create the hash
md5 = new MD5CryptoServiceProvider();
originalBytes = ASCIIEncoding.Default.GetBytes(originalPassword);
encodedBytes = md5.ComputeHash(originalBytes);

// Bytes to string
return System.Text.RegularExpressions.Regex.Replace(BitConverter.ToString(encodedBytes), "-", "").ToLower();
}

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Windows.Forms;
using System.Reflection;

namespace AssemblyLoad
{
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
}

private void Form1_Load(object sender, EventArgs e)
{
//The AssemblyResolve event is called when the common language runtime tries to bind to the assembly and fails.
AppDomain currentDomain = AppDomain.CurrentDomain;
currentDomain.AssemblyResolve += new ResolveEventHandler(currentDomain_AssemblyResolve);
}

Assembly currentDomain_AssemblyResolve(object sender, ResolveEventArgs args)
{
//This handler is called only when the common language runtime tries to bind to the assembly and fails.

//Retrieve the list of referenced assemblies in an array of AssemblyName.
Assembly MyAssembly, objExecutingAssemblies;
string strTempAssmbPath = "";

objExecutingAssemblies = Assembly.GetExecutingAssembly();
AssemblyName[] arrReferencedAssmbNames = objExecutingAssemblies.GetReferencedAssemblies();

//Loop through the array of referenced assembly names.
foreach (AssemblyName strAssmbName in arrReferencedAssmbNames)
{
//Check for the assembly names that have raised the "AssemblyResolve" event.
if (strAssmbName.FullName.Substring(0, strAssmbName.FullName.IndexOf(",")) == args.Name.Substring(0, args.Name.IndexOf(",")))
{
//Build the path of the assembly from where it has to be loaded.
//The following line is probably the only line of code in this method you may need to modify:
<strong>strTempAssmbPath = txtAssemblyDir.Text;</strong>
if (strTempAssmbPath.EndsWith("\\")) strTempAssmbPath += "\\";
strTempAssmbPath += args.Name.Substring(0, args.Name.IndexOf(",")) + ".dll";
break;
}

}
//Load the assembly from the specified path.
MyAssembly = Assembly.LoadFrom(strTempAssmbPath);

//Return the loaded assembly.
return MyAssembly;
}

private void UseChilkat()
{
Chilkat.Zip zip = null;
zip = new Chilkat.Zip();
MessageBox.Show(zip.Version);
textBox1.Text = "Success.";
}

private void button1_Click_1(object sender, EventArgs e)
{
try
{
UseChilkat();
}
catch (Exception e2)
{
textBox1.Text = e2.Message;
}
}
}
}

var orig = myDSet.Tables[0].AsEnumerable();

translates to the following incorrect code

Dim orig As var = myDSet.Tables(0).AsEnumerable()

it should translate to

Dim orig = myDSet.Tables(0).AsEnumerable()

var newRec = from u in dsChanged
where !(from o in orig
select o.Field<decimal>("PRIMARY_KEY_FIELD"))
.Contains(u.Field<decimal>(" PRIMARY_KEY_FIELD"))
select new
{
prim_key = u.Field<decimal>("PRIMARY_KEY_FIELD"),
field1 = u.Field<decimal>("FIELD1"),
field2=u.Field<decimal>("FIELD2"),
field3 = u.Field<decimal>("FIELD3"),
field4 = u.Field<decimal>("FIELD4"),
rec_type="A"//Added
};

translates to

Dim newRec As var = From u In dsChanged _
Where Not (From o In orig _
Select o.Field(Of Decimal)("PRIMARY_KEY_FIELD")).Contains(u.Field(Of Decimal)("PRIMARY_KEY_FIELD")) _
Select New ()

where the last New is treated like a constructor.

When Converting a c# class that implements an interface to VB

The c# element (property/method) is converted to VB, but the Implements keyword and the name of the element being implemented is not generated. I guess in c# you do not explicitly declare the interface method being implemented, but in VB you need to

The converter converts this code

public static readonly DependencyProperty ChildSizeProperty
= DependencyProperty.RegisterAttached("ChildSize", typeof(double), typeof(VirtualizingTilePanel),
new FrameworkPropertyMetadata(200.0d, FrameworkPropertyMetadataOptions.AffectsMeasure |
FrameworkPropertyMetadataOptions.AffectsArrange));

to

Public Shared ChildSizeProperty As DependencyProperty = DependencyProperty.RegisterAttached("ChildSize", GetType(Double), GetType(VirtualizingWrapPanel), New FrameworkPropertyMetadata(200, FrameworkPropertyMetadataOptions.AffectsMeasure Or FrameworkPropertyMetadataOptions.AffectsArrange))

The vb code throws a exception when wpf tries to create a custom control with this dependencyproperty. Since the exception does not say why it fails it took me a little time to figure out that the c# value

200.00d

MUST be converted to

cdbl(200)

and everything goes fine.