Vaak is het noodzakelijk in Visual Basic om een basis tekenreeksrepresentatie van een datum en tijd van de gebruiker of van een bestand te lezen en omzetten van deze informatie aan de Visual Basic object Date om weer te geven in een ander formaat . Hoewel aan de oppervlakte tekst - to-date conversie lijkt simpel , is het moeilijker gemaakt door de verschillende formaten gebruikt voor data op verschillende locaties . Instructies 1 Maak een nieuw project door te klikken op " File " en " New Project . " Selecteer " Windows Forms project . " Kopen van 2 Dubbelklik op het " tekstvak " component in de " Toolbox " om deze toe te voegen aan uw project . Dubbelklik vervolgens op de " Button " component in de " Toolbox ". Het tekstvak kunt u typt in een datum , en de knop wordt geklikt om de omzetting van de tekst voor de datum in een VB- date object signaleren . 3 Dubbelklik op het knop die u hebt toegevoegd aan uw project tot een gebeurtenis click met de naam " Button1_Click . " Plak de volgende code in dat geval: Dim dateString As String = TextBox1.Text Dim vbDate als Datum Dim cultuur = System.Globalization.CultureInfo.GetCultureInfo ( " en-US " ) Dim resultaat zoals Van Boole = Date.TryParse ( dateString , cultuur , System.Globalization.DateTimeStyles.None , vbDate ) op Twitter Indien ( Niet leiden ) dan MessageBox.Show ( " Kon niet ontleden datum van " & dateString ) Else MessageBox.Show ( "Succes . date is " & vbDate.ToLongDateString ) op Twitter end If Deze zal proberen om de datum tekst ontleden volgens de culturele normen van Amerikaans Engels ( " en-US " ) . In het algemeen betekent dit dat de data wordt verwacht dat het format van de maand , dag en jaar , in plaats van de dag , maand en jaar orde in veel andere delen van de wereld volgen . Een ander geaccepteerd formaat is jaar , maand en dag , omdat dit formaat wordt veel gebruikt door computersystemen voor het gemak van het sorteren op datum . Als het de datum kan ontleden , het presenteert een bericht met een gedetailleerde beschrijving van de ontleed datum . Anders , het presenteert een foutmelding .
|