Programarea și Utilizarea Calculatoarelor

PUC 2 – Îndrumator de lucrari de laborator Lucrari tip A

Lucrari tip A . Programe cu obiectele de baza

În acest capitol vor fi efectuate lucrari de programare simple, de initiere, care vor necesita cunostinte

despre obiectele TextBox, Label, CommandButton, instructiunea IF.THEN. ELSE, functiile

InputBox si MsgBox. Tot în aceste programe vor fi folosite si instructiuni de ciclare. Primul program

va fi tratat în detaliu, fiind folosit ca model, iar urmatoarele vor avea propusa tema, schema logica,

interfata sau numai o parte din ele.

Consideratii teoretice

În acest paragraf vor fi prezentate, prin exemple, cele mai întâlnite situatii pe care le veti

întâlni în practica.

Declararea unei variabile: Dim x As Integer, y As Single, y As String.

Citirea în variabila x, dintr-un TextBox: x = txtRaza.Text.

Scrierea într-un TextBox a valorii din variabila aria: txtRezultat.Text = aria

Introducerea unei valori în variabila n, cu functia InputBox:

n = InputBox(“Nr. de puncte:”)

Afisarea unui mesaj: MsgBox(“Radacini imaginare!”).

Revedeti instructiunile de ciclare FOR . NEXT, DO WHILE . LOOP.

Programul model – Adunarea a doua numere

Acest program îsi propune sa adune doua numere, este un program simplu care arata pasii

care trebuie parcursi pentru abordarea programelor din aceasta categorie.

Specificatii:

· Programul va avea doua variante: cele 2 numere vor fi introduse cu TextBox sau cu

InputBox;

· Se va testa care numar e mai mare si va fi afisat un mesaj de forma „Primul numar

este mai mare” sau „Al doilea numar este mai mare” ;

· Rezultatul va fi afisat într-un TextBox.

PUC 2 – Îndrumator de lucrari de laborator Lucrari tip A

Schema logica:

Interfata:

Se observa ca interfata contine 4 etichete (labels), 3 TextBoxuri si 2 butoane de comanda.

Încercati sa pastrati proportiile si asezarea din figura.

Programul:

Varianta I-a: numerele se citesc din textbox-uri, iar mesajul privind numerele se

afiseaza cu MsgBox. Veti deduce din codul sursa, denumirile obiectelor.

START

a, b

NU a > b DA

Afiseaza

Suma

Afiseaza

a > b

Afiseaza

a < b

S = a + b

STOP

PUC 2 – Îndrumator de lucrari de laborator Lucrari tip A

9

Varianta II-a: numerele se citesc cu functia InputBox, iar mesajul privind numerele se

afiseaza cu proprietatea Caption a obiectului Label. Veti deduce din codul sursa, denumirile

obiectelor. Interfata se va modifica si ea: nu mai e nevoie de textbox-urile de introducere a

celor doua numere

Salvarea proiectului:

Pentru salvarea proiectului trebuie sa cream un director al acestuia. Creati directorul:

My Documents / PUC2 / Lucrarea x,

în care veti salva fisierele Lucrarea_x.vbp si Lucrarea_x.frm (proiectul si formularul).