mirror of
https://github.com/Stone-Red-Code/docs-desktop.git
synced 2026-09-04 00:56:03 +02:00
11 lines
349 B
VB.net
11 lines
349 B
VB.net
Public Class Final
|
|
'<FinalCode>
|
|
Private Sub ButtonAddName_Click(sender As Object, e As RoutedEventArgs)
|
|
If Not String.IsNullOrWhiteSpace(txtName.Text) And Not lstNames.Items.Contains(txtName.Text) Then
|
|
lstNames.Items.Add(txtName.Text)
|
|
txtName.Clear()
|
|
End If
|
|
End Sub
|
|
'</FinalCode>
|
|
End Class
|