PROGRAMACIÓ D'APLICACIONS EDUCATIVES AMB VISUAL BASICMÒDUL 1

  • Aquesta plana està dividida en dues parts:
  • La primera part defineix com és el vostre formulari (quin aspecte tindrà la finestra). No la podeu modificar directament. Per editar-ho es fa incorporant nous objectes de la paleta en el vostre formulari. I per canviar els valors ho feu sel.leccionant l'objecte i escolliu la propietat a canviar en la finestra Properties

  • La segona part és la del codi del programa, aquí és on escriurem el comportament i les coses que volem que faci el nostre programa.

  • Aquesta informació és vàlida per a totes les planes del curs que hi accedim mitjançant l'opció: Veure el llistat del codi del programa.

    Fitxer: m1p1.frm

    Definició dels objectes. Interfície d'usuari

    Recordeu que això no ho podeu editar directament. Per fer-ho incorporeu nous objectes de la paleta en el vostre formulari. I per canviar els valors seleccioneu l'objecte i escolliu la propietat a canviar en la finestra Properties.

    VERSION 5.00
    Begin VB.Form frmPrimerPrograma 
       Appearance      =   0  'Flat
       BackColor       =   &H80000005&
       Caption         =   """Primer programa Windows"""
       ClientHeight    =   4020
       ClientLeft      =   1635
       ClientTop       =   1440
       ClientWidth     =   7365
       BeginProperty Font 
          Name            =   "MS Sans Serif"
          Size            =   8.25
          Charset         =   0
          Weight          =   700
          Underline       =   0   'False
          Italic          =   0   'False
          Strikethrough   =   0   'False
       EndProperty
       ForeColor       =   &H80000008&
       LinkTopic       =   "Form1"
       PaletteMode     =   1  'UseZOrder
       ScaleHeight     =   4020
       ScaleWidth      =   7365
       Begin VB.CommandButton cmdFí 
          Appearance      =   0  'Flat
          Caption         =   "&Fí"
          Height          =   495
          Left            =   3000
          TabIndex        =   3
          Top             =   2280
          Width           =   1455
       End
       Begin VB.CommandButton cmdEsborraMissatge 
          Appearance      =   0  'Flat
          Caption         =   "&Esborra Missatge"
          Height          =   615
          Left            =   4440
          TabIndex        =   2
          Top             =   1440
          Width           =   1815
       End
       Begin VB.CommandButton cmdSalutació 
          Appearance      =   0  'Flat
          Caption         =   "&Salutació"
          Height          =   615
          Left            =   1200
          TabIndex        =   1
          Top             =   1440
          Width           =   1815
       End
       Begin VB.TextBox txtMissatge 
          Appearance      =   0  'Flat
          Enabled         =   0   'False
          Height          =   375
          Left            =   1200
          TabIndex        =   0
          Top             =   360
          Width           =   5055
       End
    End
    


    Codi del programa. Programació de respostes a events

    Attribute VB_Name = "frmPrimerPrograma"
    Attribute VB_GlobalNameSpace = False
    Attribute VB_Creatable = False
    Attribute VB_PredeclaredId = True
    Attribute VB_Exposed = False
    Option Explicit
    
    Private Sub cmdEsborraMissatge_Click()
       txtMissatge.Text = ""
    End Sub
    
    Private Sub cmdFí_Click()
        End
    End Sub
    
    Private Sub cmdSalutació_Click()
         txtMissatge.Text = "Hola món, existeixo"
    End Sub