Visual basic onkelma

Jasu__

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

Oisko jelppaajia?

4

764

    Vastaukset

    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. Tukalaa kuumuutta

      Tietäisitpä vaan kuinka kuumana olen käynyt viime päivät. Eikä johdu helteestä, vaan sinusta. Mitäköhän taikoja olet teh
      Ikävä
      43
      3007
    2. Ensi kesänä

      Näin kesän viimeisenä minuutteina ajattelen sinua. Olisiko seuraava kesä "meidän" kesä? Tänä vuonna ei onnistuttu, mutta
      Ikävä
      61
      2961
    3. Sinä, ihastukseni

      Mitä haluaisit tehdä kanssani ensimmäisenä?
      Ihastuminen
      42
      2367
    4. Tiedät ettei tule toimimaan.

      Mielenterveys ei kummallakaan kestä.
      Ikävä
      31
      1863
    5. Okei, myönnetään,

      Oisit sä saanut ottaa ne housutkin pois, mutta ehkä joskus jossain toisaalla. 😘
      Ikävä
      25
      1719
    6. Anne Kukkohovin karmeat velat ovat Suomessa.

      Lähtikö se siksi pois Suomesta ? Et on noin kar? mean suuret velat naisella olemassa
      Kotimaiset julkkisjuorut
      72
      1674
    7. Onko kaivatullasi

      himmeä kuuppa?
      Ikävä
      48
      1586
    8. Mihin hävisi

      Mihin hävisi asiallinen keskustelu tositapahtumista, vai pitikö jonkin Hannulle kateellisen näyttää typeryytensä
      Iisalmi
      77
      1275
    9. On jo heinäkuun viimeinen päivä.

      En taida nähdä sinua koskaan.
      Rakkaus ja rakastaminen
      37
      1247
    10. Lähtikö korvat

      puhtaaksi vaikusta?
      Tuusniemi
      79
      1070
    Aihe