Visual basic onkelma

Jasu__

Miten visual basic voi vertailla merkkijonoja esim. 0102030405 ja 0203040509..

Oisko jelppaajia?

4

806

    Vastaukset 4

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • ....

      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

    1. Olen tumma ja tulinen

      Ja vielä suora - en ollut sinua varten. n to m
      Ikävä
      116
      709
    2. Mitä kysyisit

      Mihin haluaisit vastauksen häneltä eli mitä kysyisit?
      Ikävä
      77
      673
    3. Tunnustuksia

      Haluatko tunnustaa jotain, mitä on sydämelläsi?
      Ikävä
      48
      638
    4. Sä et vaan töllö tajua että rakastuin

      Mikä stana siinä on niin vaikea ymmärtää?! Täh
      Ikävä
      46
      563
    5. Mitä luulet

      Mitä luulet kaivattusi ajattelevan sonusta? Onko jotain mitä haluaisit oikaista hänelle?
      Ikävä
      39
      556
    6. Kerro jokin

      👻 tarina
      Ikävä
      60
      542
    7. Vielä hyvinvointitalosta

      Suurin osa pyhäjärvisistä on sivistynyttä fiksua porukkaa ja on täysin hankkeen kannalla. Nyt vain pieni äänekäs joukko
      Pyhäjärvi
      71
      516
    8. Luule ja ajattele minusta

      mitä tykkäät nainen, olet ajat sitten antanut itsestäsi ihan omanlaisen kuvan.. 😅
      Ikävä
      44
      507
    9. Rakastan sua mies joka päivä vähän enemmän

      Ei uskois 😉
      Ikävä
      26
      461
    10. Vaikea luottaa täysin

      Kun et oikeasti kerro mitään. Kaikki niin ympäripyöreää ja epämääräistä.
      Ikävä
      52
      444
    Aihe