mirror of
https://github.com/Stone-Red-Code/docs-desktop.git
synced 2026-09-04 09:06:04 +02:00
10 lines
321 B
VB.net
10 lines
321 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)
|
|
End If
|
|
End Sub
|
|
'</FinalCode>
|
|
End Class
|