Help!

PC-Problemen?
De vrijwilligers van Oplossing.be zoeken gratis met u mee!

Hulp bij posten

Recente topics

Auteur Topic: Omzetten binair naar decimaal  (gelezen 4109 keer)

0 leden en 1 gast bekijken dit topic.

Offline Evnn

  • Nieuw lid
  • Berichten: 1
  • Oplossing.be
Omzetten binair naar decimaal
« Gepost op: 14 maart 2006, 16:37:42 »
hallo mensen
ik ben hier nieuw..!! 8)
en ik heb een vraagje  :-[

kben namelijk besig met visual basic voor school
en ik heb een opdrscht gekregen waarbij ik binair om moet zetten naar decimaal en andersom....

en we hebben 1 klein probleempje en dat is namelijk dat wanneer we een decimaal getal invullen er als uitkomst wel het binaire getal komt te staan maar er komt dan tussen elke 0 of 1 een spatie ....en die spatie geld als een 0 in het binaire getal dus wanneer je dat getal weer omzou zetten in het programma naar decimaal zou het een ander getal worden bv:

101 binair   = 5 dec
5 dec           = 1 0 1 bin
1 0 1 binair = dus ( 10001 binair) en is dus 17

dat is probleempje nummer 1.

en probleempje nummer 2
 is dat ik geen hogere getallen in kan vullen dan bv 1200 decimaal dat is te hoog en dan rekent hij niks uit...!~

kan iemand mij aub helpen want ik wil niet zakken door informatica dit jaar :D hehe :) ;D thnks jullie alvast

groetjes Eef

kijk eventueel in me bijlage ..als iemand de fout kan vinden vind ik het erg knap..
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline powerkite

  • Volledig lid
  • **
  • Berichten: 207
  • Oplossing.be
Re:Omzetten binair naar decimaal
« Reactie #1 Gepost op: 14 maart 2006, 21:01:23 »
probleem 1:
gebruik de replace-functie om de spaties te wissen
Bingetal=replace(bingetal," ","")

probleem 2:
Ik heb het bij mij getest en het werkt toch, zelfs voor waarden groter dan 1200

Ik heb dit probleem vroeger ook op een andere manier opgelost

Werkwijze:
bepaal de waarde van de laatste bit
bit = DecGetal Mod 2 'mod geeft de rest na gehele deling
DecGetal = (DecGetal - bit)/2

dit in een lus plaatsen en een bitreeks opbouwen, rekening houden met het feit dat je met de minst significante bit begint.
Win XP (pro) - Pentium - 2400Mhz - 512Mb - Hercules 9200se - ADSL - Office 2003 Pro

Offline thefox

  • Nieuw lid
  • Berichten: 1
  • Oplossing.be
Re:Omzetten binair naar decimaal
« Reactie #2 Gepost op: 07 april 2006, 22:32:35 »
Hoi Eef,

Bij een conversie van een getal naar een string zet visual basic altijd een spatie voor het getal. Door het TRIM-commando te gebruiken worden overtollige spaties voor- een achteraan de string automatisch verwijderd.

   Voorbeeld: Trim(Str(BinCijfer(T)))

Daarnaast is het belangrijk om te weten dat het gebruik van het type Integer automatisch jouw programma beperkt tot waarde met een maximum van 65535 oftewel twee bytes. Je kunt beter het type Long (4 bytes) gebruiken of misschien zelfs Decimal (14 Bytes) hoewel dat laatste misschien iets te overdreven is :).

Wim
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

 


www.combell.com