Чем VB заменял функцию “Набор”?

Если вы имеете в виду синтаксис VB6

Set obj = new Object

, то вы можете просто удалить Set

obj = new Object()

Set - это ключевое слово в VB6, при вторжении в VB.NET ключевое слово, используемое в этом контексте, было удалено.

Ранее Set использовалось для обозначения ссылки на объект назначается (Let было по умолчанию). Поскольку свойства по умолчанию больше не поддерживаются, если они не принимают параметры, эти операторы были удалены.

Module Module1
    Sub Main()

    Dim person As New Person("Peter")
    Dim people As New People()

    people.Add(person)

    'Use the default property, provided we have a parameter'

    Dim p = people("Peter")

    End Sub
End Module

Public Class People
    Private _people As New Dictionary(Of String, Person)

    Public Sub Add(ByVal person As Person)
    _people.Add(person.Name, person)
    End Sub

    Default Public ReadOnly Property Person(ByVal name As String) As Person
    Get
        Return _people(name)
    End Get
    End Property
End Class

Public Class Person
    Private _name As String

    Public Sub New(ByVal name As String)
    _name = name
    End Sub

    Public ReadOnly Property Name() As String
    Get
        Return _name
    End Get
    End Property
End Class

Некоторые вещи, которые следует помнить для .Net:

• НИКОГДА не используйте Server.CreateObject () в коде .Net. Никогда.
• НИКОГДА не уменьшайте размер переменной, не задав ей явного типа. За исключением новых Option Infer типов linq
• НИКОГДА не используйте ключевое слово Set. За исключением определения свойства.

Фактически, в .Net вы, вероятно, можете полностью избавиться от зависимости CDONTS, поскольку .Net имеет встроенную поддержку почты:

Dim smtp As New System.Net.SmtpClient()
Dim message As New System.Net.MailMessage(EmailFrom, EmailTo, Subject, Body)
smtp.Send(message)