Forum

> > Off Topic > 3 werte zu einem machen
Forums overviewOff Topic overviewLog in to reply

German 3 werte zu einem machen

11 replies
To the start Previous 1 Next To the start

old 3 werte zu einem machen

FiNEX
User Off Offline

Quote
Mein Problem bei visual basic ist dass ich aus 3 werten einen machen will im format "001002003" aber alle drei werte geben immer nur z.b. "1" an ohne die nullen, also kommt dann am schluss "123" raus und nicht "001002003". Hat vlt einer ne ahnung wie dass gehen könnte dass?

old Re: 3 werte zu einem machen

Nova
User Off Offline

Quote
Visual Basic macht es wahrscheinlich so wie jede andere Programmiersprache, aus 003 wird 3, da es beides das selbe ist. (Wobei, C(++) ist da wohl ausgeschlossen)

Speichere die Werte als String, also "003" mit Anführungszeichen.

old Re: 3 werte zu einem machen

davidsung
User Off Offline

Quote
Du nimmst einfach den string mit dem Wert 001002003 und benutzt darauf die Prozedur Remove("0"). So oder so ähnlich war das bei Visual Basic.NET.

old Re: 3 werte zu einem machen

T-REX0113
User Off Offline

Quote
ALso solange du nur die nullen wegfiltern willst hätte ich da eine Lösung

1
2
3
4
Dim zahl As String = "0010000050000003"

            zahl = Replace(zahl, "0", "")
            MsgBox(zahl)

Funktion:
Wenn du das iwo einbindest (z..b beim Klick auf einen Button) kommt eine Messagebox die die Zahl 153 anzeigt.

Was ist passiert?
Der Befehl "Replace" sucht einen bestimmten wert und ersetzt in dann durch einen anderen Wert.

in dem Beispiel also:
1
Replace(zahl, "WERT DER GESUCHT WERDEN SOLL","WERT DURCH WAS DER GESUCHTE WERT ERSETZT WERDEN SOLL")

Im falle von "" löscht er dann die nullen.

Hoffe du verstehst es. Wenn nicht einfach mal nach dem Befehl Replace suchen und informieren.

mfg

old Re: 3 werte zu einem machen

Holzchopf
Super User Off Offline

Quote
Irgendwie helft ihr ihm, genau das zu erreichen, was er nicht will

Du könntest auch einfach immer "000" vorne anhängen (dann kriegst du halt zB "00012" oder "0003") und dann einfach die 3 rechten Zeichen aus dem String kopieren. Ich kenne Visual Basic nicht, aber ich denke, es wird Funktionen àla Right oder Substring geben.

mfG

old Re: 3 werte zu einem machen

FiNEX
User Off Offline

Quote
naja iwie hilft mir dass alles nicht weiter

also vlt hilft auch dass weiter:
1
2
3
4
5
6
7
8
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim red1, green1, blue1 As Integer
        red1 = TBRed.Value
        green1 = TBGreen.Value
        blue1 = TBBlue.Value
        Form1.TextBox2.Text = "©" & red1 & "" & green1 & "" & blue1 & ""
        Me.Close()
    End Sub

TBRed: z.b. "1"
TBGreen: z.b. "2"
TBBlue: z.b. "3"

also danke schon mal im vorraus
edited 2×, last 08.07.11 09:08:24 pm

old Re: 3 werte zu einem machen

Nova
User Off Offline

Quote
Dann musst du uns genauer erklären, was genau du machen willst.
Anscheinend gibt es nämlich zwei Möglichkeiten, deine Anfrage zu verstehen.

Sehe gerade, dass du deinen Beitrag erweitert hast. Mh, ich kenne mich nicht wirklich mit Visual Basic aus, daher halte ich mich jetzt wohl besser heraus.

old Re: 3 werte zu einem machen

T-REX0113
User Off Offline

Quote
Meinst du damit das du drei werte hast

1. 001
2. 002
3. 003

Und diese Werte willst du zu einem wert zusammen machen aber ohne die nullen dran... also

123

versteh ich das richtig?

old Re: 3 werte zu einem machen

T-REX0113
User Off Offline

Quote
Achso jetzt verstehe ich das.

Dann speicher die Werte doch als String und nicht als Integer. Dann werden die nullen auch behalten.

old Re: 3 werte zu einem machen

ohaz
User Off Offline

Quote
oder beim umkonvertieren:
(jetzt mal in Pseudocode, kann kein Visual Basic Zeugs)
1
2
3
while (length(zahl) < 3) {
	zahl = "0"+zahl;
}
Das ganze muss natürlich trotzdem ein String sein

Oder: Da du das ganze eh vermutlich nur bis 255255255 haben willst (oder nicht?): Speichere das ganze als 3 Bytes. Spart jede Menge RAM und funktioniert prima
To the start Previous 1 Next To the start
Log in to replyOff Topic overviewForums overview