Dator
 |  Startsida |  Hårdvara |  Nätverk |  Programmering |  Programvara |  Felsökning |  System |   
Programmering
  • C /C + + -programmering
  • Computer Programspråk
  • Delphi Programmering
  • Java Programming
  • JavaScript programmering
  • PHP /MySQL Programmering
  • perl Programmering
  • python Programming
  • Ruby programmering
  • Visual Basics Programmering
  • * Dator Kunskap >> Programmering >> Visual Basics Programmering >> Content

    Hur man beräknar antal veckor mellan två datum

    Att lära sig att manipulera datum på dina program ger dig möjlighet att manipulera tidskänsliga data. Många program som förlitar sig på frakt , försäljning och även produkt marknadsföring förlitar sig på noggranna datumberäkningar . En användbar beräkning innebär att bestämma det antal dagar eller veckor mellan två datum i kalendern . Microsofts Visual Basic programmeringsverktyg har en inbyggd funktion som avgör detta för dig . Instruktioner
    1

    Launch Visual Studio. Klicka på "File ". En rullgardinsmeny visas . Klicka på " Nytt projekt . " Den " New Project " öppnas .
    2

    Klicka på " Visual Basic " och dubbelklicka sedan på " Windows Forms Application " för att skapa ett nytt Visual Basic-projekt . En ny form kommer att visas i utformningen fönstret .
    3

    Dubbelklicka på formen namnlist . En kod fönster öppnas och visar följande kod :

    " Private Sub Form1_Load ( ByVal avsändaren som System.Object , ByVal e Som System.EventArgs ) Handtag MyBase.Load
    Sub

    End "

    4

    Lägg till följande kod innan " End Sub " uttalande :

    Dim date1Year As Long

    Dim date1Month As Integer

    Dim date1Day Som integer

    Dim date2Year As Long

    Dim date2Month As Integer

    Dim date2Day As Integer

    Dim dayCount As Integer

    Dim weekCount Som decimal

    " Set date1 och datum2 värden under

    date1Year = 2000 Review

    date1Month = 1

    date1Day = 1

    date2Year = 2009

    date2Month = 2 Review

    date2Day = 2 Review

    "Bestäm antalet dagar mellan två datum

    Dim date1 Som New System.DateTime ( date1Year , date1Month , date1Day ) katalog

    Dim date2 Som New System.DateTime ( date2Year , date2Month , date2Day ) katalog

    dayCount = date2.Subtract ( date1 ) . dagar

    weekCount = dayCount /7

    MessageBox.Show ( weekCount.ToString ( ) )
    5

    Lokalisera den kommentar som har följande etikett:

    " Set date1 och datum2 värdena nedan . "

    sex rader kod som följer den kommentaren låter dig ställa in din date1 och datum2 värden . I detta exempel är date1Year 2000 , är date1Month 1 och date1Day är 1 . Det motsvarar den 1 januari 2000. Den date2Year är 2009 , är date2Month 2 och date2Day är 2 . Som översätter -2 februari , 2009.

    När den här koden körs , beräknar det antal veckor mellan datum1 och datum 2 och lagrar värdet i variabeln " weekCount . " Den slutliga MessageBox.Show uttalande öppnas ett pop - up fönster och visar resultatet .
    6

    Tryck på " F5 " tangenten för att driva projektet . Den pop - up fönster visar antalet veckor mellan de två datumen . I detta exempel är det värdet 474,28 .

    Tidigare:

    nästa:
    relaterade artiklar
    ·Hur man skickar text till Kommandotolken VB
    ·Hur ändra storlek på bilder i Visual Basic
    ·Hur Pinga en server från VB6
    ·Hur du ändrar det aktiva fönstret i Visual Basic
    ·Hur man beräknar bankdagar i Visual Basic
    ·Hur Extrahera grafik från en URL med VBA
    ·Hur man skapar ett e-postprogram
    ·Hur man tilldela snabbtangenter till en textruta i Visu…
    ·Hur man går från Ant till Maven
    ·Vad är WordPerfect Makron
    Utvalda artiklarna
    ·Hur man skickar en förfrågan till en proxyserver i Py…
    ·Hur man skapar två kolumner Använda Div
    ·Hur man testar i en lista i Python
    ·Hur man använder en Motorola RAZR2 Som en webbkamera
    ·Konvertera XLS till PHP
    ·Hur man använder Konvertera funktion för datumformat
    ·Hur man sätter in en auto - Numeric knapp i PHP
    ·Lägga till Windows Media Players Control i VB6
    ·Hur man tar bort de XML- taggar från en XML- fil i VB6…
    ·Hur man gör hjärtan på en bärbar dator
    Copyright © Dator Kunskap http://www.dator.xyz