Factory (PetShop)

Hola Amigos estoy desarrollando una Aplicacion Windows con VB.Net tratando de
seguir la metodologia que aplican en PetShop pero no logro implememtar esta
clase no se si me podrian dar una mano con esto.Gracias anticipadas

La clase original es la siguiente:

Public class Account
{
public static PetShop.IDAL.IAcount Create()
{
string
path=System.Configuration.ConfigurationSettings.AppSettings["WebDAL"];
string className=path + ".Account";
return (PetShop.IDAL.IAccount)Assembly.Load(path).CreateInstance(className);
}
}

Intente hacerlo de esta manera en VB.Net pero me salen errores

Public Shared Function Create() As Account.IDAL.IAccount
Dim path As String
Dim className As String

path = "Darle una ruta fija"
className = path + ".Account"
Create=(PetShop.IDAL.IAccount)Assembly.load
(path).CreateInstance

End Function