A Visual Basic InputBox gir en måte for utbygger å innhente innspill fra en bruker og tilordne til en variabel for bruk i andre deler av et program. I stedet for et grafisk bilde , gjør en Visual Basic-kode ord en InputBox.The resultat av en InputBox variabel kan bli en del av en adresse database , en timeliste eller et annet program . Det kan dukke opp i tilbakemelding til brukeren dersom InputBox spør noe sånt som " Hva heter du ", og når brukeren svarer , kan datamaskinen svarer " God morgen [ dittnavn ] . Hvordan har du det i dag? " Den er gitt av brukere respons erstatter den variable vist her i parentes . Instruksjoner
en

Åpne et nytt Visual Basic-prosjekt ved å velge " Standard EXE " fra listen over maler som vises når du først laste Visual Basic. I det neste skjermbildet , dobbeltklikker du på " Label" kontroll i "verktøykasse" som ligger på venstre side av skjermen . Dette plasserer en " Label1 " boksen på skjemaet i midten av skjermen . Bruk de små bokser på grensene til denne boksen for å forstørre boksen.
2

Klikk på denne nye etiketten for å vise sine egenskaper i panelet til høyre. Dobbeltklikk på " Bildetekst " eiendom for å markere Standardbildeteksten , " Label1 . " Trykk på "Delete "-tasten på tastaturet for å fjerne bildeteksten .
3

Dobbeltklikk på " CommandButton ", en liten firkant i " Toolbox "for å legge dette til skjemaet . Bruk eiendommer listen for å endre standard Caption , " Command1 " til " Vis InputBox . " Dobbeltklikk på det nylig kåret knappen for å åpne koden vinduet.
4

Skriv inn koden under mellom to linjene som allerede finnes : " Private Sub Command1_Click ( )" og " End Sub . "

Dim dittnavn , NoAnswer Som StringDim LocX , LocY Som IntegerLocX = 6500 ' Screen beliggenhet i twips . Det er 1440 twips til en inchLocY = 4500 'Endre tallene som passer din needsLabel1.Caption = "" ' dette blanks bildeteksten hver gang programmet er runNoAnswer = " Vil ikke du fortelle meg navnet ditt ? " dittnavn = InputBox ( " Hva er fornavnet ditt ? " , "Opprette en InputBox " , , LocX , LocY ) ' to komma på rad i linjen ovenfor er vitalIf dittnavn = "" ThenLabel1.Caption = NoAnswerElseLabel1.Caption = " God morgen , " & dittnavn & " . Hvordan har du det i dag? " End If
5

Trykk" F5 "for å kjøre programmet .