[Visual Basic] Private Sub dtPickerInaktivSeit_ValueChanged( _
ByVal sender As Object, _
ByVal e As EventArgs _
) Handles _
dtPickerInaktivSeit.ValueChanged
[Visual Basic] Private Sub dtPickerInaktivSeit_ValueChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles dtPickerInaktivSeit.ValueChanged
Dim s As String
Dim obj As DateTimePicker = sender
s = obj.Name
s = "txt" + s.Substring(8, s.Length - 8)
Dim l As New List(Of Control)
Dim txtb As MaskedTextBox
GetControl(Me, s, l)
For Each ctl As Control In l
txtb = CType(ctl, MaskedTextBox)
txtb.Text = obj.Value
Next
Me.txtInaktivseit_Leave(sender, e)
End Sub
Plattformen: Windows 98, Windows 2000 SP4, Windows Millennium Edition, Windows Server 2003, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP SP2, Windows XP Starter Edition