Miten visual basic voi vertailla merkkijonoja esim. 0102030405 ja 0203040509..
Oisko jelppaajia?
Visual basic onkelma
Jasu__
4
797
Vastaukset
- ....
Esimerkiksi näin voit vertailla luku merkkijonoja.
Voit myös muuttaa merkkkijonon kokonaisluvuksi str$() komennolla ja vertailla niitä.
Tuossa tulostetaan edit boksiin kumpi on suurempi
vai yhtäsuuret.
Private Sub Form_Load()
A$ = "0102030405"
B$ = "0203040509"
If A$ = B$ Then Text1.Text = "Yhtäsuuri"
If A$ > B$ Then Text1.Text = "A$ suurempi"
If A$ < B$ Then Text1.Text = "B$ suurempi"
A = Str$(A$): Rem täss A$ muutetaan kokonais luvuksi a
B = Str$(B$): Rem täss B$ muutetaan kokonais luvuksi b
End Sub- YksiJaAinoaM
Miten tuohon saadaan että liitettyä se kohta että se vertailu tapahtuu tiedostosta. ???'
Eli vertailaan tiedostossa olevia tuollaisia merkkijonoja. esimerkiksi c:\merkkijono.txt
Ei voi muistaa kaikkea. - puh
YksiJaAinoaM kirjoitti:
Miten tuohon saadaan että liitettyä se kohta että se vertailu tapahtuu tiedostosta. ???'
Eli vertailaan tiedostossa olevia tuollaisia merkkijonoja. esimerkiksi c:\merkkijono.txt
Ei voi muistaa kaikkea.tarkoitat varmaankin että olet laiska ja etkä VIITSI tarkistaa asiaa. Tai sit vaan oot taidoton noppa.
- näin??
puh kirjoitti:
tarkoitat varmaankin että olet laiska ja etkä VIITSI tarkistaa asiaa. Tai sit vaan oot taidoton noppa.
Open [tiedosto] for Input as #1
Dim Rivi1 as integer, Rivi2 as integer
line input #1, Rivi1
line input #1, Rivi2
close
If Rivi1=Rivi2 then 'Jos yhtäsuuria
'Koodia
end if
If Rivi1 < Rivi2 then 'jos rivi1 pienempi kuin rivi2
'koodia
End if
If Rivi1 Z Rivi2 then 'jos rivi1 suurempi kuin rivi2
'koodia
End if
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Lindtman I vasemmistohallitus aloittaa viimein Suomen kuntoon laittamisen
Tässä nyt on 3 vuotta seurattu irvokasta kärsimysnäytelmää nimeltään "valtion budjetin tasapainotus by äärioikeisto", ja2162886Missä viipyy persujen lupaama euron bensa?
En edes muista milloin bensapumpussa olisi ollut ykkösellä alkava litrahinta. Missä siis viipyy persujen lupaama euron b1702539Kirje, PellePelottomalle.
Tärkeää olisi luoda ystävyys, että se, jota rakastaa, on samalla paras ystävä ja luotettavin, jolle voi ja uskaltaa luot1061182Voi teitä naisia
Suudeltiin ja nukuttiin toisissamme kiinni mutta pillua ei tullu, ei edes aamulla. t.38vmies1321072Lapsien pakko kasteesta on luovuttava.
Eikö olisi parempi siirtää kaste rituaali rippikouluun,kun 15v.tietävät jo itse haluaavatko tulla kastetuksi juutalais-k5831035- 681028
Martinan hevoset.
Tämä todella kaunis ja ketterä harmaa hevonen jolla monet kilpailut voitetaan ei ole Martinan.Tytär ratsastaa sillä tait274978Persut jakavat tekoälyllä tehtyjä kuvia maahanmuuttajista somessa
Eivät mainitse, että ovat tekoälyllä tehtyjä. Eivät näe asiassa mitään ongelmaa. Valehtelijapuolue taas vauhdissa. Unka323946Mistä löytyy naisseuraa sinkkumiehelle?
Kertokaapas kokeneemmat mistä löytyis naisseuraa sinkulle. Ihan ois eukko nyt tosissaan hakusessa. Tanssipaikat kun on a20919Hyvä meininki
TTP:ssa väkeä tosi runsaasti paikalla. Hyvää ruokaa jälleen ja munkit ja sima erinomaista. Kiitos yrittäjälle! Hieno Vap22778