VB Résolu/Fermé

Question

Bonjour,

voila ma structure toute simple : 
 Structure Pers
        Dim nom As String
        Dim nais As Integer
        Dim salaire As Single
        Dim adr As String
    End Structure

Main tout simple

   Sub Main()
        Dim toc As Pers
        toc.nom = InputBox("un nom svp")
        toc.nais = InputBox("une date de naissance svp")
        MsgBox("nom: ", toc.nom, "age: ", toc.nais)     <---------- ICI PB

    End Sub

Comment écrire le nom ET l'age du mec ? La syntaxe je parle. 

Merci

Polux31 · Answer

Bonjour,

Voilà la bonne syntaxe :

Option Explicit

Private Type personne
    nom As String
    prenom As String
    Datenais As Date
    salaire As Single
    adr As String
End Type

Public pers As personne

Sub Main()

    pers.nom = InputBox("un nom svp")
    pers.Datenais = InputBox("une date de naissance svp")
    
    MsgBox "nom: " & pers.nom & " ,age: " & pers.Datenais
    
End Sub

Bon courage

;o)

VB

1 réponse

Discussions similaires

Newsletters