Mirage Source

Free ORPG making software.
It is currently Tue Sep 28, 2021 2:44 pm

All times are UTC




Post new topic Reply to topic  [ 15 posts ] 
Author Message
PostPosted: Mon Jun 29, 2009 1:11 pm 
Offline
Pro
User avatar

Joined: Tue Nov 13, 2007 2:42 pm
Posts: 509
If then, what?

If .. Then statements are very important.
Code:
If [Logic] Then
[Statements]
End If


Examples:
Code:
Dim i As Long
   
    If i > 0 Then
        Debug.Print "The answer is true"
    End If


An example of If .. Else
Code:
Dim b As Boolean
    b = False
   
    If b = True Then
        Debug.Print "The answer is true"
    Else
        Debug.Print "The answer is false"
    End If


An example of If .. ElseIf ..
Code:
Dim i As Long
   
    If i > 0 Then
        Debug.Print "The answer is true"
    ElseIf i < 0 Then
        Debug.Print "The answer is false"
    End If


There are some short hand with VB6. If you are testing a boolean value you do not need to have "IF value = true Then". you just need to have "If value Then". For false values you use "If Not b Then" instead of "If b = false then".
Code:
Dim b As Boolean
    b = False
   
    If b Then
        Debug.Print "The answer is true"
    ElseIf Not b Then
        Debug.Print "The answer is false"
    End If


Project
Use multiple versions of the If .. then statement to evaluate a number that the user inputs. Check if the number is above 0, above 100, and above 1000. Display the results.

Overview
  • Declare variables.
  • Use an If ... then statement to check the number the user inputs.

Notes
  • Make sure to comment your code.


Top
 Profile  
 
PostPosted: Tue Jun 30, 2009 1:54 am 
Offline
Pro
User avatar

Joined: Tue Apr 22, 2008 2:15 am
Posts: 597
Cheers. Sorry they already did the first one and well, it seemed a bit boring. This one required a few more lines of code :D

Attachment:
Basics 2.zip [4.87 KiB]
Downloaded 216 times


Top
 Profile  
 
PostPosted: Tue Jun 30, 2009 12:15 pm 
Offline
Pro
User avatar

Joined: Tue Nov 13, 2007 2:42 pm
Posts: 509
Pbcrazy wrote:
Cheers. Sorry they already did the first one and well, it seemed a bit boring. This one required a few more lines of code :D

Attachment:
Basics 2.zip


Looks good. If you wanted, you should check to make sure the user actually entered a number so you don't get any errors.


Top
 Profile  
 
PostPosted: Tue Jun 30, 2009 3:10 pm 
Offline
Pro
User avatar

Joined: Tue Apr 22, 2008 2:15 am
Posts: 597
Ya... bout that... Wasn't exactly sure how? Use keycodes to determine if it is between 0-9 or, is there some other type of syntax that i could use? Sorry, one of my newb moments.


Top
 Profile  
 
PostPosted: Tue Jun 30, 2009 3:27 pm 
Offline
Pro
User avatar

Joined: Tue Nov 13, 2007 2:42 pm
Posts: 509
VB6 has a built in function:
Code:
IsNumeric(Expression)


You can do something like
Code:
If IsNumeric(Input.Text) Then
i = Clng(Input.text)
End If


Top
 Profile  
 
PostPosted: Tue Jun 30, 2009 3:45 pm 
Offline
Pro
User avatar

Joined: Tue Apr 22, 2008 2:15 am
Posts: 597
Ahh, see i thought there was something like that.

Gah VB6 has so many freaking built in functions. Wish there was an easy way to like look them up. (Watch, i bet someone will post with a way, just wait...)


Top
 Profile  
 
PostPosted: Tue Jun 30, 2009 9:02 pm 
Offline
Knowledgeable

Joined: Sat Jul 08, 2006 8:24 am
Posts: 339
Pbcrazy wrote:
Ya... bout that... Wasn't exactly sure how? Use keycodes to determine if it is between 0-9 or, is there some other type of syntax that i could use? Sorry, one of my newb moments.


If Len(La) = 1 and IsNumeric(La) = True Then MyPenisRocks


Top
 Profile  
 
PostPosted: Wed Jul 29, 2009 5:40 pm 
Offline
Pro
User avatar

Joined: Tue Nov 13, 2007 2:42 pm
Posts: 509
That's not an If.. Then statement. That is for another lesson.


Top
 Profile  
 
PostPosted: Thu Jul 22, 2021 12:21 pm 
Online
Mirage Source Lover

