Funkcija InputBox

Primjenjuje se na
Access za Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Prikazuje upit u dijaloškom okviru, čeka da korisnik unese tekst ili klikne gumb, a zatim vraća niz koji sadrži sadržaj tekstnog okvira.

Sintaksa

InputBox(prompt [, title ] [, default ] [, xpos ] [, ypos ] [, helpfile ] [, kontekst ] )

Sintaksa funkcije InputBox sadrži ove argumente:

Argument Opis
upit Obavezno. Nizovni izraz prikazan kao poruka u dijaloškom okviru. Maksimalna duljina upita je približno 1024 znaka, ovisno o širini upotrijebljenih znakova. Ako se pitanje sastoji od više retka, retke možete razdvojiti znakom za povratak na novi red (Chr(13)), znakom za polje retka (Chr(10)) ili kombinacijom znaka za povratak u red i polje polja retka (Chr(13) & Chr(10)) između svakog retka.
naslov Neobavezno. Nizovni izraz prikazan na naslovnoj traci dijaloškog okvira. Ako izostavite naslov, naziv aplikacije bit će postavljen na naslovnu traku.
zadano Neobavezno. Nizovni izraz prikazan u tekstnom okviru kao zadani odgovor ako se ne navede nikakav drugi unos. Ako izostavite zadano, tekstni će se okvir prikazivati prazan.
XPOS Neobavezno. Brojčani izraz koji u twip jedinicama određuje vodoravnu udaljenost lijevog ruba dijaloškog okvira od lijevog ruba zaslona. Ako izostavite xpos , dijaloški se okvir nalazi vodoravno u sredini.
ypos Neobavezno. Brojčani izraz koji u twip jedinicama određuje okomitu udaljenost gornjeg ruba dijaloškog okvira od vrha zaslona. Ako ypos izostavite, dijaloški se okvir nalazi okomito otprilike jednu trećinu niže na zaslonu.
datoteka pomoći Neobavezno. Nizovni izraz koji određuje datoteku pomoći koja se koristi za pružanje kontekstne pomoći za dijaloški okvir. Ako se pruža datoteka pomoći , potrebno je navesti i kontekst .
Kontekst Neobavezno. Brojčani izraz koji predstavlja broj konteksta pomoći koji je autor pomoći dodijelio odgovarajućoj temi pomoći. Ako se navede kontekst , mora se navesti i datoteka pomoći .

Napomene

Kada su navedeni i datoteka pomoći i kontekst , korisnik može pritisnuti F1 (Windows) ili HELP (Macintosh) da bi prikazao temu pomoći koja odgovara kontekstu. Neke aplikacije glavnog računala u dijaloški okvir automatski dodaju gumb Pomoć . Ako korisnik klikne U redu ili pritisne ENTER, funkcija InputBox vraća sve što se nalazi u tekstnom okviru. Ako korisnik klikne Odustani, funkcija vraća niz nulte duljine ("").

Napomena

Da biste naveli više od prvog imenovanog argumenta, u izrazu morate koristiti InputBox . Da biste izostavili neke pozicijske argumente, morate uvrstiti odgovarajući graničnik zareza.

Primjer

Napomena

Primjeri koji slijede prikazuju korištenje te funkcije u modulu jezika Visual Basic for Applications (VBA). Da biste pronašli dodatne informacije o radu s VBA-om, na padajućem popisu uz stavku Traži odaberite stavku Referenca za razvojne inženjere pa unesite jedan ili više izraza u okvir pretraživanja.

U ovom se primjeru prikazuju različiti načini na koje možete koristiti funkciju InputBox da biste od korisnika zatražili unos vrijednosti. Ako se položaji x i y izostave, dijaloški će se okvir automatski centrirati za odgovarajuće osi. Varijabla MyValue sadrži vrijednost koju je korisnik unio ako korisnik klikne U redu ili pritisne tipku ENTER. Ako korisnik klikne Odustani, vraća se niz nulte duljine.


Dim Message, Title, Default, MyValue
Message = "Enter a value between 1 and 3"  ' Set prompt.
Title = "InputBox Demo"    ' Set title.
Default = "1"    ' Set default.
' Display message, title, and default value.
MyValue = InputBox(Message, Title, Default)
' Use Helpfile and context. 
' The Help button is added automatically.
MyValue = InputBox(Message, Title,,,,"DEMO.HLP", 10)
' Display dialog box at position 100, 100.
MyValue = InputBox(Message, Title, Default, 100, 100)