| maison  | Hardware  | réseaux  | programmation  | Logiciel  | Dépannage  | systèmes |  
programmation  
  • C /C + + Programming

  • Computer Programming Languages

  • Delphi Programming

  • Programmation Java

  • Programmation JavaScript

  • PHP /MySQL Programmation

  • programmation Perl

  • Programmation Python

  • Ruby Programming

  • Visual Basics programmation
  •  
    Connaissances Informatiques >> programmation >> Visual Basics programmation >> Content
    Comment programmer les équations du second degré dans Visual Basic
    Une équation quadratique est un polynôme du second degré qui a la forme " . Ax ^ 2 + bx + c = 0" Le "a", "b" et "c" sont les constantes et "x" est la variable . Lorsque vous résolvez une équation quadratique , vous devez avoir les valeurs des constantes et à résoudre pour x , ce qui donne toujours deux valeurs , appelées les «racines ». Dans Visual Basic, vous pouvez écrire un programme ou une fonction qui invite l'utilisateur à entrer des valeurs a, b ​​et c , trouver les racines , puis afficher les valeurs du formulaire. Instructions
    1

    Ouvrez un nouveau programme Visual Basic. Double- cliquez sur l'outil "Button " pour ajouter Button1 dans le formulaire. Double- cliquez sur l'outil "Label" deux fois pour ajouter Label1 et Label2 au formulaire.
    2

    Double -cliquez sur " Button1" sur le formulaire pour ouvrir la fenêtre de code . Tapez le code suivant :

    Dim a en décimal = InputBox (" Entrez A: " )

    b As Decimal = InputBox (" Saisissez B")

    Dim c Comme Decimal = InputBox (" Entrez C :")

    quadratique (a, b, c)

    les trois premières lignes invitent l'utilisateur pour les valeurs des constantes . Il appelle ensuite un sous appelée « quadratique » et passe les constantes comme arguments à cela .
    3

    Placez le curseur à l'extérieur des sous Button1 . Tapez le code suivant :

    Private Sub quadratique ( ByVal un en décimal , b ByVal comme Decimal , ByVal c en décimal )

    racines Dim ( 1) As String Dim

    x1, x2, disque comme disque de décimal


    = b ^ 2 - 4 * a * c

    La première ligne crée des sous quadratique et accepte trois arguments. Il définit ensuite un tableau avec deux points pour les deux racines. Il crée ensuite trois variables décimales et affecte la valeur du discriminant , qui détermine le nombre de racines de l'équation quadratique a
    4

    Tapez le code suivant : .

    Si le disque > = 0 Then

    x1 = (-b + Math.Sqrt (disque) ) /(2 * a)

    x2 = ( -b - Math.Sqrt (disque) ) /(2 * a)

    racines ( 0) = x1.ToString

    racines ( 1) = x2.ToString

    Else

    racines (0) = " (- "& b.ToString &" + sqrt ( "& disc.ToString &") ) /(2 * " & a.toString &") "

    racines ( 1) =" (- "& b.ToString & " - sqrt ( " & disc.ToString & ") ) /(2 * " & a.toString & ") "

    End If

    le "if" des contrôles de fonctionnement pour voir si la valeur du discriminant est supérieure ou égale à zéro , ce qui signifie que l'équation a une ou deux racines . Il résout ensuite pour x . Si le discriminant est inférieur à zéro, l'équation n'a pas de véritables racines et la partie "else" exécute , qui affiche les racines des équations complexes
    5

    Tapez le code suivant : .

    Label1.Text = racines ( 0)

    Label2.Text = roots (1 ) Photos

    End Sub

    Ces lignes de code simplement afficher les racines sur les étiquettes , puis fermez le bloc de code du second degré sous .
    6

    Enregistrer le programme Visual Basic. Appuyez sur "F5" pour l'exécuter.

    Previous :

    next :
      articles connexes
    ·OCX Outils 
    ·La fonction de rappel pour les DLL 
    ·Comment ajouter un onglet dans une chaîne sur VB.NET 
    ·Comment passer des informations d'une application Visua…
    ·Comment faire pour utiliser l'accès et saisir des donn…
    ·Comment démarrer l' éditeur Visual Basic 
    ·Comment créer un script Visual Basic 
    ·Comment couper les deux derniers caractères de VB 
    ·Comment analyser les pièces de HTML en utilisant VB 
    ·Comment faire pour redimensionner les images en Visual …
      articles en vedette
    ·Tutoriel sur les fonctions SQL 
    ·Les facteurs qui déterminent le choix du langage de pr…
    ·Comment faire pour empêcher JavaScript d'être consult…
    ·Comment faire un VAR mondial en Python 
    ·Comment importer VBScript Dans VB express 
    ·Comment convertir les chaînes alphabétiques en C + + 
    ·Comment se connecter à une URL avec VBS 
    ·Index Array Out of Bounds Exception en Java 
    ·Comment lire la sélection de zone de liste en Python 
    ·Comment faire pour utiliser un script Python sur Web Se…
    Copyright © Connaissances Informatiques http://fr.wingwit.com