Heips!
Kertokaas tyhmälle, miten vb2008:lla saa muutettua numerot heksakoodeiksi? kyseessä olisi tapaus, jossa käyttäjän antama luku muutetaan heksoiksi ja näytetään käyttäjälle tulos
Kiitos
Funktio Hex muuttaa luvun heksamuotoon:
Dim luku As Integer Dim heksa As String luku = 123 heksa = Hex(luku) MsgBox(heksa)
kiitosta!
seuraava probleema näyttää tältä:
"Asiakastunnus muodostuu 6 numerosta + tarkistusmerkistä. Tarkistusmerkki määräytyy siten, että varsinainen asiakasnumero muunnetaan heksadesimaaliluvuksi, ja tarkistusmerkki on saadun heksaluvun viimeinen merkki (numero tai kirjain)."
Niin, mikä tuossa on probleema? Oletan että kaipaat jotain neuvoa.
Harvinaisen kämäinen tarkistusmenetelmä muuten, kun ensimmäiset 2 numeroa asiakasnumerosta ei vaikuta tarkistusmerkkiin mitenkään. Kolmannessakin riittää kun parittomuus/parillisuus on oikein, jne.
Right() -funktio palauttaa halutun määrän merkkejä oikealta. Myös Substringiä voisi käyttää.
Toinen lähetymistapa olisi Hex(Luku And 15)
no,koulutehtävä kyseessä...että en itse tällaista kyllä keksisi..
en vaan pääse eteenpäin kun tämä asiakastunnuksen luominen-kohta jarruttaa
Joo, no anna ihmeessä palautetta tehtävän laatijalle. Tuohan on jo melkein rikollista opettaa idioottimaisuuksia :D
Tai ehkä tuossa onkin tarkoitus opettaa "kantapään kautta"... Eli seuraavalla kerralla "vahingossa" huomataan tarkistussysteemin puutteet ja siirrytään käyttämään jakajana alkulukua.
Joo mahdollisesti tällainen ajatus on takana..
Aihe on jo aika vanha, joten et voi enää vastata siihen.