Datamaskin
  | Hjem | Hardware | Nettverk | Programmering | Software | Feilsøking | Systems | 
Programmering  
  • C /C + + Programming
  • Computer Programmeringsspråk
  • Delphi Programming
  • Java Programming
  • JavaScript Programmering
  • PHP /MySQL programmering
  • Perl Programming
  • Python Programming
  • Ruby Programming
  • Visual Basics Programming
  •  
    Datamaskin >> Programmering >> Visual Basics Programming >> Content
    Hvordan bygge en datamaskin Tabell
    Du kan bygge et databord bruker den mest generelle av programmering konsepter, tabellens og nestet sløyfe . Disse begrepene kan brukes med alle programmeringsspråk . Matrisen er ofte brukt til å lagre store mengder informasjon. Den nestet løkke er i utgangspunktet to looper, en inni den andre . Selvfølgelig kan du bruke et regneark eller en database program for å lage en tabell , også. Men rekke og nestet løkke er de generelle logiske begreper som ofte brukes i programmering. Du kan bygge en enkel tabell i Visual Basic ved hjelp av en matrise og to sløyfer . Instruksjoner
    bygge en datamaskin Tabell
    en

    start Excel , åpne et nytt regneark , og hold " Alt" og " F11 " for å gå inn i Visual Basic-redigering . Velg " Insert " og " Module " og klikk på den nye modulen for å begynne å kopiere koden .
    2

    Skriv inn følgende kode .

    Sub TestArray () ' Kommentarer starter med sitat sign'Activate regneark og gå til celle A1Worksheets ( " Ark1 ") ActivateApplication.Goto Referanse: . . = regneark ( " Ark1 ") Range (" A1 ")

    'Setup en to - dimensjonal array har 5 plasser i første dimensjon og fem steder i andre dimensionDim Vis (1 til 5 , 1 til 5 ) As Integer

    "Start Ytre løkke i nestet sløyfe structureFor i = 1 To 5

    " Start indre sløyfe i nestet sløyfe structureFor a = 1 for å 5'Store en verdi i array ( for dette eksempelet , programmet bare teller og butikker ) Vis ( i, a) = ( i * 5 ) + a - 5'Put matrisen verdien i regneark slik at du kan se itActiveCell.Value = Vis ( i, a) 'Flytt ned en celle på spreadsheetActiveCell.Offset din ( rowOffset : = 1 , columnOffset : = 0 ) . Activate'end av indre loopNext aActiveCell.Offset ( rowOffset : = -5 , columnOffset : . = 1 ) Activate'end av ytre loopNext iend Sub
    3

    Merk at du har definert en to - dimensjonal array i setningen, " Dim Vis ( en til 5 , 1 til 5 ) As Integer . "
    4

    Legg merke til de nestede løkker laget med to" For ... Neste uttalelser. "
    5

    Kjør programmet ved klikk på den blå trekanten under " Run " , og klikk på den grønne "X" i øvre venstre for å gå tilbake til regnearket og vise resultatet av programmet . Gjennomgå regneark og forstå at en to - dimensjonal array som har en 5x5 strukturen har 25 oppstillingsplasser . Bekrefte at regnearket ser omtrent slik ut : en

    en 6 11 16 212 7 12 17 223 8 13 18 234 9 14 19 245 10 15 20 25

    früher :

     Weiter:
      Relatert Artike
    ·Hvordan bruke VBA for e-post i Access 
    ·Hvordan feilsøke en VBS Script 
    ·Slik konverterer Visual Basic 5.0 i Visual Basic 6.0 
    ·Visual Basic Step-by -Step 
    ·Slik hindrer du en Infinite Loop på Makro 
    ·Slik installerer Ajax i Microsoft Visual Studio 2005 
    ·Hvordan Spille av videofiler i Vb.NET 2005 
    ·Slik Send en e-post via G - Mail i Visual Basic 6 
    ·Slik konverterer en tekstboks til et heltall 
    ·Enkle måter å skrive programmer på en TI Kalkulator 
      Anbefalte artikler
    ·Hvordan bruke PHP Frameworks 
    ·Slik formaterer Fibonacci Numbers i C + + 
    ·Hvordan å skille sifrene i et nummer i Prolog 
    ·Hvordan å feilsøke Perl på Windows 
    ·Slik tilpasser et Thesis Feature 
    ·Slik kjører en SQL Script Command 
    ·Hvordan flytte en JPanel Java 
    ·Hvordan å erklære en global variabel i VBA 
    ·Slik fjerner et bilde Eiendom i Visual Basic 
    ·Forskjeller mellom High Level & Lavt nivå Programmerin…
    Copyright ©  Datamaskin  http://www.datamaskin.biz/