Moin moin zusammen
Ich habe hier ein Problem mit "ListOf" und deren Anzeige in einer Textbox / Label.
Habe mir nun den Kopf zerbrochen, wie ich die erste ListOf in einer Textbox so darstellen kann, das man mit den Werten etwas anfangen kann. Bei einigen Werten aus der ersten ListOf ist das noch kein Problem aber bei solchen Werten " 0.8, 0.6 usw " 1/1.3, 1/1.6 " wird das echt eine Katastrophe.
Um nun dem Dilemma mit der nicht funktionierenden Konvertierung von Double usw zu entkommen, habe ich die zweite ListOf(String..) generiert und lasse dann halt beide gleichzeitig abfragen.
Nun meine Frage: Geht das alles nicht auch irgendwie mit nur einer ListOf
Spoiler anzeigen
Ich habe hier ein Problem mit "ListOf" und deren Anzeige in einer Textbox / Label.
Habe mir nun den Kopf zerbrochen, wie ich die erste ListOf in einer Textbox so darstellen kann, das man mit den Werten etwas anfangen kann. Bei einigen Werten aus der ersten ListOf ist das noch kein Problem aber bei solchen Werten " 0.8, 0.6 usw " 1/1.3, 1/1.6 " wird das echt eine Katastrophe.
Um nun dem Dilemma mit der nicht funktionierenden Konvertierung von Double usw zu entkommen, habe ich die zweite ListOf(String..) generiert und lasse dann halt beide gleichzeitig abfragen.
Nun meine Frage: Geht das alles nicht auch irgendwie mit nur einer ListOf
In der Class: (Auszug)
Auf dem Form:(Auzug)
In der Class: (Auszug)
VB.NET-Quellcode
-
- Public Class ListOfReihen
- Friend CurrentShutterIndex As Integer = 0
- Friend CurrentShutterValues As List(Of Double)
- Friend CurrentShutterValuesString As List(Of String)
- '' fürs berechnen und anzeige im Label (label kommt später weg)
- Friend ShutterValuesThird As List(Of Double) = New List(Of Double) From {30, 25, 20, 15, 13, 10, 8, 6, 5, 4, 3, 2.5, 2, 1.6, 1.3, 1, 0.8, 0.6, 0.5, 0.4, 0.3, 1 / 4, 1 / 5,.....}
- '' für die Anzeige in der Textbox
- Friend ShutterValuesThirdStrings As List(Of String) = New List(Of String) From {"30", "25", "20", "15", "13", "10", "8", "6", "5", "4", "3", "2.5", "2", "1.6", "1.3", "1", "1/1.3", "1/1.6", "1/2", "1/2.5", .....}
Auf dem Form:(Auzug)
VB.NET-Quellcode
-
- Private Sub btnShutterDown_Click(sender As Object, e As EventArgs) Handles btnShutterDown.Click
- If _listofReihen.CurrentShutterIndex > 0 Then
- _listofReihen.CurrentShutterIndex -= 1
- UpdateShutterTextBox()
- End If
- End Sub
- Private Sub btnShutterUp_Click(sender As Object, e As EventArgs) Handles btnShutterUp.Click
- If _listofReihen.CurrentShutterIndex < _listofReihen.CurrentShutterValues.Count - 1 Then
- _listofReihen.CurrentShutterIndex += 1
- UpdateShutterTextBox()
- End If
- End Sub
- Private Sub UpdateShutterTextBox()
- '' lesbare Anzeige
- txtShutter.Text = _listofReihen.CurrentShutterValuesString(_listofReihen.CurrentShutterIndex).ToString()
- '' mathematische Anzeige schon gerundet
- lblShutter.Text = _listofReihen.CurrentShutterValues(_listofReihen.CurrentShutterIndex).ToString("0.000000 Sekunden")
- End Sub
Asperger Autistin. Brauche immer etwas um gewisse Sachen zu verstehen.