En Visual Basic InputBox är ett sätt för exploatören att inhämta input från en användare och tilldela resultatet till en variabel för användning i andra delar av en ansökan . I stället för en grafisk bild , gör en Visual Basic -kod ord en InputBox. The resultatet av en InputBox variabel kan bli del av en adress databas , en tidrapport eller annat program . Det skulle kunna visas i feedback till användaren om InputBox frågar något i stil med " Vad är ditt namn ", och när användaren svarar kan datorn svara "God morgon [ DittNamn ] . Hur mår du idag " The användarens egna svar ersätter variabeln visas här inom parentes
1
Öppna . ett nytt Visual Basic-projekt genom att välja " Standard-EXE " i listan över mallar som visas när du först ladda Visual Basic . På nästa skärm , dubbelklicka på " Label " kontroll i "Toolbox "som finns till vänster om skärmen . Detta innebär en " Label1 " rutan på formuläret i mitten av skärmen . Använd små rutorna på gränsen i denna ruta för att förstora rutan .
2 .
Klicka på denna nya etiketten för att visa dess egenskaper i panelen till höger . Dubbelklicka på " Caption " egendom för att markera standard bildtexten " Label1 . " Tryck på " Delete " på tangentbordet för att ta bort bildtexten .
3 .
Dubbelklicka på " CommandButton , " en liten rektangel i "Toolbox " för att lägga detta till den form . Använd egenskaperna listan för att ändra standardsvaret bildtexten " Kommando1 "till " Show InputBox . " Dubbelklicka på det nya namnet för att öppna kodfönstret .
4 .
Skriv in koden nedan mellan de två linjerna som redan finns : " Private Sub Command1_Click () " och " End Sub . "
Dim DittNamn , NoAnswer As String
Dim LocX , LocY As Integer
LocX=6. 500 "Screen läge i twips . Det finns 1440 twips till en tum
LocY=4. 500 " Ändra nummer till era behov
Label1. Caption=" " 'Detta ämnen bildtexten varje gång programmet köra
NoAnswer=" inte Kan du säga vad du heter ? "
DittNamn=InputBox (" Vad är ditt första namn ? " , " Skapa en InputBox " , , LocX , LocY )
"de två kommatecken i rad i raden ovanför är viktiga
Om DittNamn=" " Då
Label1 . Caption=NoAnswer
Else
Label1. Caption="God morgon, " DittNamn " . Hur mår du idag ? "
End If
5 .
Tryck " F5 " för att köra programmet .
Previous:nothing Next:hur man gör en webbläsare med Visual Basic 2005 Express