Convertisseur de monnaie en Visual Basic

logo visual basic

Depuis peut je m’intéresse au langage Visual Basic qui est très accessible et permet beaucoup de choses très facilement. N’étant pas du tout spécialiste dans ce domaine je vais dans ce billet partager mes sources afin d’avoir des syntaxes de bases disponible rapidement en ligne.

convertisseur crypto monnaie visual basic

Si vous passez si ce billet et que des erreurs vous saute aux yeux n’hésitez pas me les signaler. Je n’ai pas encore les reflexes d’un développement et je n’ai pas encore bien acquis les standards de développement dans ce langage.

je publierai régulièrement les exemples de script sur lesquels je travail pour me familiariser avec les syntaxes du langage.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Public Class Form1
    'Fonction de calcul finale qui recoit comme argment le montant de la banque ainsi que le cours de la devise a calculer
    Function courscryptomonnaie(ByVal argument1 As Decimal, ByVal argument2 As Decimal) As Decimal
        Return argument1 * argument2
    End Function


    Dim decimalcoursdogecoin As Decimal
    Dim nombrededogecoin As Decimal

    'Determine si la valeur fournie par l'utilisateur est conforme dans la case cours de la monnaie
    Private Sub coursdogecoin_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles coursdogecoin.TextChanged
        Dim dec As Decimal
        If Decimal.TryParse(coursdogecoin.Text, dec) Then
            decimalcoursdogecoin = coursdogecoin.Text
        Else
            coursdogecoin.Text = 0
        End If
    End Sub
    ' Détermine si la valeur fournie par l'utilisateur est conforme dans la case montant de la banque
    'Si les deux conditions sont réussi la fonction crourscryptomonnaie est appelé et calcul le montant
    Private Sub montantdedogecoin_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles montantdedogecoin.TextChanged
        Dim dec As Decimal
        If Decimal.TryParse(montantdedogecoin.Text, dec) Then
            nombrededogecoin = montantdedogecoin.Text
            montantfinale.Text = courscryptomonnaie(nombrededogecoin, decimalcoursdogecoin) & "€"
        Else
            montantdedogecoin.Text = 0
        End If
    End Sub
End Class

Add a comment »2 comments to this article

  1. Bonsoir, j’aimerai savoir quel pourrait être l’interêt de convertir des coins en visual basic. Pour les intégrer dans un tableau par exemple? je suis novice. Merci

    Répondre

    • Bonsoir, aucun il s’agissait la d’un début d’apprentissage du VB

      cdlt

      Répondre

Laisser un commentaire

Assemblé dans la station orbitale WordPress