Un conseils pour les débutants qui viennent sur le forum ...

[jbernard13]

bonjour
un conseils pour les débutants qui viennent sur le forum
je viens d'acheter ce livre pour apprendre la programmation
http://www.microapp.com/livre_debuter_e ... _1571.html

c'est un excellent moyen d'apprendre à programmer en pb
j'ai dù installer VB 2005 express edition pour faire les exemples et ensuite une fois que j'ai compris l'exemple je reécris l' exemple en PB .

exemple du livre:
en VB :

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim num As Integer
num = 100
num = num + 100
MessageBox.Show(num.ToString)
End Sub
End Class

le meme en PB

Code : Tout sélectionner

; Exemple 2 

; les constantes
Enumeration
  #Fenetre_0
EndEnumeration

; les procedures 
Procedure Affichage()
  If OpenWindow(#Fenetre_0,0,0,200,200,"Exemple 2 ",#PB_Window_SystemMenu|#PB_Window_ScreenCentered|#PB_Window_MinimizeGadget|#PB_Window_TitleBar)

  EndIf  
EndProcedure

Procedure compte()
  Nombre = 100
  text$= Str(Nombre)
  MessageRequester("Alerte",text$,#PB_MessageRequester_Ok)
EndProcedure

; boucle du programme 
Affichage()
compte()
Repeat 
  Select WaitWindowEvent()
    Case #PB_Event_CloseWindow
      Fermer_0 =1
  EndSelect
Until Fermer_0 =1
End

[Backup]

ensuite une fois que j'ai compris l'exemple je reécris l' exemple en PB .

exemple du livre:
en VB :

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim num As Integer
num = 100
num = num + 100
MessageBox.Show(num.ToString)
End Sub
End Class

le meme en PB

oui sauf qu'en Purebasic seul ça suffirai :

      Nombre = 100
       messagerequester ( "Alerte" , str (Nombre), #PB_MessageRequester_Ok )

[jbernard13]

chacun sa façon de programmer