VB.NET-Quellcode
- Dim sname As String = tbName.Text
- Dim kind As String = tbCategory.Text
- With sname
- If .Contains("Ä") Then
- .Replace("Ä", "AE")
- ElseIf .Contains("ä") Then
- .Replace("ä", "ae")
- ElseIf .Contains("Ö") Then
- .Replace("Ö", "OE")
- ElseIf .Contains("ö") Then
- .Replace("ö", "oe")
- ElseIf .Contains("Ü") Then
- .Replace("Ü", "UE")
- ElseIf .Contains("ü") Then
- .Replace("ü", "ue")
- ElseIf .Contains("ß") Then
- .Replace("ß", "ss")
- ElseIf .Contains("&") Then
- .Replace("&", "and")
- End If
- End With
- With kind
- If .Contains("Ä") Then
- .Replace("Ä", "AE")
- ElseIf .Contains("ä") Then
- .Replace("ä", "ae")
- ElseIf .Contains("Ö") Then
- .Replace("Ö", "OE")
- ElseIf .Contains("ö") Then
- .Replace("ö", "oe")
- ElseIf .Contains("Ü") Then
- .Replace("Ü", "UE")
- ElseIf .Contains("ü") Then
- .Replace("ü", "ue")
- ElseIf .Contains("ß") Then
- .Replace("ß", "ss")
- ElseIf .Contains("&") Then
- .Replace("&", "and")
- End If
- End With
Ich habe das hier geschrieben. Und nachdem das Programm in der Verzweigung war und es den Buchstaben bleibt es beim "Ä"?!
Arayni.setExperience(Experience.Beginner)