Miten visual basic voi vertailla merkkijonoja esim. 0102030405 ja 0203040509..
Oisko jelppaajia?
Oisko jelppaajia?
Visual basic onkelma
Jasu__
4806
0Äänestä
Muut lukivat myös
Odottaa vastausta
Näihin keskusteluihin ei ole vielä vastattu. Ole ensimmäinen.
Vastaukset 4
Vanhimmat
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
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.
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