Visual Basic 2005 ( VB 2005) var en del av Visual Studio 2005 , Microsofts Integrated Development Environment ( IDE ) för att utveckla program för NET Framework inblandad i Windows , webb , mobil och . Office-program . VB 2005 även släpptes som ett gratis fristående program , som kallas Visual Basic 2005 Express Edition . VB 2005 behållit många av de funktioner Visual Basic 6 . VB 2008 ersatte VB 2005 och finns tillgänglig som en gratis Express Edition samt vara en del av Visual Studio 2008 . Instruktioner
1
Öppna ett nytt projekt i VB 2005 av " Windows Form Application " typ , och tilldela den ett lätt att komma ihåg namn som " Date Conversion . "
2
Använd musen för att placera markören över " verktygslådan " till vänster i formuläret på skärmen om Verktygslådan är inte helt synlig . Dubbelklicka på verktyget Label för att lägga till det i formuläret , och sedan göra det igen för att lägga till en andra etikett . Upprepa denna process för att lägga till en textruta och en två knappar . Kontrollerna kommer att namnges Label1 , Label2 , Button1 och Button2 . Det bör inte vara namn syns i rutan .
3
Klicka och dra textrutan så det är till höger om den första etiketten och i nivå med det . Flytta den andra etiketten under den första etiketten och den första knappen nedanför det . Växla andra knappen till höger om den första knappen mot botten av formen .
4
Ändra synlig text i etiketter och knappar genom att klicka på var och en i tur och skanning ner "Egenskaper" rutan till höger till " text ". Ändra Label1 text till " Ange datum för att omvandla " och ta bort texten egendom Label2 . Ändra texten på Button1 att läsa , " Konvertera " och Button2 att visa " Exit " . ( Varning : . I fastigheterna lådor , inte inkludera citattecknen ) Du kanske behöver utöka bredden på de etiketter och TextBox genom att klicka på dem och dra storlek större . Var noga med att vidga Label2 tills den fyller nästan bredden på formen .
5
Dubbelklicka på " Konvertera " -knappen för att öppna koden fönstret . Ange koden exakt så som den visas mellan " Private Sub Button1_Click " ( följt av någon annan standard text ) och " Sub End . " Den fullständiga koden ska se ut som nedan . Anm : " . D " Det är viktigt att använda ett kapital " D " i strStringDate = dt.ToString ( " D " ) linje , inte ett gement dessutom de första raderna i varje Private Sub rutin är kontinuerlig , inte brutit med en ny linje som de kan visas på webben .
Private Sub Button1_Click ( ByVal avsändaren som System.Object , ByVal e som System.EventArgs ) Handtag Button1.ClickDim dt som DateDim strStringDate som Stringdt = TextBox1.TextstrStringDate = dt.ToString ( " D " ) Label2.Visible = TrueLabel2.Text = " Den rörliga strStringDate är nu i string format , " & vbCrLf & " som det visas nedan och inte i datumformat " & vbCrLf & " som du skrev det . " Label3.Visible = TrueLabel3.Text = strStringDateEnd Sub
Private Sub Button2_Click ( ByVal avsändaren som System.Object , ByVal e som System.EventArgs ) Handtag Button2.ClickLabel2 . text = " " EndEnd Sub
Private Sub Form1_Load ( ByVal avsändaren som System.Object , ByVal e Som System.EventArgs ) Hanterar MyBase.LoadEnd Sub
Längst upp på blanketten , innan dessa subrutiner , bör du se en rad läser " public class Form1 " och längst ner , " End Class . " Om dessa linjer inte är där , sätter dem . När du är klar , tryck på " F5 " för att kontrollera ditt arbete .
