NumericUpDown probleempje

[old Hippy]

Hallo Allemaal

Mijn Probleem!

Ik heb twee NumericUpDown boxen.
Als NumericUpDown1.value = 5 is moet NumericUpDown2.value het opgegeven value (b.v.b 97) zijn.
Het getal van NumericUpDown2 kan variëren.
Wordt NumericUpDown1. value = 4 dan moet NumericUpDown2.value = met 2 worden verlaagd.
Dus moet NumericUpDown2.value = 95

Het doel is dus dat het opgegeven value van NumericUpDown2 met 2 word verlaagt.
Hopelijk is het duidelijk!
Heeft iemand een idee hoe dit op te lossen???

Groet Old Hippy

 

[tim687]

ja dat is niet zo moeilijk, je moet alleen wel altijd weten dat numupdo1 een getal is als je bijv. Hoi - 2 doet dan klopt het niet. Dit is de code, die moet je bij de textchange event zetten van de textbox:

NumericUpDown2.value = NumericUpDown1.value - 2

laat het even weten als je nog vragen hebt!
Suc6,
Tim

 

[old Hippy]

Hi Tim dank voor de reactie
Dat werkt niet zet de numm2 op 0
Dit is de code die bij mij werkt maar soms is NumericUpDown2= 101
Dus variabel

If CB_Koers_stand.Checked = False Then
            If NumericUpDown1.Value = 5 Then
                NumericUpDown2= 97
            ElseIf NumericUpDown1.Value = 4 Then
                NumericUpDown2.Value = 95
            End If
        Else
            GoTo handmatig
        End If
handmatig:

 

[tim687]

kan het alleen met die 2 getallen (97 en 4)?
is het een textbox? als het een textbox is moet je ipv value, text gebruiken

 

[old Hippy]

Hi tim687
Even nadere uitleg

ik haal van internet gegevens binnen van aandelen.
dit is per aandeel verschillend, bij KPN vb. tussen de 97 of 95 maar bij AEX tussen 105 en 103
Deze instellingen worden in het progje opgeslagen en alle gegevens worden weer teruggezet door een klik op de listview.

Ik filter de koers er met VisualBasic.Mid uit via de NumericUpDown's.
als de koers is negatief dan staat er b.v koers-down.gif en is de koers positief dan staar er koers-up.gif dus twee karakters minder.
dit paste ik altijd aan handmatig, dit wil ik nu automatisch laten gebeuren.
Zo als je in de code kan zien zal NumericUpDown2= 97 variabel moeten zijn en de ingestelde waarde hebben van het gekozen aandeel .
Hopelijk is het nu duidelijker

Groet Old Hippy

 

[tim687]

ooh nu snap ik het, je wilt het zo doen dat als de nieuwe waarde lager is als de oude dat hij verlies aangeeft
en als de nieuwe waarde hoger is als de oude dat hij winst aan geeft.
Dus je wilt in 1 van de dingen aangeven wat het verschil is?

 

[old Hippy]

No ik wil dat als ik KPN kies de waarde 97 is en als ik AEX kies de waarde 105 is en als ik een andere kies het de bij behorende waarde krijgt in NumericUpDown2.value
.

 

[tim687]

misschien een domme vraag maar hoe moet je nu die 3de waarde weten

 

[old Hippy]

op het moment dat ik een aandeel koop word deze hand matig ingesteld.

 

[tim687]

aah oke
misschien is het makkelijker om het te tekenen, ik snap het niet helemaal

 

[old Hippy]

OK afbeelding.

zo als je kan zien dat als de Down in up veranderd er dus in plaats van 2,85 er d>2.8 komt te staan.
en bij positie koers links de waarde 95 moet worden.
Let op de updown met het getal 5 wijzigt vanzelf in 4 of 5
waar mee ik dus de waarde wil aanpassen

 

[tim687]

dus je wilt de code zo hebben dat als de waarde 5 wijzigt dat de 2.85 of 2.8 veranderd?

 

[old Hippy]

ja dat de waarde (d>2,) moet 2.85 het bedrag heeft 4 posities elk karakter is een positie zo als je op de foto kan zien filter ik er links en rechts het bedrag uit wat ik wil zien.

op de afbeelding staat <td>2,859 als ik tweeposities opschuif naar links staat er d>2, dus als ik dan de positie verhoog met 2 staat er weer 2,85


Als positie links procenten = 4 dan
Positie koers links = 95 (dit getal is per aandeel anders)
Als positie links procenten = 5 dan
Positie koers links met 2 verhogen (97).

 

[tim687]

dat is niet zo moeilijk
in een timer zetten

if positielinksprocententext = 4 then
positiekoerslinks.text = aandeelwaarde
elseif positiekoerslinksprocenten.text = 5 then
positiekoerslinks = positiekoerslinks + 2
end if

 

[old Hippy]

Sorry maar wat zie jij als aandeelwaarde de 2,85 ????
zo als je het voorstelt wordt aandeelwaarde positiekoerslinks = positiekoerslinks + 2 (dus 2,87 ) inplaats van 95

Je denk fout zit in de aandeel waarde die kan niet aangepast worden die komt van internet.
die moet worden aangepast door de positie te verschuiven.
Het staat in een timer dus in je voorstel zal het aandeel waarde per sec optellen.

Ps ik was al aan het zoeken in de richting van if Not isnummeric(TB_Koers.text ) then

 

[tim687]

ooh op die manier, dat is wat moeilijker te zeggen zo

 

[old Hippy]

Ja maar je bracht me wel op een Idee.
En heb het als volgt opgelost

 If CB_Koers_stand.Checked = False Then

            Dim koerspositie As Integer
            koerspositie = Int(TextBox1.Text)
            If INP_PO_L_procent.Value = 4 Then
                INP_Pos_Koers_L.Value = koerspositie
            ElseIf INP_PO_L_procent.Value = 5 Then
                INP_Pos_Koers_L.Value = koerspositie + 2
            End If

        End If

er een textBox bij gezet die word gevuld uit de listview gegevens

 

[tim687]

Zou je kunnen doen als dat werkt! Ik ben wel benieuwd naar het programmatje zelf. Waar kan ik dat vinden?

 

[old Hippy]

Hi is een eigenbaksel wat mij helpt mij strategie te bepalen is nog niet helemaal klaar.
Als je het wil hebben wil ik het wel uploadde ergens.