Het omzetten gegevenstypen in Visual Basic is een veeleisende procedure die vereist speciale codering als er geen ingebouwde functies om de conversie te bereiken . Bij datum conversie moet een functie worden gemaakt aan integer ontleden door de positie en de waarde toe scheiden . Deze functie heeft een waarde , de integer variabele , overgegaan tot het in waarde en retourneert een tekenreeksrepresentatie van de datum . Instructies 1 Verklaar een nieuwe functie onder de belangrijkste subroutine . Vergeet niet de "SUB " type module niet te gebruiken als enige functies return waarden . Kopen van 2 Verklaar de functie met een parameter genaamd " Nummer . " Dit zal worden verwezen door waarde . 3 Declare vier variabelen : een snaar en drie integers . De drie getallen worden gebruikt om de waarde van het getal dat wordt gescand bezit 4 Initialiseer elk van de drie getallen de waarden : . S.Substring ( 0,2 ) , S.Substring ( 2,2 ) en S.Substring ( 4,4 ) , deze zullen de maand, de dag en het jaar respectievelijk vertegenwoordigen . 5 Stelt het Return waarden doorbetaald aan de namen van de integer variabelen . Bijvoorbeeld , " Return Gecorrigeerd Datum ( maand, dag , jaar ) . 6 Zet elk afzonderlijk geheel getal in een string met behulp van een eenvoudige cast uitdrukking . Zo zal Cstr (maand ) de maand converteren naar een tekenreeks equivalent. Deze waarden kunnen direct worden aangeboden of gebruikt als indexen voor arrays om namen als show " december . "
|