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 Beregn lang avstand telefon avgifter fra en CSV-fil
    Å vite hvordan man skal lagre informasjon i en karakter separerte verdier ( CSV ​​) -fil og bruke den til å beregne lang avstand telefon avgifter som bruker Visual Basic.NET kan spare deg for tid . En CSV -fil kan bli laget med Microsoft Office Excel . Excel er et regnearkprogram som vanligvis brukes til å lagre og analysere store mengder data . VB.NET er et programmeringsspråk som brukes til å utvikle Windows-applikasjoner . VB.NET er relativt lett å lære og bruke. Du trenger
    Microsoft Office Excel
    Microsoft Visual Basic Express
    Vis flere instruksjoner
    en

    start Microsoft Office Excel og skriv inn følgende :
    < p> I " A1 , " type "Land"

    " A2 , " type " Mexico "

    " A3 , " type " Canada "

    "A4 , "type" Brazil "

    " B1 , "type " Rate /Min "

    " B2 , "type " 2,5 "

    " B3 , "type " 5.5 "

    " B4 , " type " 4.2"
    2

    Trykk " Ctrl" og " S" for å åpne " Lagre som"-dialogboksen . Velg " C: \\" ved siden av " Lagre i." Ved siden av " File Name ", type " longDistanceCharges " og velg " CSV ( MS - DOS ) ( * . Csv )" ved siden av " Lagre som type." Klikk på " Lagre".
    3

    Start " Microsoft Visual Basic Express ", velg "File "-menyen og klikk på "New Project ". Klikk på "Windows Forms Application " under " Visual Studio Installerte maler " og velg " OK ".
    4

    Trykk " Ctrl " pluss " Alt" pluss "X" for å åpne " Toolbox ". Dobbeltklikk på " Button " under " Common Controls " for å legge til en ny knapp " Form1 . " Dobbeltklikk på " Text Box " for å legge en ny tekstboks i skjemaet.
    5

    Klikk på " Project" og velg " Add Reference ". Klikk " COM ", velg " Microsoft Excel ( versjonsnummer ) Object Library " og klikk " OK ".
    6

    Dobbeltklikk på " Button1 " for å åpne " Form1.vb " modulen. Trykk "Ctrl " pluss " A " og deretter " Slett " for å fjerne all eksisterende kode
    7

    Kopier og lim inn følgende kode inn i din " Form1.vb " modul: .

    import Excel = Microsoft.Office.Interop.Excel

    Private Sub button1_click ( ByVal avsenderen som System.Object , ByVal e Som System.EventArgs ) Håndtak Button1.Click

    Dim XLApp Som Excel.Application

    Dim XLWkBook Som Excel.Workbook

    Dim XLWkSheet Som Excel.Worksheet

    Dim landet ( 10 ) Som String

    Dim priser ( 10 ) As Double

    Dim ratesStr As String

    Dim min As Integer

    Dim totalAmount Som Double

    min = Me.TextBox1.Text

    XLApp = Ny Microsoft.Office.Interop.Excel.Application

    XLWkBook = XLApp.Workbooks.Open ( "C : \\ longDistanceCharges.csv ")

    XLWkSheet = XLWkBook.Worksheets ( " longDistanceCharges ")

    landet ( 1 ) = XLWkSheet.Cells ( 2 , 1 ) . verdi

    land ( 2 ) = XLWkSheet.Cells ( 3 , 1 ) . verdi

    landet ( 3 ) = XLWkSheet.Cells ( 4 , 1 ) . verdi

    ratesStr = XLWkSheet.Cells ( 1 , 2 ) . verdi

    priser ( 5 ) = XLWkSheet.Cells ( 2 , 2 ) . verdi

    priser ( 6 ) = XLWkSheet.Cells ( 3 , 2 ) . verdi

    priser ( 7 ) = XLWkSheet.Cells ( 4 , 2 ) . verdi

    totalAmount = min * priser ( 5 )

    MsgBox ( "Total kostnad for" & country ( 1 ) & " : $ " & totalAmount )

    totalAmount = min * priser ( 6 )

    MsgBox ( "Total kostnad for" & country ( 2 ) & " : $ " & totalAmount )

    totalAmount = min * priser ( 7 )

    MsgBox ( "Total kostnad for "& country ( 3 ) &" : $ "& totalAmount )

    XLWkBook.Close ( )

    XLApp.Quit ( )

    End Sub

    End Class

    koden vil beregne takster basert på verdiene i CSV-filen du opprettet. Resultatene for hvert land vil bli vist gjennom en meldingsboks.
    8

    Trykk " F5 " for å kjøre programmet , deretter inn antall minutter i tekstboksen . Klikk " Button1 " for å beregne resultatene ved hjelp av CSV -filen.

    früher :

     Weiter:
      Relatert Artike
    ·Hvordan få tilgang til en VBA e-postvedlegg 
    ·Hvordan bruke IndexOf i VB.NET 
    ·Visual Basic Standards 
    ·Hvordan lage en Datasett Fra Gridview 
    ·Hvordan Tid VBA -funksjoner 
    ·Hvordan lage menyer og undermenyer 
    ·Slik konverterer Long til heltall i Visual Basic 
    ·Hvordan å lære VB Script Online 
    ·Hvordan sette markøren Standard Syntax i Visual Basic 
    ·Hvordan bruke tekstboks i Visual Basic 6.0 
      Anbefalte artikler
    ·Hvordan stopper jeg en person fra å komme til huset mi…
    ·Hvordan bruke GUIDer som primær Key 
    ·Java Applets Tutorial 
    ·Hvordan bruke en SQL Query for å få tilgang til Datab…
    ·Hvordan gjøre ENUM i PhpMyAdmin 
    ·Hvordan legge til en kolonne til ListBox i VBA 
    ·En PHP Verv en venn Tutorial 
    ·Hvordan legge til en ny metode i NetBeans 
    ·Hvordan lage en aritmetisk erklæringen i Java 
    ·Scion hjulmomentene Specs 
    Copyright ©  Datamaskin  http://www.datamaskin.biz/