control/EditNotifyTextBox.Designer.vb

这里只显示每个文件的开头 60 行。登录后可以解锁完整代码。

微信扫码关注公众号，代码整理好后第一时间通知你。

<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class EditNotifyTextBox
    Inherits System.Windows.Forms.TextBox

    'UserControl 重写释放以清理组件列表。
    <System.Diagnostics.DebuggerNonUserCode()>
    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
        Try
            If disposing AndAlso components IsNot Nothing Then
                components.Dispose()
            End If
        Finally
            MyBase.Dispose(disposing)
        End Try
    End Sub

    '发布事件的类变量
    Private m_form As String '记录所在窗体名称
    Private m_Broker As ClsBroker
    '记录控件原值 - 即改变前的值 
    Private m_OldText As String

    'Windows 窗体设计器所必需的
    Private components As System.ComponentModel.IContainer

    Public Sub New()

        ' 此调用是设计器所必需的。
        InitializeComponent()

        ' 在 InitializeComponent() 调用之后添加任何初始化。

        '初始化发布事件的对象
        m_Broker = New ClsBroker()

    End Sub

    '注意: 以下过程是 Windows 窗体设计器所必需的
    '可以使用 Windows 窗体设计器修改它。  
    '不要使用代码编辑器修改它。
    <System.Diagnostics.DebuggerStepThrough()>
    Private Sub InitializeComponent()
        Me.SuspendLayout()
        '
        'EditNotifyTextBox
        '
        'Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!)
        'Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.Name = "EditNotifyTextBox"
        Me.ResumeLayout(False)

        '

    End Sub


    Private Sub EditNotifyTextBox_TextChanged(sender As Object, e As EventArgs) Handles Me.TextChanged
        '当事件发生改变时
        If String.IsNullOrEmpty(m_OldText) Or String.Compare(Me.Text, m_OldText) = 0 Then
            m_OldText = Me.Text