CONNEXION
  • RetourJeux
    • Sorties
    • Hit Parade
    • Les + populaires
    • Les + attendus
    • Soluces
    • Tous les Jeux
    • Gaming
  • RetourActu Gaming
    • News
    • Astuces
    • Tests
    • Previews
    • Toute l'actu gaming
  • RetourBons plans
    • Bons plans
    • Bons plans Smartphone
    • Bons plans Hardware
    • Bons plans Image et Son
    • Bons plans Amazon
    • Bons plans Cdiscount
    • Bons plans Decathlon
    • Bons plans Fnac
    • Tous les Bons plans
  • RetourJVTech
    • Actus High-Tech
    • Intelligence Artificielle
    • Smartphones
    • Mobilité urbaine
    • Hardware
    • Image et son
    • Tutoriels
    • Tests produits High-Tech
    • Guides d'achat High-Tech
    • JVTech
  • RetourCulture
    • Actus Culture
    • Culture
  • RetourVidéos
    • A la une
    • Gaming Live
    • Vidéos Tests
    • Vidéos Previews
    • Gameplay
    • Trailers
    • Chroniques
    • Replay Web TV
    • Toutes les vidéos
  • RetourForums
    • Hardware PC
    • PS5
    • Switch 2
    • Xbox Series
    • Switch
    • Pokemon pocket
    • FC 25 Ultimate Team
    • League of Legends
    • Tous les Forums
  • PC
  • PS5
  • Xbox Series
  • Switch 2
  • PS4
  • One
  • Switch
  • iOS
  • Android
  • MMO
  • RPG
  • FPS
En ce moment Genshin Impact Valhalla Breath of the wild Animal Crossing GTA 5 Red dead 2
Liste des sujets

probleme build...

News jeu

Expeditions: Samurai veut révolutionner le RPG tactique avec une aventure entièrement jouable en coop

Voir
sparazell
sparazell
Niveau 8
28 mars 2013 à 20:03:52

bonjour alors voila jai fait un petit spammeur (rien de bien mechant) et lors du build jai des erreurs mais je ne sais pas les corriger...

alors voila la fenetre https://image.noelshack.com/fichiers/2013/13/1364497318-capture.png

et le code :

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

End Sub

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

End Sub
Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Label4.Visible = True
Label5.Visible = False
TextBox1.Enabled = False
Button3.Enabled = False
RadioButton1.Enabled = False
RadioButton2.Enabled = False
RadioButton3.Enabled = False
RadioButton4.Enabled = False

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Timer1.Enabled = False
TextBox1.Enabled = True
Button3.Enabled = True
Label5.Text = ("1")
RadioButton1.Enabled = True
RadioButton1.Enabled = True
RadioButton1.Enabled = True
RadioButton1.Enabled = True
End Sub

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

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
TextBox1.Clear()
Label2.Text = ("0")
RadioButton2.Checked = True
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
RadioButton2.Checked = True

End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If CheckBox1.Checked And Label2.Text = NumericUpDown1 Then
Label2.Text = ("0")
End If
Label2.Text = Label2.Text = Label2.Text = 1
My.Computer.Keyboard.SendKeys(TextBox1.Text)
My.Computer.Keyboard.SendKeys("{Enter}")
End Sub

Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
If RadioButton1.Checked Then
Timer1.Interval = 1000
End If
If RadioButton2.Checked Then
Timer1.Interval = 250
End If
If RadioButton3.Checked Then
Timer1.Interval = 70
End If
If RadioButton4.Checked Then
Timer1.Interval = 10
End If
End Sub

Private Sub Timer3_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer3.Tick
Label5 = Label5.Text - 1
If Label5.Text = ("0") Then
Timer1.Enabled = True
Timer3.Stop()
Timer3.Enabled = False
End If
End Sub

Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
If CheckBox1.Checked Then
NumericUpDown1.Visible = True
Else
NumericUpDown1.Visible = False
End If
End Sub
End Class

voila les erreurs : https://image.noelshack.com/fichiers/2013/13/1364497405-capture.png

si il y quel qu'un de cool qui m'aidrait... merci :)

sparazell
sparazell
Niveau 8
28 mars 2013 à 20:32:41

tiens : http://pastebin.com/YtM3SGis

oui la barre windows je sais... :noel:

sparazell
sparazell
Niveau 8
29 mars 2013 à 17:40:22

J'up :snif2:

webpsi
webpsi
Niveau 9
29 mars 2013 à 18:06:10

Faut lire les erreurs :
Ligne 1 : tu as une fonction qui n'est pas dans une classe
Ligne 7 : tu as une fonction qui n'est pas dans une classe
Ligne 50 : il y a un "=" au lieu d'un "=="
Ligne 74 : :ouch:
"Label5 = Label5.Text - 1"
Si je traduit, tu essaye de remplacer un élément graphique (un truc avec du texte et une position x et y) par du texte (ex : "Bonjour") auquel tu aurais soustrait - 1.

Critique du code pour amélioration : tu débute, ça se vois mais désolé de dire que ton code est une horreur comme c'est pas permis d'en faire.

- variable1, variable2, variable3 : renomme ces variables dans une langue compréhensible (ex : boutonStart, boutonReset ...)

- fonction1 :
Label4.Visible = True
Label5.Visible = False
TextBox1.Enabled = False
Button3.Enabled = False
RadioButton1.Enabled = False
RadioButton2.Enabled = False
RadioButton3.Enabled = False
RadioButton4.Enabled = False

fonction2 :
Timer1.Enabled = False
TextBox1.Enabled = True
Button3.Enabled = True
Label5.Text = ("1")
RadioButton1.Enabled = True
RadioButton1.Enabled = True
RadioButton1.Enabled = True
RadioButton1.Enabled = True

Ça te choque pas d'écrire 2 fois la même chose ? Normalement en info ça ne doit jamais arriver : sur ton formulaire met 2 Layout (et met tes boutons dedans) et affiche l'un ou l'autre.

- Label2.Text = ("0")
Ne JAMAIS écrire de string directement dans le code, créer une constante au début de ta classe, comme ça le jour où tu devras changer "0" par autre chose tu n'auras plus qu'à le faire une seule fois.

- Timer1.Interval = 1000
La même chose qu'au dessus, on écrit jamais de chiffres comme ça dans le code (hors calcul sur les dates/heures/pourcentages)

- Et commente ton code, je suis sur que toi-même tu as du mal avec ton propre code.

tomtom51450
tomtom51450
Niveau 7
01 avril 2013 à 12:51:28

:fish:

Sous forums
  • Aide à l'achat Mac
  • Création de Jeux
  • Linux
  • Programmation
  • Création de sites web
  • Internet
  • Steam Deck
  • Macintosh
  • Hardware
La vidéo du moment