Miten saadasyöttöruutuun Visual Basic

Miten saadasyöttöruutuun Visual Basic Jupiterimages / Pixland / Getty Images

Visual Basic InputBox tarjoaa tavan kehittäjä pyytää käyttäjältä syöte ja antaa tuloksen muuttujaan käytettäväksi muualla hakemuksen.Sen sijaan, graafinen ilme, Visual Basic koodisana tekee InputBox.The tulos InputBox muuttuvan liittyisi osaksi osoitetietokanta, tuntilomakkeen tai muu sovellus.Se voisi näkyä palautetta käyttäjälle, jos InputBox kysyy jotain "Mikä on nimesi," ja, kun käyttäjä vastaa, tietokone voi vastata "Hyvää huomenta [omanimi].Miten voit tänään? "Käyttäjäystävällinen jos vastaus korvaa muuttujan kuvassa suluissa.

Ohjeet

  1. Avaa uusi Visual Basic-projektin valitsemalla "normaali EXE" luettelosta malleja joka näkyy, kun ensimmäinen kuormaVisual Basic.Seuraavassa näytössä, tupla-klikkaa "Label" valvonnan "Toolbox" sijaitsee näytön vasemmassa reunassa.Tämä asettaa "Label1" ruudun muodossa näytön keskellä.Käytä pieni laatikot rajoilla tämä jos haluat suurentaa ruutuun.

  2. Klikkaa tästä uudesta etiketti näyttää sen o

    minaisuuksia paneelin oikealla.Kaksoisnapsauta "kuvateksti" omaisuus korostaa Oletusotsikko, "Label1." Paina "Delete" -näppäintä poistaa kuvatekstin.

  3. Kaksoisnapsauta "CommandButton" pieni suorakulmion "Toolbox" lisätä tämän lomakkeen.Käytä ominaisuudet luetella muuttaa oletuksena Kuvateksti, "Command1" ja "Näytä InputBox." Kaksoisnapsauta uudelleen nimetty painike avaa koodi-ikkuna.

  4. Kirjoita alla oleva koodi välillä kaksi riviä jo läsnä: "Private Sub Command1_Click ()" ja "End Sub."

    Dim omanimi, NoAnswer As String
    Dim LocX, LocY As Integer
    LocX = 6500 Screensijainti twips.On 1440 twips jotta tuuman
    LocY = 4500 'Muuta numeroita tarpeisiisi
    Label1.Caption = ""' tämä tyhjentää kuvateksti aina ohjelma ajetaan
    NoAnswer = "Etkö kerro minulle nimesi? "
    omanimi = InputBox ("Mikä on etunimesi?", "Creating InputBox",null, LocX, LocY)
    "kaksi pilkkuja peräkkäin viivalle ovat elintärkeitä
    Jos omanimi =" "Sitten
    Label1.Caption= NoAnswer
    Else
    Label1.Caption = "Hyvää huomenta" & amp;Omanimi & amp;". Kuinka voit tänään?"
    End Jos

  5. Paina "F5" ohjelman suorittamiseen.

Vinkkejä & amp;Varoitukset

  • Lisää selittävä viesti kattamaan ongelmia tai muihin tarkoituksiin, joita et halua saattaa muodossa tai todellinen kuvatekstin kuten yllä olevassa esimerkissä.Voit tehdä tämän, muuttaa näitä riviä koodia:
  • Poista linja, joka alkaa "Label1.Caption = NoAnswer Sitten."
  • Korvaa tätä:
  • MsgBox ("Meillä täytyy olla nimesi edetä.")
  • Vain noin 1024 merkkiä voi mahtua InputBox.Tarkka määrä riippuu fontin.

Resurssit

  • Visual Basic Developer Center: Learn Visual Basic
385
0
3
Visual Basic Ohjelmointi