' in der Region
CType(Me.DataSet11, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.Timer1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.Timer1 = New System.Timers.Timer()
        'Timer1
        '
        Me.Timer1.AutoReset = False
        Me.Timer1.Interval = 1000
        CType(Me.DataSet11, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.Timer1, System.ComponentModel.ISupportInitialize).EndInit()   
'------------------------------------------------------------------------------
' ------------------------
 
 Private Sub Timer1_Elapsed(ByVal sender As System.Object, ByVal e As _
   System.Timers.ElapsedEventArgs) Handles Timer1.Elapsed
        TextBox1.Text = "TEST"
 
    End Sub