Trying to convert this sub to VB

See more:

C#

VB

Having a problem converting a Linq lambda from C# to VB.

The error is:
Error 5 Overload resolution failed because no accessible 'New' is most specific for these arguments:
'Public Sub New(start As System.Threading.ParameterizedThreadStart)': Not most specific.
'Public Sub New(start As System.Threading.ThreadStart)': Not most specific.


Here's the C# code, and my attempt at VB follows.

private void FetchEnvelopesAsync(Mailbox mailbox)
{
new Thread(() =>
  {
  try {
    using (var client = CreateClientByAccount _ 
    (mailbox.AccountState.Account)) {
      client.Select(mailbox.Fullname);

      var query = client.Messages.Where(x => x.Date < DateTime.Today.AddDays(1)).Select _
      (x => new MyMessage {Envelope = x.Envelope, Uid = x.Uid});

      foreach (var message in query) {
        message.Mailbox = mailbox;
        AddMessageToViewSafely(mailbox, message);
      }
    }
  }
  catch (Exception ex) {
    LogSafely(ex.Message);
  }
}).Start();
}

Private Sub FetchEnvelopesAsync(mailbox As cMailbox)
  Dim T As New Thread(Function()
      Try
        Using client = CreateClientByAccount(mailbox.AccountState.Account)
        client.[Select](mailbox.Fullname)
        Dim query = client.Messages.Where( _
        Function(x) x.[Date] < DateTime.Today.AddDays(1)).[Select] _
          (Function(x) New cMyMessage() _
        With {.Envelope = x.Envelope, .Uid = x.Uid})
 
          For Each message As Object In query
            message.Mailbox = mailbox
            AddMessageToViewSafely(mailbox, message)
          Next
        End Using
      Catch ex As Exception
        LogSafely(ex.Message)
      End Try

    End Function)
    T.Start()

  End Sub