Hoe een Input Box in Visual Basic maken

Hoe een Input Box in Visual Basic maken Jupiterimages / Pixland / Getty Images

Een Visual Basic InputBox biedt een manier om de ontwikkelaar te werven input van een gebruiker en wijs het resultaat aan een variabele voor gebruik in andere delen van een applicatie.In plaats van een grafische afbeelding, een Visual Basic codewoord maakt een InputBox.The resultaat van een InputBox variabele zou deel uitmaken van een adressenbestand, een rooster of een andere toepassing te worden.Het kan worden weergegeven in feedback aan de gebruiker als de InputBox vraagt ​​iets als "Wat is uw naam," en, wanneer de gebruiker reageert, kan de computer te beantwoorden "Goedemorgen [UwNaam].Hoe gaat het vandaag? "De gebruiker verstrekt reactie vervangt de hier tussen haakjes variabel.

instructies

  1. Open een nieuwe Visual Basic-project door "Standard EXE" te selecteren in de lijst met sjablonen die verschijnt wanneer je eerste ladingVisual Basic.In het volgende scherm, dubbelklik op het "label" controle in de "gereedschapsk

    ist" gelegen aan de linkerkant van het scherm.Dit plaatst een doos "Label1" van de vorm in het midden van het scherm.Gebruik de kleine vakken op de grenzen van het vak te vergroten de doos.

  2. Klik op deze nieuwe label om de eigenschappen in het paneel aan de rechterzijde weer te geven.Dubbelklik op het "Caption" woning aan de standaard titel, Druk op de toets "Label1." "Verwijderen" op uw toetsenbord te markeren om de titel te verwijderen.

  3. Dubbelklik op het "CommandButton," een kleine rechthoek in de "Toolbox" om deze toe te voegen aan het formulier.Gebruik de eigenschappen lijst naar de standaard titel, "Command1" veranderen in "Show InputBox." Dubbelklik op de nieuwe naam knop om de code te openen.

  4. Type onderstaande code tussen de twee lijnen al aanwezig: "Private Sub Command1_Click ()" en "End Sub."

    Dim UwNaam, NoAnswer als Koord
    Dim LocX, Locy As Integer
    LocX = 6500 'Screenlocatie in twips.Er zijn 1440 twips een inch
    Locy = 4500 'Verander de nummers aan uw behoeften
    Label1.Caption passen = ""' deze blanks het bijschrift elke keer dat het programma wordt uitgevoerd
    NoAnswer = "Zal niet u mij vertellen uw naam? '
    YourName = InputBox ("Wat is uw naam?", "Het creëren van een InputBox", LocX, Locy)
    'de twee komma's op een rij in de lijn boven zijn van vitaal belang
    Als UwNaam = "" Dan
    Label1.Caption= NoAnswer
    Else
    Label1.Caption = "Goedemorgen," & amp;YourName & amp;". Hoe gaat het met je vandaag?"
    Eind als

  5. Druk op "F5" om het programma uit te voeren.

Tips & amp;Waarschuwingen

  • Voeg een verklarende boodschap aan problemen of voor andere doeleinden die je niet wilt op de vorm of in de werkelijke titel als in het bovenstaande voorbeeld te plaatsen dekken.Om dit te doen, veranderen de volgende regels code:
  • Verwijder de regel die begint ". Label1.Caption = NoAnswer Dan"
  • Vervang dit met:
  • MsgBox ("We moeten uw naam door te gaan hebben.")
  • Alleen ongeveer 1024 tekens kunnen passen in een InputBox.Het exacte aantal is afhankelijk van het lettertype.

Resources

  • Visual Basic Developer Center: Learn Visual Basic
45
0
3
Visual Basics Programming