frmmain.vb

VB.NET - NET Framework - How-To Send Mai VB.NET 发送邮件的示例代码

        Me.txtFrom.BackgroundImage = CType(resources.GetObject("txtFrom.BackgroundImage"), System.Drawing.Image)
        Me.txtFrom.Dock = CType(resources.GetObject("txtFrom.Dock"), System.Windows.Forms.DockStyle)
        Me.txtFrom.Enabled = CType(resources.GetObject("txtFrom.Enabled"), Boolean)
        Me.erpEmailAddresses.SetError(Me.txtFrom, resources.GetString("txtFrom.Error"))
        Me.txtFrom.Font = CType(resources.GetObject("txtFrom.Font"), System.Drawing.Font)
        Me.erpEmailAddresses.SetIconAlignment(Me.txtFrom, CType(resources.GetObject("txtFrom.IconAlignment"), System.Windows.Forms.ErrorIconAlignment))
        Me.erpEmailAddresses.SetIconPadding(Me.txtFrom, CType(resources.GetObject("txtFrom.IconPadding"), Integer))
        Me.txtFrom.ImeMode = CType(resources.GetObject("txtFrom.ImeMode"), System.Windows.Forms.ImeMode)
        Me.txtFrom.Location = CType(resources.GetObject("txtFrom.Location"), System.Drawing.Point)
        Me.txtFrom.MaxLength = CType(resources.GetObject("txtFrom.MaxLength"), Integer)
        Me.txtFrom.Multiline = CType(resources.GetObject("txtFrom.Multiline"), Boolean)
        Me.txtFrom.Name = "txtFrom"
        Me.txtFrom.PasswordChar = CType(resources.GetObject("txtFrom.PasswordChar"), Char)
        Me.txtFrom.RightToLeft = CType(resources.GetObject("txtFrom.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.txtFrom.ScrollBars = CType(resources.GetObject("txtFrom.ScrollBars"), System.Windows.Forms.ScrollBars)
        Me.txtFrom.Size = CType(resources.GetObject("txtFrom.Size"), System.Drawing.Size)
        Me.txtFrom.TabIndex = CType(resources.GetObject("txtFrom.TabIndex"), Integer)
        Me.txtFrom.Text = resources.GetString("txtFrom.Text")
        Me.txtFrom.TextAlign = CType(resources.GetObject("txtFrom.TextAlign"), System.Windows.Forms.HorizontalAlignment)
        Me.txtFrom.Visible = CType(resources.GetObject("txtFrom.Visible"), Boolean)
        Me.txtFrom.WordWrap = CType(resources.GetObject("txtFrom.WordWrap"), Boolean)
        '
        'lblFrom
        '
        Me.lblFrom.AccessibleDescription = CType(resources.GetObject("lblFrom.AccessibleDescription"), String)
        Me.lblFrom.AccessibleName = CType(resources.GetObject("lblFrom.AccessibleName"), String)
        Me.lblFrom.Anchor = CType(resources.GetObject("lblFrom.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.lblFrom.AutoSize = CType(resources.GetObject("lblFrom.AutoSize"), Boolean)
        Me.lblFrom.BackColor = System.Drawing.SystemColors.Control
        Me.lblFrom.CausesValidation = False
        Me.lblFrom.Dock = CType(resources.GetObject("lblFrom.Dock"), System.Windows.Forms.DockStyle)
        Me.lblFrom.Enabled = CType(resources.GetObject("lblFrom.Enabled"), Boolean)
        Me.erpEmailAddresses.SetError(Me.lblFrom, resources.GetString("lblFrom.Error"))
        Me.lblFrom.Font = CType(resources.GetObject("lblFrom.Font"), System.Drawing.Font)
        Me.lblFrom.ForeColor = System.Drawing.SystemColors.ControlText
        Me.erpEmailAddresses.SetIconAlignment(Me.lblFrom, CType(resources.GetObject("lblFrom.IconAlignment"), System.Windows.Forms.ErrorIconAlignment))
        Me.erpEmailAddresses.SetIconPadding(Me.lblFrom, CType(resources.GetObject("lblFrom.IconPadding"), Integer))
        Me.lblFrom.Image = CType(resources.GetObject("lblFrom.Image"), System.Drawing.Image)
        Me.lblFrom.ImageAlign = CType(resources.GetObject("lblFrom.ImageAlign"), System.Drawing.ContentAlignment)
        Me.lblFrom.ImageIndex = CType(resources.GetObject("lblFrom.ImageIndex"), Integer)
        Me.lblFrom.ImeMode = CType(resources.GetObject("lblFrom.ImeMode"), System.Windows.Forms.ImeMode)
        Me.lblFrom.Location = CType(resources.GetObject("lblFrom.Location"), System.Drawing.Point)
        Me.lblFrom.Name = "lblFrom"
        Me.lblFrom.RightToLeft = CType(resources.GetObject("lblFrom.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.lblFrom.Size = CType(resources.GetObject("lblFrom.Size"), System.Drawing.Size)
        Me.lblFrom.TabIndex = CType(resources.GetObject("lblFrom.TabIndex"), Integer)
        Me.lblFrom.Text = resources.GetString("lblFrom.Text")
        Me.lblFrom.TextAlign = CType(resources.GetObject("lblFrom.TextAlign"), System.Drawing.ContentAlignment)
        Me.lblFrom.Visible = CType(resources.GetObject("lblFrom.Visible"), Boolean)
        '
        'lblTo
        '
        Me.lblTo.AccessibleDescription = CType(resources.GetObject("lblTo.AccessibleDescription"), String)
        Me.lblTo.AccessibleName = CType(resources.GetObject("lblTo.AccessibleName"), String)
        Me.lblTo.Anchor = CType(resources.GetObject("lblTo.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.lblTo.AutoSize = CType(resources.GetObject("lblTo.AutoSize"), Boolean)
        Me.lblTo.BackColor = System.Drawing.SystemColors.Control
        Me.lblTo.CausesValidation = False
        Me.lblTo.Dock = CType(resources.GetObject("lblTo.Dock"), System.Windows.Forms.DockStyle)
        Me.lblTo.Enabled = CType(resources.GetObject("lblTo.Enabled"), Boolean)
        Me.erpEmailAddresses.SetError(Me.lblTo, resources.GetString("lblTo.Error"))
        Me.lblTo.Font = CType(resources.GetObject("lblTo.Font"), System.Drawing.Font)
        Me.lblTo.ForeColor = System.Drawing.SystemColors.ControlText
        Me.erpEmailAddresses.SetIconAlignment(Me.lblTo, CType(resources.GetObject("lblTo.IconAlignment"), System.Windows.Forms.ErrorIconAlignment))
        Me.erpEmailAddresses.SetIconPadding(Me.lblTo, CType(resources.GetObject("lblTo.IconPadding"), Integer))
        Me.lblTo.Image = CType(resources.GetObject("lblTo.Image"), System.Drawing.Image)
        Me.lblTo.ImageAlign = CType(resources.GetObject("lblTo.ImageAlign"), System.Drawing.ContentAlignment)
        Me.lblTo.ImageIndex = CType(resources.GetObject("lblTo.ImageIndex"), Integer)
        Me.lblTo.ImeMode = CType(resources.GetObject("lblTo.ImeMode"), System.Windows.Forms.ImeMode)
        Me.lblTo.Location = CType(resources.GetObject("lblTo.Location"), System.Drawing.Point)
        Me.lblTo.Name = "lblTo"
        Me.lblTo.RightToLeft = CType(resources.GetObject("lblTo.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.lblTo.Size = CType(resources.GetObject("lblTo.Size"), System.Drawing.Size)
        Me.lblTo.TabIndex = CType(resources.GetObject("lblTo.TabIndex"), Integer)
        Me.lblTo.Text = resources.GetString("lblTo.Text")
        Me.lblTo.TextAlign = CType(resources.GetObject("lblTo.TextAlign"), System.Drawing.ContentAlignment)
        Me.lblTo.Visible = CType(resources.GetObject("lblTo.Visible"), Boolean)
        '
        'lblSubject
        '
        Me.lblSubject.AccessibleDescription = CType(resources.GetObject("lblSubject.AccessibleDescription"), String)
        Me.lblSubject.AccessibleName = CType(resources.GetObject("lblSubject.AccessibleName"), String)
        Me.lblSubject.Anchor = CType(resources.GetObject("lblSubject.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.lblSubject.AutoSize = CType(resources.GetObject("lblSubject.AutoSize"), Boolean)
        Me.lblSubject.BackColor = System.Drawing.SystemColors.Control
        Me.lblSubject.CausesValidation = False
        Me.lblSubject.Dock = CType(resources.GetObject("lblSubject.Dock"), System.Windows.Forms.DockStyle)
        Me.lblSubject.Enabled = CType(resources.GetObject("lblSubject.Enabled"), Boolean)
        Me.erpEmailAddresses.SetError(Me.lblSubject, resources.GetString("lblSubject.Error"))
        Me.lblSubject.Font = CType(resources.GetObject("lblSubject.Font"), System.Drawing.Font)
        Me.lblSubject.ForeColor = System.Drawing.SystemColors.ControlText
        Me.erpEmailAddresses.SetIconAlignment(Me.lblSubject, CType(resources.GetObject("lblSubject.IconAlignment"), System.Windows.Forms.ErrorIconAlignment))
        Me.erpEmailAddresses.SetIconPadding(Me.lblSubject, CType(resources.GetObject("lblSubject.IconPadding"), Integer))
        Me.lblSubject.Image = CType(resources.GetObject("lblSubject.Image"), System.Drawing.Image)
        Me.lblSubject.ImageAlign = CType(resources.GetObject("lblSubject.ImageAlign"), System.Drawing.ContentAlignment)
        Me.lblSubject.ImageIndex = CType(resources.GetObject("lblSubject.ImageIndex"), Integer)
        Me.lblSubject.ImeMode = CType(resources.GetObject("lblSubject.ImeMode"), System.Windows.Forms.ImeMode)
        Me.lblSubject.Location = CType(resources.GetObject("lblSubject.Location"), System.Drawing.Point)
        Me.lblSubject.Name = "lblSubject"
        Me.lblSubject.RightToLeft = CType(resources.GetObject("lblSubject.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.lblSubject.Size = CType(resources.GetObject("lblSubject.Size"), System.Drawing.Size)
        Me.lblSubject.TabIndex = CType(resources.GetObject("lblSubject.TabIndex"), Integer)
        Me.lblSubject.Text = resources.GetString("lblSubject.Text")
        Me.lblSubject.TextAlign = CType(resources.GetObject("lblSubject.TextAlign"), System.Drawing.ContentAlignment)
        Me.lblSubject.Visible = CType(resources.GetObject("lblSubject.Visible"), Boolean)
        '
        'lblBody
        '
        Me.lblBody.AccessibleDescription = CType(resources.GetObject("lblBody.AccessibleDescription"), String)
        Me.lblBody.AccessibleName = CType(resources.GetObject("lblBody.AccessibleName"), String)
        Me.lblBody.Anchor = CType(resources.GetObject("lblBody.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.lblBody.AutoSize = CType(resources.GetObject("lblBody.AutoSize"), Boolean)
        Me.lblBody.BackColor = System.Drawing.SystemColors.Control
        Me.lblBody.CausesValidation = False
        Me.lblBody.Dock = CType(resources.GetObject("lblBody.Dock"), System.Windows.Forms.DockStyle)
        Me.lblBody.Enabled = CType(resources.GetObject("lblBody.Enabled"), Boolean)
        Me.erpEmailAddresses.SetError(Me.lblBody, resources.GetString("lblBody.Error"))
        Me.lblBody.Font = CType(resources.GetObject("lblBody.Font"), System.Drawing.Font)
        Me.lblBody.ForeColor = System.Drawing.SystemColors.ControlText
        Me.erpEmailAddresses.SetIconAlignment(Me.lblBody, CType(resources.GetObject("lblBody.IconAlignment"), System.Windows.Forms.ErrorIconAlignment))
        Me.erpEmailAddresses.SetIconPadding(Me.lblBody, CType(resources.GetObject("lblBody.IconPadding"), Integer))
        Me.lblBody.Image = CType(resources.GetObject("lblBody.Image"), System.Drawing.Image)
        Me.lblBody.ImageAlign = CType(resources.GetObject("lblBody.ImageAlign"), System.Drawing.ContentAlignment)
        Me.lblBody.ImageIndex = CType(resources.GetObject("lblBody.ImageIndex"), Integer)
        Me.lblBody.ImeMode = CType(resources.GetObject("lblBody.ImeMode"), System.Windows.Forms.ImeMode)
        Me.lblBody.Location = CType(resources.GetObject("lblBody.Location"), System.Drawing.Point)
        Me.lblBody.Name = "lblBody"
        Me.lblBody.RightToLeft = CType(resources.GetObject("lblBody.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.lblBody.Size = CType(resources.GetObject("lblBody.Size"), System.Drawing.Size)
        Me.lblBody.TabIndex = CType(resources.GetObject("lblBody.TabIndex"), Integer)
        Me.lblBody.Text = resources.GetString("lblBody.Text")
        Me.lblBody.TextAlign = CType(resources.GetObject("lblBody.TextAlign"), System.Drawing.ContentAlignment)
        Me.lblBody.Visible = CType(resources.GetObject("lblBody.Visible"), Boolean)
        '
        'txtTo
        '
        Me.txtTo.AccessibleDescription = CType(resources.GetObject("txtTo.AccessibleDescription"), String)
        Me.txtTo.AccessibleName = CType(resources.GetObject("txtTo.AccessibleName"), String)
        Me.txtTo.Anchor = CType(resources.GetObject("txtTo.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.txtTo.AutoSize = CType(resources.GetObject("txtTo.AutoSize"), Boolean)
        Me.txtTo.BackColor = System.Drawing.SystemColors.Window
        Me.txtTo.BackgroundImage = CType(resources.GetObject("txtTo.BackgroundImage"), System.Drawing.Image)
        Me.txtTo.Dock = CType(resources.GetObject("txtTo.Dock"), System.Windows.Forms.DockStyle)
        Me.txtTo.Enabled = CType(resources.GetObject("txtTo.Enabled"), Boolean)
        Me.erpEmailAddresses.SetError(Me.txtTo, resources.GetString("txtTo.Error"))
        Me.txtTo.Font = CType(resources.GetObject("txtTo.Font"), System.Drawing.Font)
        Me.erpEmailAddresses.SetIconAlignment(Me.txtTo, CType(resources.GetObject("txtTo.IconAlignment"), System.Windows.Forms.ErrorIconAlignment))
        Me.erpEmailAddresses.SetIconPadding(Me.txtTo, CType(resources.GetObject("txtTo.IconPadding"), Integer))
        Me.txtTo.ImeMode = CType(resources.GetObject("txtTo.ImeMode"), System.Windows.Forms.ImeMode)
        Me.txtTo.Location = CType(resources.GetObject("txtTo.Location"), System.Drawing.Point)
        Me.txtTo.MaxLength = CType(resources.GetObject("txtTo.MaxLength"), Integer)
        Me.txtTo.Multiline = CType(resources.GetObject("txtTo.Multiline"), Boolean)
        Me.txtTo.Name = "txtTo"
        Me.txtTo.PasswordChar = CType(resources.GetObject("txtTo.PasswordChar"), Char)
        Me.txtTo.RightToLeft = CType(resources.GetObject("txtTo.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.txtTo.ScrollBars = CType(resources.GetObject("txtTo.ScrollBars"), System.Windows.Forms.ScrollBars)
        Me.txtTo.Size = CType(resources.GetObject("txtTo.Size"), System.Drawing.Size)
        Me.txtTo.TabIndex = CType(resources.GetObject("txtTo.TabIndex"), Integer)
        Me.txtTo.Text = resources.GetString("txtTo.Text")
        Me.txtTo.TextAlign = CType(resources.GetObject("txtTo.TextAlign"), System.Windows.Forms.HorizontalAlignment)
        Me.txtTo.Visible = CType(resources.GetObject("txtTo.Visible"), Boolean)
        Me.txtTo.WordWrap = CType(resources.GetObject("txtTo.WordWrap"), Boolean)
        '
        'txtSubject
        '
        Me.txtSubject.AccessibleDescription = CType(resources.GetObject("txtSubject.AccessibleDescription"), String)
        Me.txtSubject.AccessibleName = CType(resources.GetObject("txtSubject.AccessibleName"), String)
        Me.txtSubject.Anchor = CType(resources.GetObject("txtSubject.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.txtSubject.AutoSize = CType(resources.GetObject("txtSubject.AutoSize"), Boolean)
        Me.txtSubject.BackColor = System.Drawing.SystemColors.Window
        Me.txtSubject.BackgroundImage = CType(resources.GetObject("txtSubject.BackgroundImage"), System.Drawing.Image)
        Me.txtSubject.CausesValidation = False
        Me.txtSubject.Dock = CType(resources.GetObject("txtSubject.Dock"), System.Windows.Forms.DockStyle)
        Me.txtSubject.Enabled = CType(resources.GetObject("txtSubject.Enabled"), Boolean)
        Me.erpEmailAddresses.SetError(Me.txtSubject, resources.GetString("txtSubject.Error"))
        Me.txtSubject.Font = CType(resources.GetObject("txtSubject.Font"), System.Drawing.Font)
        Me.erpEmailAddresses.SetIconAlignment(Me.txtSubject, CType(resources.GetObject("txtSubject.IconAlignment"), System.Windows.Forms.ErrorIconAlignment))
        Me.erpEmailAddresses.SetIconPadding(Me.txtSubject, CType(resources.GetObject("txtSubject.IconPadding"), Integer))
        Me.txtSubject.ImeMode = CType(resources.GetObject("txtSubject.ImeMode"), System.Windows.Forms.ImeMode)
        Me.txtSubject.Location = CType(resources.GetObject("txtSubject.Location"), System.Drawing.Point)
        Me.txtSubject.MaxLength = CType(resources.GetObject("txtSubject.MaxLength"), Integer)
        Me.txtSubject.Multiline = CType(resources.GetObject("txtSubject.Multiline"), Boolean)
        Me.txtSubject.Name = "txtSubject"
        Me.txtSubject.PasswordChar = CType(resources.GetObject("txtSubject.PasswordChar"), Char)
        Me.txtSubject.RightToLeft = CType(resources.GetObject("txtSubject.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.txtSubject.ScrollBars = CType(resources.GetObject("txtSubject.ScrollBars"), System.Windows.Forms.ScrollBars)
        Me.txtSubject.Size = CType(resources.GetObject("txtSubject.Size"), System.Drawing.Size)
        Me.txtSubject.TabIndex = CType(resources.GetObject("txtSubject.TabIndex"), Integer)