[vb.net]Message box oui/non

Bonjour,
Je voudrais avoir 2 boutons dans ma message box: "oui" et "non" et non pas "yes" et "no".

Comment faire?

Merci, Sylvie.

Salut, j'ai pas ce problème chez moi, maintenant, peut-être que ton windows est configuré en anglais ou peut-être est-ce vb qui l'est... (outils\options\paramètres internationaux)

sinon, tu peux toujours créer un formulaire avec deux boutons que tu nomeras oui et non...

Tchô
AnteManoclis

Salut, mon visual studio est en français mais la message box est en anglais.
Comment faire pour créer une message box avec 2 bouton "oui" et "non".

Merci d'avance, Sylvie.

Merci pour ta réponse, c'est éxactement ce que je voulais.

Bonne journée, A + Sylvie.

Bonjour..

C'est très bien ton code je l'ai essayer et il me reste a finir d'ajouter du texte

Question:Est-ce possible d'écrire une partie du texte en GRAS et la ballance normal..

J'ai un frm qui s'appelle frmTest, je voudraits la faire ouvrir par un messageBox

Merci
Jean-Marc (chiffre)

Salut,

Les labels ne gèrent pas les styles différents dans le même texte, en revanche les RichTextBox oui. Il faudrait alors que tu remplaces le Label1 par un RichTextBox (il te faudra modifier un peu le style du contrôle si tu veux qu'il apparaisse sans bordure, transparent et non inscriptible comme le Label).

Voili voilou

A Tchô

Bonjour,

J'ai intégré :

Dim FormOuiNon As New Form1

TaVariable = FormOuiNon.MessageBoxOuiNon("Avez-vous bien les 4 informations demandées", "Attention !")
If TaVariable = "No" Then GoTo 10

Dans mon code, une erreur erreur "Type défini par l'utilisateur non défini" est retournée.

avec FormOuiNon en surbrillance dans :

Dim FormOuiNon As New Form1

Merci de votre aide.


La création relève de l'idèe, l'innovation de l'action !

Salut,

Es-tu sûr d'avoir créé une classe "Form1" ? Est-elle accessible à ton code ("Public" peut-être nécessaire) ?


Tchô AnteManoclis

Bonjour...je remerci ceux qui mon donné des idées

Voici ce que j'ai fait,mais il me reste a trouver comment écrire le code pour si le bouton Oui,il agrandi mon frm pour me permettre de écrire Oui pour supprimer..

N'oubliez pas que je suis que débutant
Voici mon code

Public Class frmDialogMessageBox

Dim txt As Object

Private Sub frmDialogMessageBox_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

'05/01/2010 Receveur = frm1Mater.txtRefMat.Text
Me.txtReceveur.Text = frm1Mater.txtRefMat.Text
frm1Mater.txtRefMat.Text = frm1Mater.txtRefMat.Text

'05/01/2010
'Me.Size = New System.Drawing.Size(382, 150) '382; 150 ,211
Me.Size = New System.Drawing.Size(382, 215)
txtPicheur.Visible = True

'05/01/2010
Oui_Button.Location = New System.Drawing.Point(95, 90)
Non_Button.Location = New System.Drawing.Point(234, 90)

Label_Oui.Visible = True
Label_Oui.Location = New System.Drawing.Point(100, 121) '58; 126

End Sub

Private Sub Oui_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Oui_Button.Click

Me.DialogResult = System.Windows.Forms.DialogResult.Yes
txtPicheur.Focus()

'frmDialogMessageBox
'Me.Size = New System.Drawing.Size(394, 211) '(394, 121)
Me.Size = New System.Drawing.Size(382, 215)

'05/01/2010
Oui_Button.Location = New System.Drawing.Point(95, 90)
Non_Button.Location = New System.Drawing.Point(234, 90)

Label_Oui.Location = New System.Drawing.Point(106, 121) '106; 121
txtPicheur.Visible = True

End Sub

Private Sub Non_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Non_Button.Click

Me.DialogResult = System.Windows.Forms.DialogResult.No

' frmDialogMessageBox
'Me.Size = New System.Drawing.Size(394, 155)
Me.Size = New System.Drawing.Size(382, 215)

'05/01/2010
Oui_Button.Location = New System.Drawing.Point(95, 90)
Non_Button.Location = New System.Drawing.Point(234, 90)

End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

MessageBox.Show("Bonjour..." & vbCrLf & "" & vbCrLf & "Si vous avez besoin de ce Sous-traitant dans le calcul des coûts," & vbCrLf & "dans votre soumission ! " & vbCrLf & "" & vbCrLf & "un sous-traitant", " Attention ! ", MessageBoxButtons.YesNoCancel, MessageBoxIcon.Information)

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

Me.Close()

End Sub

End Class

Merci
Si possible de m'aider pour le finir que le InpoutBox fonctionne
Chiffre