Probléme en VB.NET [Résolu]
Fedor1
Messages postés
9
Statut
Membre
-
MrYAU31 Messages postés 4631 Statut Membre -
MrYAU31 Messages postés 4631 Statut Membre -
Bonjour,j'ai un sousis je suis entrain de crée un binder et quand je fait binder sa me met ça :
Un formulaire qui est déjà visible ne peut pas être affiché sous la forme d'une boîte de dialogue modale.Affectez la valeur false à la propriété visible du formulaire avant d'appeler ShowDialog
Si vous pouvais m'aidez sa serais simpa de votre part :)
Un formulaire qui est déjà visible ne peut pas être affiché sous la forme d'une boîte de dialogue modale.Affectez la valeur false à la propriété visible du formulaire avant d'appeler ShowDialog
Si vous pouvais m'aidez sa serais simpa de votre part :)
5 réponses
-
Bonjour,
Tu peux donner un peu plus de code ?
Tu n'as pas déjà appelé ton formulaire avec un Show ? -
Je suppose que ce code est dans une autre form...
Et en ajoutant ce qu'il y a en gras ci-dessous ?
If sfd.ShowDialog() = Windows.Forms.DialogResult.OK -
-
as tu skype ou autre ?
Private Sub Thief3Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Thief3Button3.Click Dim sfd As New SaveFileDialog With sfd .FileName = "*.*" .Title = "Choisir le nouvelle emplacement du fichier..." .Filter = "All File (*.*)|*.*" .InitialDirectory = Environment.GetFolderPath(Environment.SpecialFolder.Desktop) If ShowDialog() = Windows.Forms.DialogResult.OK Then Dim sp As String = "[SPLITTER]" Dim buffer As Byte() = My.Resources.Stub2 My.Computer.FileSystem.WriteAllBytes(.FileName, buffer, False) Dim file1 As Byte() = secure(My.Computer.FileSystem.ReadAllBytes(TextBox1.Text)) Dim file2 As Byte() = secure(My.Computer.FileSystem.ReadAllBytes(TextBox2.Text)) System.IO.File.AppendAllText(.FileName, sp & Convert.ToBase64String(file1) & sp & F & sp & Convert.ToBase64String(file2) & sp & F2) MsgBox("Binder avec succès!", MsgBoxStyle.Information + MsgBoxStyle.OkOnly, "Succès !") End If End With End Sub End Class
J'ai cette erreur en gras -
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question -
Merci il fallais mettre If sfd.ShowDialog() = Windows.Forms.DialogResult.OK
Sujet réussi (fermer)