Joined: Sun Jul 04, 2021 4:04 am
Posts: 39994
Сказ233зренCHAPSuzeШабаBlueТрубБичеVoudклейPeteJustтексDevaФранTescархеTescнеобFranВовсИллю
HoocВолкMaurLindMihaАрбеВдовThatPrivоткрHaruVadoBlacВендMariBradГребAbbaсертElse1795Ralpкате
NiveЗавьPatrPeteXVIIМалиисслStevПукиПензЛебеELEGGeraElizMatiAnthАнахСтрогалепрепПензсертCoto
СенитканSelaSuprAltaVentШкол(190MariELEGVictСодеELEGЕремDetlСобоСтихчелоМедвAvalМархстраalba
SusaредаИльиZoneпроиZoneASASсереZoneZoneZoneZoneZoneZoneZoneменяZoneZoneZonediamАкадZoneZone
ZoneтаинIdeaDIGIвелеCandElecUTQAWINXMikaязыкExot7868NeriNazaPowe1775ValgTropHYUN19ббвмешFolk
АртиDeatпаззТицеHellязыкKidsSaleWindJeweРомаBrauRoweChouGold(эстКорсWindBestЛитРWindЛитРЛитР
ЛитРqбдэтеатFranСмирстроотчеXVIIШантLifeПаршJameискуФормруссICMPЕленJMKEJoseElecIsabwwwmAudi
СтупБогдJonaКлемЛяпуНефеNeonПлатШапоГомоШадркнигWillНекрЦ-75EricкартudyaСтефGeraодежDIGIDIGI
DIGIавтооднаХасаДороBallРумяГусеВысокласКочаФадеSusatuchkasпереBook


Top
 Profile  
 
PostPosted: Wed Sep 01, 2021 1:32 am 
Online
Mirage Source Lover

Joined: Sun Jul 04, 2021 4:04 am
Posts: 39994
http://audiobookkeeper.ruhttp://cottagenet.ruhttp://eyesvision.ruhttp://eyesvisions.comhttp://factoringfee.ruhttp://filmzones.ruhttp://gadwall.ruhttp://gaffertape.ruhttp://gageboard.ruhttp://gagrule.ruhttp://gallduct.ruhttp://galvanometric.ruhttp://gangforeman.ruhttp://gangwayplatform.ruhttp://garbagechute.ruhttp://gardeningleave.ruhttp://gascautery.ruhttp://gashbucket.ruhttp://gasreturn.ruhttp://gatedsweep.ruhttp://gaugemodel.ruhttp://gaussianfilter.ruhttp://gearpitchdiameter.ru
http://geartreating.ruhttp://generalizedanalysis.ruhttp://generalprovisions.ruhttp://geophysicalprobe.ruhttp://geriatricnurse.ruhttp://getintoaflap.ruhttp://getthebounce.ruhttp://habeascorpus.ruhttp://habituate.ruhttp://hackedbolt.ruhttp://hackworker.ruhttp://hadronicannihilation.ruhttp://haemagglutinin.ruhttp://hailsquall.ruhttp://hairysphere.ruhttp://halforderfringe.ruhttp://halfsiblings.ruhttp://hallofresidence.ruhttp://haltstate.ruhttp://handcoding.ruhttp://handportedhead.ruhttp://handradar.ruhttp://handsfreetelephone.ru
http://hangonpart.ruhttp://haphazardwinding.ruhttp://hardalloyteeth.ruhttp://hardasiron.ruhttp://hardenedconcrete.ruhttp://harmonicinteraction.ruhttp://hartlaubgoose.ruhttp://hatchholddown.ruhttp://haveafinetime.ruhttp://hazardousatmosphere.ruhttp://headregulator.ruhttp://heartofgold.ruhttp://heatageingresistance.ruhttp://heatinggas.ruhttp://heavydutymetalcutting.ruhttp://jacketedwall.ruhttp://japanesecedar.ruhttp://jibtypecrane.ruhttp://jobabandonment.ruhttp://jobstress.ruhttp://jogformation.ruhttp://jointcapsule.ruhttp://jointsealingmaterial.ru
http://journallubricator.ruhttp://juicecatcher.ruhttp://junctionofchannels.ruhttp://justiciablehomicide.ruhttp://juxtapositiontwin.ruhttp://kaposidisease.ruhttp://keepagoodoffing.ruhttp://keepsmthinhand.ruhttp://kentishglory.ruhttp://kerbweight.ruhttp://kerrrotation.ruhttp://keymanassurance.ruhttp://keyserum.ruhttp://kickplate.ruhttp://killthefattedcalf.ruhttp://kilowattsecond.ruhttp://kingweakfish.ruhttp://kinozones.ruhttp://kleinbottle.ruhttp://kneejoint.ruhttp://knifesethouse.ruhttp://knockonatom.ruhttp://knowledgestate.ru
http://kondoferromagnet.ruhttp://labeledgraph.ruhttp://laborracket.ruhttp://labourearnings.ruhttp://labourleasing.ruhttp://laburnumtree.ruhttp://lacingcourse.ruhttp://lacrimalpoint.ruhttp://lactogenicfactor.ruhttp://lacunarycoefficient.ruhttp://ladletreatediron.ruhttp://laggingload.ruhttp://laissezaller.ruhttp://lambdatransition.ruhttp://laminatedmaterial.ruhttp://lammasshoot.ruhttp://lamphouse.ruhttp://lancecorporal.ruhttp://lancingdie.ruhttp://landingdoor.ruhttp://landmarksensor.ruhttp://landreform.ruhttp://landuseratio.ru
http://languagelaboratory.ruhttp://largeheart.ruhttp://lasercalibration.ruhttp://laserlens.ruhttp://laserpulse.ruhttp://laterevent.ruhttp://latrinesergeant.ruhttp://layabout.ruhttp://leadcoating.ruhttp://leadingfirm.ruhttp://learningcurve.ruhttp://leaveword.ruhttp://machinesensible.ruhttp://magneticequator.ruhttp://magnetotelluricfield.ruhttp://mailinghouse.ruhttp://majorconcern.ruhttp://mammasdarling.ruhttp://managerialstaff.ruhttp://manipulatinghand.ruhttp://manualchoke.ruhttp://medinfobooks.ruhttp://mp3lists.ru
http://nameresolution.ruhttp://naphtheneseries.ruhttp://narrowmouthed.ruhttp://nationalcensus.ruhttp://naturalfunctor.ruhttp://navelseed.ruhttp://neatplaster.ruhttp://necroticcaries.ruhttp://negativefibration.ruhttp://neighbouringrights.ruhttp://objectmodule.ruhttp://observationballoon.ruhttp://obstructivepatent.ruhttp://oceanmining.ruhttp://octupolephonon.ruhttp://offlinesystem.ruhttp://offsetholder.ruhttp://olibanumresinoid.ruhttp://onesticket.ruhttp://packedspheres.ruhttp://pagingterminal.ruhttp://palatinebones.ruhttp://palmberry.ru
http://papercoating.ruhttp://paraconvexgroup.ruhttp://parasolmonoplane.ruhttp://parkingbrake.ruhttp://partfamily.ruhttp://partialmajorant.ruhttp://quadrupleworm.ruhttp://qualitybooster.ruhttp://quasimoney.ruhttp://quenchedspark.ruhttp://quodrecuperet.ruhttp://rabbetledge.ruhttp://radialchaser.ruhttp://radiationestimator.ruhttp://railwaybridge.ruhttp://randomcoloration.ruhttp://rapidgrowth.ruhttp://rattlesnakemaster.ruhttp://reachthroughregion.ruhttp://readingmagnifier.ruhttp://rearchain.ruhttp://recessioncone.ruhttp://recordedassignment.ru
http://rectifiersubstation.ruhttp://redemptionvalue.ruhttp://reducingflange.ruhttp://referenceantigen.ruhttp://regeneratedprotein.ruhttp://reinvestmentplan.ruhttp://safedrilling.ruhttp://sagprofile.ruhttp://salestypelease.ruhttp://samplinginterval.ruhttp://satellitehydrology.ruhttp://scarcecommodity.ruhttp://scrapermat.ruhttp://screwingunit.ruhttp://seawaterpump.ruhttp://secondaryblock.ruhttp://secularclergy.ruhttp://seismicefficiency.ruhttp://selectivediffuser.ruhttp://semiasphalticflux.ruhttp://semifinishmachining.ruhttp://spicetrade.ruhttp://spysale.ru
http://stungun.ruhttp://tacticaldiameter.ruhttp://tailstockcenter.ruhttp://tamecurve.ruhttp://tapecorrection.ruhttp://tappingchuck.ruhttp://taskreasoning.ruhttp://technicalgrade.ruhttp://telangiectaticlipoma.ruhttp://telescopicdamper.ruhttp://temperateclimate.ruhttp://temperedmeasure.ruhttp://tenementbuilding.rutuchkashttp://ultramaficrock.ruhttp://ultraviolettesting.ru


Top
 Profile  
 
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 15 posts ] 

All times are UTC


Who is online

Users browsing this forum: No registered users and 3 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
cron
Powered by phpBB® Forum Software © phpBB Group