Visual Basic 2005 ( VB 2005 ) var en del av Visual Studio 2005 , Microsofts Integrated Development Environment ( IDE ) for å utvikle programmer for NET Framework involvert i Windows, web , mobil og . office-programmer . VB 2005 også ble utgitt som en gratis frittstående program , kalt Visual Basic 2005 Express Edition. VB 2005 beholdt mange av funksjonene til Visual Basic 6 . VB 2008 erstattet VB 2005 og er tilgjengelig som en gratis Express utgave samt å være en del av Visual Studio 2008 . Instruksjoner
en

Åpne et nytt prosjekt i VB 2005 , av " Windows Form Application " type , og tilordne den en lett-å - huske navn som " Date Conversion. "
2

Bruk musen til å plassere markøren over " Toolbox" til venstre for skjema på skjermen hvis Toolbox er ikke fullt synlig. Dobbeltklikk på Label verktøyet for å legge det til i skjemaet, og deretter gjøre dette igjen for å legge til en ny etikett. Gjenta denne prosessen for å legge til en tekstboks og en to knapper . Kontrollene vil bli navngitt Label1 , Label2 , Button1 og Button2 . Det skal ikke være noen navn synlig i tekstboksen .
3

Klikk og dra tekstboksen slik at den er til høyre for den første Label og nivå med det. Flytt andre Etikett under den første Label og den første knappen under det. Skift den andre knappen til høyre for den første Button mot bunnen av skjemaet.
4

Endre synlige teksten i etiketter og knapper ved å klikke på hver etter tur og skanning ned "Egenskaper" boksen til høyre til "Text ". Endre Label1 tekst til "Enter dato for å konvertere " og slette teksten eiendom Label2 . Endre teksten i Button1 å lese, "Konverter" og Button2 å vise "Exit" . (Advarsel : . I Egenskaper bokser , ikke anførselstegn ) Du må kanskje utvide bredden på etiketter og TextBox ved å klikke på dem og dra størrelsen bredere. Pass på å utvide Label2 til det fyller nesten bredden av skjemaet.
5

Dobbeltklikk på " Konverter"- knappen for å åpne koden vinduet. Skriv inn denne koden nøyaktig slik den vises mellom "Private Sub button1_click " ( etterfulgt av noen annen standard tekst ) og "End Sub . " Den komplette koden skal se ut som nedenfor. Merk: " . D" Det er viktig å bruke en stor " D" i strStringDate = dt.ToString ( "D ") linje, ikke små bokstaver i tillegg de første linjene av hver Private Sub rutine er kontinuerlig , ikke ødelagt med en ny linje som de kan vises på nettet .

Private Sub button1_click ( ByVal avsenderen som System.Object , ByVal e Som System.EventArgs ) Håndtak Button1.ClickDim dt som DateDim strStringDate som Stringdt = TextBox1.TextstrStringDate = dt.ToString ( "D" ) Label2.Visible = TrueLabel2.Text = " den variable strStringDate er nå i string format , " & vbCrLf & " slik det står nedenfor og ikke av datoformatet " & vbCrLf & " slik du gjorde det . " Label3.Visible = TrueLabel3.Text = strStringDateEnd Sub

Private Sub Button2_Click ( ByVal avsenderen som System.Object , ByVal e Som System.EventArgs ) Håndtak Button2.ClickLabel2 . text = " " SluttSlutt Sub

Private Sub Form1_Load ( ByVal avsenderen som System.Object , ByVal e Som System.EventArgs ) Håndtak MyBase.LoadEnd Sub

på toppen av skjemaet , før disse delrutinene , bør du se en linje lese "Public Class Form1 ", og helt nederst , " End Class. " Hvis disse linjene ikke er der , sette dem inn. Når du er ferdig , trykk " F5 " for å kontrollere arbeidet .