Hvordan laver en tekstboks i Visual Basic

Hvordan laver en tekstboks i Visual Basic Jupiterimages / Pixland / Getty Images

En Visual Basic InputBox giver en måde for udvikleren at hverve input fra en bruger og tildele resultatet til en variabel til brug i andre dele af et program.I stedet for et grafisk billede, en Visual Basic-kode ord gør en InputBox.The resultat af en InputBox variabel kan blive en del af en adresse-database, en timeseddel eller et andet program.Det kunne vises i feedback til brugeren, hvis InputBox spørger noget lignende "Hvad er dit navn", og, når brugeren reagerer, kan computeren svare "Godmorgen [DitNavn].Hvordan har du det i dag? "Den brugervenlige forudsat svar erstatter den variable her vist i parentes.

Instruktioner

  1. Åbn en ny Visual Basic projekt ved at vælge "Standard EXE" fra listen over skabeloner, der vises, når du først belastningVisual Basic.I det næste skærmbillede, skal du dobbeltklikke på den "Label" kontrol i "Toolbox" placeret på venstre side af skærmen.Dette lægger en "Label1" feltet i formularen i midten

    af ​​skærmen.Brug de små kasser på grænserne for dette felt for at forstørre kassen.

  2. Klik på dette nye mærke for at vise sine egenskaber i panelet til højre.Dobbeltklik på "Caption" ejendom for at fremhæve standard billedtekst, "Label1." Tryk på "Slet" -tasten på tastaturet for at fjerne billedteksten.

  3. Dobbeltklik på "CommandButton", en lille rektangel i "værktøjskassen" for at tilføje dette til formularen.Brug egenskaber listen for at ændre standard Caption "Command1" til "Show InputBox." Dobbeltklik på det nyligt navngivne knappen for at åbne koden vinduet.

  4. Indtast koden herunder mellem de to linjer, der allerede er til stede: "Private Sub Command1_Click ()" og "End Sub".

    Dim DitNavn, NoAnswer As String
    Dim LocX, LocY As Integer
    LocX = 6500 'Screenplacering i twips.Der er 1440 twips til en tomme
    LocY = 4500 'Ændre numrene til dine behov
    Label1.Caption = "" "dette slukker billedteksten hver gang programmet køres
    NoAnswer =" Vil du ikke fortælle mig dit navn? "
    DitNavn = InputBox ("Hvad er dit fornavn?", "Oprettelse af en InputBox",null, LocX, LocY)
    'de to kommaer i en række i linjen over er afgørende
    Hvis DitNavn = "" Så
    Label1.Caption= NoAnswer
    Else
    Label1.Caption = "God morgen," & amp;DitNavn & amp;". Hvordan har du det i dag?"
    End If

  5. Tryk på "F5" for at køre programmet.

Tips & amp;Advarsler

  • Tilføj en forklarende meddelelse til dækning af problemer eller til andre formål, som du ikke ønsker at placere på den form eller i selve billedteksten som i ovenstående eksempel.For at gøre dette, ændre disse linjer kode:
  • Slet linje, der begynder ". Label1.Caption = NoAnswer Så"
  • Erstat dette med:
  • MsgBox ("Vi skal have dit navn for at fortsætte.")
  • Kun ca. 1024 tegn kan passe i en InputBox.Det nøjagtige antal afhænger af skrifttype.

Ressourcer

  • Visual Basic Developer Center: Lær Visual Basic
191
0
3
Visual Basics Programming