IBM Lotus Symphony


MsgBox-funksjonen [kjøretid]

Viser en dialogboks som inneholder en melding og returnerer en verdi.

Syntaks:

MsgBox (Tekst som streng [,Type som heltall [,Dialogtittel som streng]])

Returverdi:

Heltall

Parameter:

Tekst: Strenguttrykk som vises som en melding i dialogboksen. Linjeskift kan settes inn med Chr$(13).

Dialogbokstittel: Strenguttrykk som vises i tittellinjen på dialogboksen. Hvis det utelates, vises navnet på den aktuelle applikasjonen.

Type: Et heltallsuttrykk som angir dialogbokstypen, antall og type knapper eller ikoner som skal vises. Type representerer en kombinasjon av bitmønstre (dialogbokselementer defineres ved å legge til de respektive verdiene):

Verdier

0 : Vis bare OK-knapp.

1 : Vis knappene OK og Avbryt.

2 : Vis knappene Avbryt, Prøv på nytt og Ignorer.

3 : Vis knappene Ja, Nei og Avbryt.

4 : Vis knappene Ja og Nei.

5 : Vis knappene Prøv på nytt og Avbryt.

16 : Legg til Stopp-ikonet i dialogboksen.

32 : Legg til Spørsmål-ikonet i dialogboksen.

48 : Legg til Utropstegn-ikonet i dialogboksen.

64 : Legg til Informasjon-ikonet i dialogboksen.

128 : Første knapp i dialogboksen som standardknapp.

256 : Andre knapp i dialogboksen som standardknapp.

512 : Tredje knapp i dialogboksen som standardknapp.

Returverdi:

1 : OK

2 : Avbryt

3 : Avbryt (Abort)

4 : Prøv på nytt

5 : Ignorer

6 : Ja

7 : Nei

Feilkoder

5 Ugyldig prosedyrekall

Eksempel:

Sub ExampleMsgBox

Dim sVar as Integer

sVar = MsgBox("Las Vegas")

sVar = MsgBox("Las Vegas",1)

sVar = MsgBox( "Las Vegas",256 + 16 + 2,"Dialogbokstittel")

end sub


Tilbakemelding om produktet | Annen dokumentasjon | Varemerker