C# Definition:

    [ComImport]
    [InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]
    [Guid("6D67E846-5B9C-4db8-9CBC-DDE12F4254F1")]
    public interface ITrayDeskband
    {
    [PreserveSig]
    int ShowDeskBand(Guid clsid);
    [PreserveSig]
    int HideDeskBand(Guid clsid);
    [PreserveSig]
    int IsDeskBandShown(Guid clsid);
    [PreserveSig]
    int DeskBandRegistrationChanged();
    }

VB Definition:

<ComImport> _
<Guid("TODO")> _
'TODO: Insert <InterfaceType(ComInterfaceType.InterfaceIsIUnknown)> _ if this doesn't derive from IDispatch
Interface ITrayDeskband
   TODO
End Interface

Sample-Code:

    ITrayDeskband obj = null;
    Type trayDeskbandType = System.Type.GetTypeFromCLSID(new Guid("E6442437-6C68-4f52-94DD-2CFED267EFB9"));
    try
    {
        obj = (ITrayDeskband)Activator.CreateInstance(trayDeskbandType);
        Guid deskbandGuid = {SomeDeskbandGuid}
        obj.DeskBandRegistrationChanged();
        hr = obj.ShowDeskBand(deskbandGuid);
        if (hr != 0)
            throw new Exception("Error while trying to show deskband: " + hr);
        obj.DeskBandRegistrationChanged();
    }
    catch (Exception e)
    {
        MessageBox.Show(e.Message);
    }
    finally
    {
        if (obj != null && Marshal.IsComObject(obj))
            Marshal.ReleaseComObject(obj);
    }

Notes:

None.