Visual Basic 2005 (VB 2005) var en del af Visual Studio 2005 , Microsofts Integrated Development Environment (IDE) til at udvikle programmer for NET Framework er involveret i Windows , web , mobil og . Office-programmer. VB 2005 var også blev udgivet som et gratis standalone program , kaldet Visual Basic 2005 Express Edition. VB 2005 bevaret mange af de funktioner Visual Basic 6 . VB 2008 erstattet VB 2005 og er tilgængelig som en gratis Express udgave samt være en del af Visual Studio 2008 . Instruktioner
1
Åbn et nyt projekt i VB 2005 af " Windows Form Application " type , og tildele det en nem at huske navn som " Date Conversion. "
2
Brug musen til at placere markøren over " Toolbox" til venstre i formularen på skærmen, hvis værktøjskassen ikke er fuldt synligt . Dobbeltklik på værktøjet Label at føje det til formularen, og derefter gøre det igen for at tilføje en anden etiket . Gentag denne proces for at tilføje en tekstboks, og en to knapper . Kontrollerne vil blive navngivet Label1 , Label2 , Button1 og button2 . Der bør ikke være noget navn synlige i TextBox .
3
Klik og træk TextBox , så det er til højre for den første etiket og niveau med det. Flyt den anden Label under den første Label og den første knap under dette . Skift den anden knap til højre for den første knap mod bunden af skemaet.
4
Skift den synlige tekst i Labels og knapper ved at klikke på hver tur og scanning ned "Egenskaber" boksen til højre på " Text ". Ændring Label1 tekst til "Enter dato for at konvertere ", og slette teksten ejendom Label2 . Ændre teksten på Button1 at læse , "Konverter " og button2 at vise " Exit" . (Advarsel : . I Properties bokse , omfatter ikke anførselstegn) Du kan være nødt til at udvide bredden af Etiketter og TextBox ved at klikke på dem og trække størrelsen bredere. Vær sikker på at udvide Label2 indtil det fylder næsten bredden af formularen.
5
Dobbeltklik på " Convert"-knappen for at åbne koden vinduet. Indtast denne kode nøjagtigt, som det vises mellem "Private Sub Button1_Click " ( efterfulgt af en anden standard tekst) og " End Sub ". Den komplette koden skal se ud som nedenfor. Note: " . D " Det er vigtigt at bruge en kapital "D " i strStringDate = dt.ToString ( "D") linje, ikke er et lille Desuden er de første linjer af hver Private Sub rutine kontinuerlig, ikke brudt med en ny linje , som de kan vises på internettet.
Private Sub Button1_Click ( ByVal afsender som System.Object , ByVal e som System.EventArgs ) Handles Button1.ClickDim dt som DateDim strStringDate som Stringdt = TextBox1.TextstrStringDate = dt.ToString ( "D") Label2.Visible = TrueLabel2.Text = " Den variable strStringDate er nu i string format ," & vbCrLf & " , som det vises nedenfor , og ikke i datoformat " & vbCrLf & " , som du indtastede det. " Label3.Visible = TrueLabel3.Text = strStringDateEnd Sub
Private Sub Button2_Click ( ByVal afsender som System.Object , ByVal e som System.EventArgs ) Handles Button2.ClickLabel2 . Text = "" EndEnd Sub
Private Sub Form1_Load ( ByVal afsender Som System.Object , ByVal e Som System.EventArgs ) Handles MyBase.LoadEnd Sub
på toppen af formularen før disse subrutiner , bør du se en linje læsning "Public Class Form1 " og allernederst , " End Class. " Hvis disse linjer ikke er der , skal du indsætte dem. Når du er færdig , tryk på " F5 " for at kontrollere dit arbejde.