| Hjem | Hardware | Netværk | Programmering | software | Fejlfinding | systemer | 
Programmering  
  • C /C + + Programming
  • Computer Programmeringssprog
  • Delphi programmering
  • Java programmering
  • JavaScript Programmering
  • PHP /MySQL programmering
  • Perl programmering
  • Python Programming
  • Ruby Programming
  • Visual Basics Programmering
  •  
    Computer Viden >> Programmering >> Visual Basics Programmering >> Content
    Sådan tilføjes 2 Værdier i Visual Basic
    Et grundlæggende krav til enhver programmeringssprog er muligheden for at tilføje to værdier , enten numerisk værdi eller snor værdier. Microsofts Visual Basic giver begge disse kapaciteter til programmør. For numeriske værdier , kan du vælge et vilkårligt antal datatyper , herunder integer, decimal og andre , mere videnskabelige , typer . Uanset værdier, du har brug for at tilføje , bør Visual Basic kunne håndtere driften ganske nemt. Instruktioner
    Startopsætning
    1

    Start Visual Basic-program . Åbn din eksisterende projekt eller klik på " Nyt projekt ".
    2

    Rul markøren over Toolbox menuen til venstre, og dobbeltklik på to tekstbokse , en knap og en etiket . Dette tilføjer disse kontroller til formularen i Design -vinduet.
    3

    Træk kontrollerne rundt på form, indtil de er korrekt justeret på en måde , der ser organiseret og giver mening. De to tekstbokse vil holde bruger-input, etiketten vil modtage resultaterne af din kode , og knappen rent faktisk vil udføre koden .
    4

    Dobbeltklik på knappen på formularen. Kodningen vindue vil åbne , og Visual Basic editor vil placere markøren mellem en Sub Procedure overskrift og en End Sub linie. Din kode vil gå mellem disse linjer . Når du rent faktisk kører dit program , det er den kode, der vil udføre , når du klikker på knappen.
    Tilføjelse Numeriske værdier
    5

    vil tilføje numre , skal du tilføje følgende kode mellem Sub Procedure linjen og End Sub linje til at tilføje to numre : Hej

    Dim num1 , num2 , TotalNum som Integer
    p Hvis Textbox1.Text > Ingenting så
    p Hvis Textbox2.Text > Ingenting Så

    Prøv

    Num1.Focus ()

    num1 = Integer.Parse ( Textbox1.Text )

    Num2.Focus ()

    num2 = Integer.Parse ( Textbox2.Text )

    TotalNum = num1 + num2

    Label1.Text = TotalNum.ToString ()

    Fang

    MessageBox.Show ("A gyldigt tal er påkrævet" )

    End Prøv

    Else

    MessageBox.Show ( "En række kræves det andet felt " )

    Return

    Else

    MessageBox.Show ( " En række er nødvendigt i den første felt " )

    Return

    End If

    sætningen Dim erklærer tre variabler af typen Integer , og den efterfølgende kode tvinger brugeren til at indtaste numeriske værdier eller en fejlmeddelelse genereres . Hvis du klikker på knappen får koden til at udføre og analysere strengene til nummer til matematiske operationer Visual Basic. Numrene tilføjes sammen og placeres i TotalNum område, som VB derefter konverterer til en streng værdi og steder i det Label1.Text felt.
    6

    Klik på den grønne pil til debug dit projekt. Din formular skal åbne for at teste din kode .
    7

    Udfør en positiv test , som kaldes gå ned "happy sti. " Key et tal i første felt og en række i det andet felt . Klik på knappen. Du bør se resultatet vises i etiketten område.
    8

    Udfør en negativ test ved at indtaste alfabetiske tegn i den ene eller begge felter , og klikke på knappen. Du bør se en fejlmeddelelse for ethvert område , hvor du indtastet ikke-numeriske tegn.
    Tilføjelse ( concatenating ) Character Strings
    9

    Indsæt følgende kode mellem sub procedure header og End Sub sporlinje : Hej p Hvis Textbox1.Text > Ingenting Så
    p Hvis Textbox2.Text > Ingenting Så

    Label1.Text = Textbox1.Text & Textbox2.Text

    Else

    MessageBox.Show ("A strengen kræves i det andet felt" )

    Return

    Else
    < p > MessageBox.Show ("A strengen kræves i det første felt " )

    Return

    End If

    Denne kode kontrol for at sikre , at en værdi indtastes i hvert felt og derefter sammenkæder de to strenge , hvilket placerer den resulterende streng i Label1.Text område.
    10

    Klik på den grønne pil til debug dit projekt. Din formular skal åbne for at teste din kode .
    11

    Udfør en positiv test ved at indtaste en streng i det første felt, og en streng i det andet felt . Klik på knappen og koden skal tack de to strenge sammen og sætte resultatet i Label1.Text felt.
    12

    Udfør en negativ test ved at indtaste noget i den ene eller begge felter , og klikke på knappen. Du bør se en fejlmeddelelse for alle områder, hvor du ikke nøglen noget

    Forrige :

    næste :
      Relaterede artikler
    ·Sådan får Visual Basic 2008 
    ·Hvordan laver man en tekstboks i Visual Basic 
    ·Sådan eksporteres BMP'er til GIF i VB6 
    ·Hvordan du skal aflevere ComboBox 
    ·Måder at specificere Range i VBA 
    ·Sådan oprettes en Hjælp dokument i VB6 
    ·Sådan oprettes en Message Box i Visual Basic 
    ·Sådan får du adgang Query Null Argument VBA 
    ·Hvordan til at dræbe en opgave ved VBS 
    ·Sådan Fremhæv tekst i en tekstboks i VB.NET 
      Anbefalede Artikler
    ·Sådan oprettes DataGrid standardudformet Kolonner 
    ·Hvordan du få input fra skærmen I Java 
    ·Sådan Tilkald iFrame Gennem en formular 
    ·Sådan finder du den Mean Brug Perl 
    ·Skrivning og Design Video Games 
    ·Sådan Clean en Input buffer i C + + 
    ·HTML Tutorial : Hævet 
    ·PHP Layout Tutorial 
    ·Sådan tjekke e-mail -adresse format Med PHP 
    ·Hvordan til at udfylde et array i Matlab 
    Copyright © Computer Viden http://www.computerdk.com