PDA

Visualizza la versione completa : MsgBox ( icona chiudi) VB


xit
10-07-2002, 09:00
MsgBox "Seleziona tutti campi", vbInformation
E' possibile disabilitare l'icona chiudi?E se si come?
Grazie

ladyBlu
10-07-2002, 09:15
intendi la X?

xit
10-07-2002, 09:16
S intendo la X

ladyBlu
10-07-2002, 09:32
io ho un' API, ora te la posto, ok?

xit
10-07-2002, 09:33
Grazie!

ladyBlu
10-07-2002, 09:37
Nel modulo:
Public Declare Function MessageBox& Lib "user32" Alias "MessageBoxA" (ByVal hWnd&, ByVal lpText$, ByVal lpCaption$, ByVal wType&)

Nel form:
MessageBox hWnd, "mio messaggio", "titolo", bottoni


Ciao

:ciauz: :ciauz:

xit
11-07-2002, 14:53
cosa il terzo parametro bottoni, non ho capito.
L'icona chiudi non disabilitata!!!

ladyBlu
11-07-2002, 15:23
allora, io ho un form con un bottone. quando clicco sul bottone CMDBottone, mi appare la msgbox. A me la x non si vede, quindi ti ho postato il codice identico al mio, magari avevo saltato qualcosa.
riprova.



Originariamente inviato da ladyBlu
Nel modulo:
Public Declare Function MessageBox& Lib "user32" Alias "MessageBoxA" _
(ByVal hWnd&, ByVal lpText$, ByVal lpCaption$, ByVal wType&)

Nel form:
Private Sub CMDBottone_Click()
MessageBox hWnd, "mio messaggio", "titolo", VBYesNo
End Sub


Fammi sapere.
:ciauz:

xit
11-07-2002, 15:32
ma l'icona chiudi rimane?Che parametro devo andare ad impostare nella
funzione

ladyBlu
11-07-2002, 15:40
Tu non devi settare nessun parametro.
Devi solo inserire quella riga "Public Declare..." nel modulo e scrivere la tua message box.

Ricapitolando:


Nel modulo:
'Tutto su una riga sola
Public Declare Function MessageBox& Lib "user32" Alias "MessageBoxA" _
(ByVal hWnd&, ByVal lpText$, ByVal lpCaption$, ByVal wType&)

Nel form:
Private Sub CMDBottone_Click()
MessageBox hWnd, "mio messaggio","titolo", VBYesNo
End Sub


"mio messaggio"--> il messaggio che vuoi visualizzare.
"titolo"--> il titolo che vuoi appaia sulla barra in alto della msgbox.


Comunque, se non ti charo, postami il tuo codice che te lo modifico io, ok?

Loading