Vb

169
Καθ.:Μίλτος Χαρι λάου 1 Visual Basic Visual Basic

description

Visual Basic

Transcript of Vb

Page 1: Vb

Καθ.:Μίλτος Χαριλάου 1

Visual BasicVisual Basic

Page 2: Vb

Καθ.:Μίλτος Χαριλάου 2

Ιδιότητες Name, Caption, Text, Backcolor, Font,Top, Left, Border Style, Autosize, Multiline, ScrollBar

Εργαλείο Ετικέτας - Label

Φόρμα - Form

Περιβάλλον της Visual Basic

Εργαλειοθήκη - ToolBox Παράθυρο Ιδιοτήτων - Properties Windows

Ενεργοποίηση της Visual Basic

Πλαίσιο Κειμένου - Text Box Κουμπί Διαταγής – Command Button

Page 3: Vb

Καθ.:Μίλτος Χαριλάου 3

Design Mode, Run Mode

Αρχεία που δημιουργούνται με την αποθήκευση

Αποθήκευση Εργασίας

Εντολή Εκχώρησης - Assignment

Συγγραφή προγράμματος ενός αντικειμένου Μεταβλητές - Variables Σταθερές - Constants

Συνάρτηση Val()

Γεγονός Εκτέλεσης - Event Παράθυρο προγραμματισμού (Code)

Page 4: Vb

Καθ.:Μίλτος Χαριλάου 4

Ενεργοποίηση της Visual Basic

Start

Programs

Microsoft Visual studio 6.0

Microsoft Visual Basic 6.0

Page 5: Vb

Καθ.:Μίλτος Χαριλάου 5

New

Standard.Exe

Open

Το παράθυρο διαλόγου New Project του Project Wizard

Page 6: Vb

Καθ.:Μίλτος Χαριλάου 6

Βασικά στοιχεία περιβάλλοντος της Visual Basic

Γραμμή Τίτλου(Title bar)

Γρ. Εργαλείων(Tool Bar)

Γραμμή Μενού(Menu Bar)

Φόρμα(Form)

Εργαλειοθήκη(ToolBox)

ΕξερεύνησηΕργου(Project Explorer)

ΠαράθυροΙδιοτήτων(Properties Window)

ΠαράθυροΔιάταξηςΦόρμας(Form Layout)

Page 7: Vb

Καθ.:Μίλτος Χαριλάου 7

Εμφάνιση στοιχείων του περιβάλλοντος

Φόρμα (Form Layout)

Παράθυρο Ιδιοτήτων (Properties Window)

Εξερεύνηση Εργου (Project Explorer)

Εργαλειοθήκη (ToolBox)

Γραμμή Εργαλείων (ToolBar)

Page 8: Vb

Καθ.:Μίλτος Χαριλάου 8

Φόρμα - FormΕίναι το βασικότερο συστατικό μίας εργασίας στη Visual Basic. Μία Εργασία μπορεί να αποτελείται από πολλές φόρμες

View / Object

Page 9: Vb

Καθ.:Μίλτος Χαριλάου 9

Εργαλειοθήκη - ToolBoxΑποτελείται από διάφορα Χειριστήρια τα οποία μπορούμε να χρησιμοποιήσουμε για να δημιουργήσουμε τα Αντικείμενα πάνω στη φόρμα

View / ToolBox

ΧειριστήριοCommand Button

Page 10: Vb

Καθ.:Μίλτος Χαριλάου 10

Παράθυρο ιδιοτήτων – properties WindowΔίνει τη δυνατότητα να αλλάξουμε τις τιμές των ιδιοτήτων μιας φόρμας και των αντικειμένων της.

View / properties window

Πλαίσιο επιλογής αντικειμένου

Ιδιότητες Τιμές ιδιοτήτων

Page 11: Vb

Καθ.:Μίλτος Χαριλάου 11

Παράθυρο διάταξης φόρμαςForm Layout Window

Δείχνει πώς θα φαίνεται η φόρμα πάνω στην οθόνη, κατά το χρόνο της εκτέλεσης της εργασίας

View / Form Layout

Page 12: Vb

Καθ.:Μίλτος Χαριλάου 12

Εργαλείο Ετικέτας - Label

Label

Είναι το εργαλείο που χρησιμοποιείται για να δημιουργήσουμε μία ετικέτα ή να γράψουμε ένα μήνυμα ή ένα αποτέλεσμα

Double click

Page 13: Vb

Καθ.:Μίλτος Χαριλάου 13

Πλαίσιο Κειμένου - Text BoxΕίναι το εργαλείο το οποίο χρησιμεύει στην εισαγωγή δεδομένων , από το χρήστη, στο Run Mode

Ιδιότητα Text

Double Click

Page 14: Vb

Καθ.:Μίλτος Χαριλάου 14

Κουμπί Διαταγής – Command ButtonΕίναι το εργαλείο το οποίο χρησιμεύει για την συγγραφή και εκτέλεση εντολών

Ιδιότητα Caption

Double Click

Page 15: Vb

Καθ.:Μίλτος Χαριλάου 15

Ιδιότητα Name

Είναι η ιδιότητα η οποία καθορίζει το όνομα, ενός αντικειμένου, που χρησιμοποιείται στο προγραμματισμό του. Το όνομα αυτό πρέπει να είναι γραμμένο με συνεχόμενους λατινικούς χαρακτήρες. Τα τρία πρώτα γράμματα πρέπει να είναι συντομογραφία του τύπου του αντικειμένου ( lblMessage)

Page 16: Vb

Καθ.:Μίλτος Χαριλάου 16

Ιδιότητα Caption

Caption

Είναι η ιδιότητα η οποία καθορίζει τον τίτλο, το όνομα που φαίνεται πάνω σε ένα αντικείμενο

Propertieswindow

Page 17: Vb

Καθ.:Μίλτος Χαριλάου 17

Ιδιότητα Text

Είναι η ιδιότητα η οποία φαίνεται πάνω στο αντικείμενο. Μπορεί να την αλλάξει ο χρήστης μέσα στο Run Mode

Properties Windows

Page 18: Vb

Καθ.:Μίλτος Χαριλάου 18

Ιδιότητα Border style

Η ιδιότητα κατά την οποία αλλάζει η εμφάνιση του αντικειμένου.

Border style None

Page 19: Vb

Καθ.:Μίλτος Χαριλάου 19

Ιδιότητα Backcolor

Είναι η ιδιότητα η οποία καθορίζει το χρώμα που θα έχει το φόντο ενός αντικειμένου

Propertieswindow

Page 20: Vb

Καθ.:Μίλτος Χαριλάου 20

Ιδιότητα Backcolor

Palette

Page 21: Vb

Καθ.:Μίλτος Χαριλάου 21

Top Φόρμας

Top αντικειμένου

Left Φόρμας

Left αντικειμένου

Ιδιότητες Top, Left

Left - Απόσταση από το αριστερό άκρο της φόρμας ή της οθόνης

TOP - Απόσταση από το πάνω άκρο της φόρμας ή της οθόνης

Page 22: Vb

Καθ.:Μίλτος Χαριλάου 22

Ιδιότητα Font

Ιδιότητα κατά την οποία διαμορφώνουμε τις λεζάντεςτων αντικειμένων ( Bold, italic, underline)

Page 23: Vb

Καθ.:Μίλτος Χαριλάου 23

Ιδιότητα autosize

Ιδιότητα κατά την το αντικείμενο Label μεγαλώνει όσο χρειάζεται για να εμφανιστεί όλη η λεζάντα

Label1.autosize = true

Page 24: Vb

Καθ.:Μίλτος Χαριλάου 24

Ιδιότητα Multiline, scrollbar

Οι ιδιότητες οι οποίες ρυθμίζονται σε true και false , αντίστοιχα, όταν το Text Box περιέχει κείμενο

Multiline true

Scrollbar Both

Page 25: Vb

Καθ.:Μίλτος Χαριλάου 25

Παράθυρο προγραμματισμού (Code)Είναι το παράθυρο μέσα στο οποίο μπορούμε να προγραμματίσουμε τη φόρμα η τα αντικείμενα.

Περιοχή Συγγραφής προγράμματος

Πλαίσιο Επιλογήςαντικειμένου

Πλαίσιο Επιλογήςγεγονότος

Page 26: Vb

Καθ.:Μίλτος Χαριλάου 26

Συγγραφή προγράμματος ενός αντικειμένου

Επικεφαλίδαπρογράμματος

Τέλοςπρογράμματος

Εντολέςπρογράμματος

View / Code

Page 27: Vb

Καθ.:Μίλτος Χαριλάου 27

Εντολή Εκχώρησης - AssignmentΕίναι η εντολή η οποία χρησιμοποιείται για να δώσει ή να αλλάξει την τιμή μιας μεταβλητής ή μιας ιδιότητας

Α μέρος = Β μέρος

Ιδιότητα η μεταβλητή

Τιμή

Σύμβολο εκχώρησης

Το Β μέρος αποθηκεύεται στο Α μέρος

Page 28: Vb

Καθ.:Μίλτος Χαριλάου 28

Αλλαγή ιδιοτήτων κατά την εκτέλεση ενός προγράμματος

lblMessage . Caption = "Hello Word"

Name.Ιδιότητα = νέα τιμή

Form1 . BackColor = QBColor(1)

Name Ιδιότητα Νέα τιμή

Page 29: Vb

Καθ.:Μίλτος Χαριλάου 29

Συνάρτηση Val()Είναι η συνάρτηση κατά την οποία τα αλφαριθμητικά δεδομένα ενός text box μετατρέπονται σε αριθμητικά έτσι ώστε να μπορέσουν να υποστούν μία αριθμητική πράξη.

text3.text = text1.text+text2.text

Run Mode

Page 30: Vb

Καθ.:Μίλτος Χαριλάου 30

Συνάρτηση Val() (συνέχεια)

text3.text = Val(text1.text)+Val(text2.text)

Run Mode

Page 31: Vb

Καθ.:Μίλτος Χαριλάου 31

ΜΕΤΑΒΛΗΤΕΣ ΚΑΙ ΣΤΑΘΕΡΕΣ

Μεταβλητές (variables) είναι θέσεις μνήμης, οι οποίες περιέχουν δεδομένα τα οποία αλλάζουν κατά την εκτέλεση του προγράμματος. Συνήθως στις μεταβλητές αποθηκεύουμε τα περιεχόμενα των Text Box. Σταθερές (constants) είναι θέσεις μνήμης , οι οποίες περιέχουν δεδομένα τα οποία δεν αλλάζουν κατά την εκτέλεση του προγράμματος.

689688687

686685684

Μνήμη RAMΔιεύθυνση μνήμης

Θέση μνήμης

Page 32: Vb

Καθ.:Μίλτος Χαριλάου 32

Το όνομα αποτελείται από 1 – 256 συνεχόμενους λατινικούς χαρακτήρες.Αρχίζει πάντα από γράμμα αλλά μπορεί να περιέχει και αριθμούςΑπαγορεύετε η χρήση συμβόλων όπως \, -,#,$, /, .

Αν αποτελείται από δύο λέξεις πρέπει να χωρίζονται όχι με Space αλλά ως εξής: Net_Salary

Απαγορεύεται η χρήση δεσμευμένων λέξεων όπως Caption.

Κανόνες ονομασίας μεταβλητών και σταθερών

ΜΕΤΑΒΛΗΤΕΣ ΚΑΙ ΣΤΑΘΕΡΕΣΟταν θα δηλωθεί μία μεταβλητή ή μία σταθερά, η Visual Basic κρατεί ένα χώρο στη μνήμη, στον οποίο δίνει ένα όνομα. Το όνομα αυτό ονομάζεται αναγνωριστικό (Identifier). Τα ονόματα των αναγνωριστικών θα πρέπει να προσδιορίζονται σύμφωνα με τους κανόνες της VB.

Page 33: Vb

Καθ.:Μίλτος Χαριλάου 33

ΔεδομέναΤύπος Δεδομένου

Boolean Αληθής ή Ψευδής

Currency Πραγματικός αριθμός

Integer Ακέραιος αριθμός (-32,768 μέχρι 32,768)

Long Μεγάλος ακέραιος αριθμός (10 ψηφία)

String Αλφαριθμητικά δεδομένα

Τύπος δεδομένων μεταβλητών

Page 34: Vb

Καθ.:Μίλτος Χαριλάου 34

Κανόνες ονομασίας μεταβλητών στη Visual Basic

Το πρώτο γράμμα αρχίζει με συντομογραφία του τύπου δεδομένων

και το υπόλοιπο όνομα αρχίζει με κεφαλαίο και έχει σχέση με το περιεχόμενο το οποίο θα αποθηκεύσει.

Stringst

Integeri

Currencyc

Booleanb

ΤΥΠΟΣ ΔΕΔΟΜΕΝΩΝΣΥΝΤΟΜΟΓΡΑΦΙΑ

Page 35: Vb

Καθ.:Μίλτος Χαριλάου 35

ΔΕΔΟΜΕΝΑ Όνομα ενός υπαλλήλου

Ώρες εργασίας

Αριθμός

Ποσότητα

Ποσοστό φορολογίας

ΜΕΤΑΒΛΗΤΕΣ

stName

cHours_Worked

iNumber

cquantity

cTax_RATE

ΠΑΡΑΔΕΙΓΜΑΤΑ ΑΝΑΓΝΩΡΙΣΤΙΚΩΝ

ΜΕΤΑΒΛΗΤΩΝ

Page 36: Vb

Καθ.:Μίλτος Χαριλάου 36

Για τη δήλωση μεταβλητών χρησιμοποιείται ο πιο κάτω τύπος:

ΔΗΛΩΣΗ ΜΕΤΑΒΛΗΤΩΝ

Dim Identifier As Datatype

Π.χ

Dim stName As String

Dim iΝumber As Integer

Dim cQuantity As Currency

Δεσμευμένηλέξη

ΌνομαΜεταβλητής

ΤύποςΜεταβλητής

Page 37: Vb

Καθ.:Μίλτος Χαριλάου 37

Για τη δήλωση σταθερών χρησιμοποιείται ο πιο κάτω τύπος:

ΔΗΛΩΣΗ ΣΤΑΘΕΡΩΝ

Const Identifier As Datatype = Value

Π.χ

Const stComany_name As String = ‘ABC Imports Ltd’

Const cSales_tax As Currency = 0.10

Const cPi As Currency = 3.14

Δεσμευμένηλέξη

ΌνομαΣταθεράς

ΤύποςΣταθεράς

ΤιμήΣταθεράς

Page 38: Vb

Καθ.:Μίλτος Χαριλάου 38

ΑΡΙΘΜΗΤΙΚΕΣ ΠΡΑΞΕΙΣ

Πρόσθεση

Αφαίρεση

+

-

4

Πολλαπλασ.

Διαίρεση

*

/

3

Δύναμη^2

Παρένθεση( )1

ΠράξηΤελεστήςΠροτεραιότητα

14 + 5 * 2 / ( 10 - 2^3) – 3 * 5 = 1 4 +10 / 2 – 15 = 14 + 5 – 15 = 4

Page 39: Vb

Καθ.:Μίλτος Χαριλάου 39

Label1

Label2

Label3

Label4

cmdSubtract

cmdAddition

cmdDivision

cmdMultiply

cmdExit

cmdClear

lblResult

txtSecond

txtFirst

ΠΑΡΑΔΕΙΓΜΑ

Page 40: Vb

Καθ.:Μίλτος Χαριλάου 40

ΘΑ ΔΗΜΙΟΥΡΓΗΣΟΥΜΕ ΤΡΕΙΣ ΜΕΤΑΒΛΗΤΕΣ

Για το κουμπί της πρόσθεσης

cNum1……………..Αποθηκεύει...........Text1 cNum1 = Val( txtFirst.Text )

cNum2…………….. Αποθηκεύει...........Text2

cResult…………… Αποθηκεύει...........Text1+text2

cNum2 = Val( txtSecond.Text )

cResult = cNum1 + cNum2

Tο αποτέλεσμα θα εμφανιστεί μέσα στο Label4 ( lblResult ) με τη παρακάτω εντολή:

lblResult . caption = cResult

Page 41: Vb

Καθ.:Μίλτος Χαριλάου 41

Κατάσταση σχεδιασμού έργου - Design Mode

Είναι το περιβάλλον της Visual Basic στο οποίο ο προγραμματιστής δημιουργεί το έργο

Κατάσταση εκτέλεσης έργου - Run ModeΕίναι το περιβάλλον της Visual Basic στο οποίο εκτελείται το έργο από το χρήστη.

Μετακίνηση Design Mode από σε Run Mode

F5 ( Keyboard ) Run / Start ( Menu Bar ) ( ToolBar )

Page 42: Vb

Καθ.:Μίλτος Χαριλάου 42

Αποθήκευση έργου

File / Save Project ( Menu Bar )

( ToolBar )

Αποθήκευση Φόρμας Αποθήκευση Έργου

Page 43: Vb

Καθ.:Μίλτος Χαριλάου 43

Αρχεία τα οποία δημιουργούνται με την αποθήκευση

Αρχείο Φόρμας ( . frm )

Αρχείο Project ( . vbp )

Αρχείο workspace ( . vbw )

Page 44: Vb

Καθ.:Μίλτος Χαριλάου 44

Άνοιγμα αρχείου της Visual Basic

Χρήση εικονιδίου Project

Page 45: Vb

Καθ.:Μίλτος Χαριλάου 45

Άνοιγμα αρχείου της Visual Basic

Χρήση Menu Bar

Open / Project

Page 46: Vb

Καθ.:Μίλτος Χαριλάου 46

Εκτέλεση Φύλλου Εργασίας 1 στον Η.Υ

Εκτέλεση Ασκήσεων 1 και 2

Page 47: Vb

Καθ.:Μίλτος Χαριλάου 47

Αλγόριθμοι - Λογικά Διαγράμματα

Στάδια για την λύση ενός προβλήματος με την βοήθεια του Η.Υ.

Page 48: Vb

Καθ.:Μίλτος Χαριλάου 48

ΣΤΑΔΙΑ ΓΙΑ ΤΗ ΛΥΣΗ ΕΝΟΣ ΠΡΟΒΛΗΜΑΤΟΣ ΜΕ ΤΗ ΒΟΗΘΕΙΑ Η.Υ

ΚΑΘΟΡΙΣΜΟΣ ΔΕΔΟΜΕΝΩΝ ΚΑΙ ΖΗΤΟΥΜΕΝΩΝ

ΜΕΘΟΔΟΙ ΕΠΕΞΕΡΓΑΣΙΑΣ

ΣΥΝΤΑΞΗ ΑΛΓΟΡΙΘΜΟΥ

Page 49: Vb

Καθ.:Μίλτος Χαριλάου 49

ΓΕΝΙΚΑ ΠΕΡΙ ΠΡΟΓΡΑΜΜΑΤΙΣΜΟΥ

ΚΩΔΙΚΟΠΟΙΗΣΗ

ΕΛΕΓΧΟΣ ΑΠΟΤΕΛΕΣΜΑΤΩΝ

ΑΞΙΟΛΟΓΗΣΗ

Page 50: Vb

Καθ.:Μίλτος Χαριλάου 50

ΑΛΓΟΡΙΘΜΟΙ

ΑΛΓΟΡΙΘΜΟΣ ΕΙΝΑΙ ΜΙΑΣΕΙΡΑ ΑΠΟ ΟΔΗΓΙΕΣ

ΣΕ ΛΟΓΙΚΗ ΣΕΙΡΑ ΓΙΑ ΤΗ ΛΥΣΗ ΕΝΟΣ ΠΡΟΒΛΗΜΑΤΟΣ.

Page 51: Vb

Καθ.:Μίλτος Χαριλάου 51

ΟΙ ΟΔΗΓΙΕΣ ΜΠΟΡΟΥΝ ΝΑ ΔΟΘΟΥΝΑ) ΣΕ ΛΕΚΤΙΚΗ ΜΟΡΦΗ

(ΨΕΥΔΟΚΩΔΙΚΑΣ)

Β) ΣΕ ΣΧΗΜΑΤΙΚΗ ΜΟΡΦΗ (ΛΟΓΙΚΑ ΔΙΑΓΡΑΜΜΑΤΑ).

ΑΛΓΟΡΙΘΜΟΙΑΛΓΟΡΙΘΜΟΙ

Page 52: Vb

Καθ.:Μίλτος Χαριλάου 52

ΛΟΓΙΚΑ ΔΙΑΓΡΑΜΜΑΤΑ

ΑΡΧΗ / ΤΕΛΟΣ

ΕΠΕΞΕΡΓΑΣΙΑ

ΓΕΩΜΕΤΡΙΚΑ ΣΧΗΜΑΤΑ ΑΛΓΟΡΙΘΜΩΝ

Page 53: Vb

Καθ.:Μίλτος Χαριλάου 53

ΕΚΤΕΛΕΣΗ ΥΠΟΠΡΟΓΡΑΜΜΑΤΟΣ

ΕΙΣΟΔΟΣ / ΕΞΟΔΟΣ ΠΛΗΡΟΦΟΡΙΩΝ / ΔΕΔΟΜΕΝΩΝ

ΛΟΓΙΚΑ ΔΙΑΓΡΑΜΜΑΤΑΛΟΓΙΚΑ ΔΙΑΓΡΑΜΜΑΤΑ

Page 54: Vb

Καθ.:Μίλτος Χαριλάου 54

ΛΟΓΙΚΑ ΔΙΑΓΡΑΜΜΑΤΑ

ΕΛΕΓΧΟΣ ΣΥΝΘΗΚΗΣ

ΣΥΝΔΕΣΜΟΣ

ΡΟΗ ΠΛΗΡΟΦΟΡΙΩΝ

Page 55: Vb

Καθ.:Μίλτος Χαριλάου 55

askiseis_logika_diagrams_1.ppt

Page 56: Vb

Καθ.:Μίλτος Χαριλάου 56

Υπάρχουν προβλήματα τα οποία για να λυθούν απαιτείται η λήψη αποφάσεων, με βάση μία ή περισσότερες συνθήκες.

Page 57: Vb

Καθ.:Μίλτος Χαριλάου 57

Δομή διακλάδωσης

Χρήση της εντολής

Ένθετη Δομή διακλάδωσης (nested)

Παραδείγματα.

If / Then / Else / End If

If / Then / Elseif / End If

Page 58: Vb

Καθ.:Μίλτος Χαριλάου 58

Δομή διακλάδωσηςΤύπος Α

If <Συνθήκη> Then<Διαδικασία 1>

Else<Διαδικασία 2>

End If<Επόμενη εντολή>

Συνθήκη

Επόμενη εντολή

ψευδής αληθής

Διαδικασία 2 Διαδικασία 1

Λογικό Διάγραμμα Πρόγραμμα στη Visual Basic

Page 59: Vb

Καθ.:Μίλτος Χαριλάου 59

Δομή διακλάδωσηςΤύπος Β

If <Συνθήκη> Then<Διαδικασία 1>

End If<Επόμενη εντολή>

Λογικό Διάγραμμα Πρόγραμμα στη Visual Basic

Συνθήκη

Επόμενη εντολή

ψευδής

αληθής

Διαδικασία 1

Page 60: Vb

Καθ.:Μίλτος Χαριλάου 60

Συνθήκη: μπορεί να είναι μία μεταβλητή τύπου Boolean η μία παράσταση της οποίας η τιμή να είναι Αληθής (True) ή Ψευδής (False). Η συνθήκη μπορεί να είναι απλή η σύνθετη.

Διαδικασία: είναι μία η περισσότερες εντολές που εκτελούνται μετά από τον έλεγχο μίας συνθήκης

Συνθήκη / Διαδικασία

Page 61: Vb

Καθ.:Μίλτος Χαριλάου 61

Συνθήκη Συνθήκη με μεταβλητή

Παραδείγματα:

Συνθήκη με παράσταση

Παραδείγματα:

If bStock = True Then

If bStock Then

If iAge>18 Then

If stName=“Μαρία” Then

Page 62: Vb

Καθ.:Μίλτος Χαριλάου 62

=><<=>=>=<>

Για τη δημιουργία μίας παράστασης χρησιμοποιούνται οι παρακάτω τελεστές:

bAns = trueiAmount > 5000cVote < 9.33iCount <= 100cAverage >= cMesosiNum1 >= iNum2stFirma <> “Reebok”

Τελεστές Συνθήκες

Συνθήκη με παράσταση

Page 63: Vb

Καθ.:Μίλτος Χαριλάου 63

Σύνθετη Συνθήκη: Είναι η συνθήκη η οποία αποτελείται από δύο η περισσότερες παραστάσεις οι οποίες συνδέονται μεταξύ τους με τους Λογικούς Τελεστές AND, OR, NOT

OR – Η συνθήκη είναι True όταν έστω και μία παράσταση είναι True

AND – Η συνθήκη είναι True όταν είναι και οι δύο παραστάσεις True

NOT – Οταν η συνθήκη ή η παράσταση είναι True τότε θα γίνει False και αντίθετα

Page 64: Vb

Καθ.:Μίλτος Χαριλάου 64

Πίνακας Λογικών πράξεων

TrueFalseFalseFalseFalse

TrueTrueFalseTrueFalse

FalseTrueFalseFalseTrue

FalseTrueTrueTrueTrue

NOT(Παρ.1)ORANDΠαράσταση2Παράσταση1

Παραδείγματα

(cAge < 18) AND (height >160)(stTeam = “Αμμόχωστος”) OR (stTeam = “Famagusta”)NOT( stAns = “Yes”)

Page 65: Vb

Καθ.:Μίλτος Χαριλάου 65

Προτεραιότητα Λογικών Τελεστών

1 NOT 2 AND3 OR

Πχ. True AND False OR NOT(True)F

F

F

True OR False AND NOT(True)F

F

T

(= False)

(= True)

Page 66: Vb

Καθ.:Μίλτος Χαριλάου 66

Ένθετη Δομή (nested)

If <Συνθήκη1> Then

<Διαδικασία1>

ElseIf <Συνθήκη2> Then

<Διαδικασία2>

Else <Διαδικασία3>

End If

<Επόμενη εντολή>

Λογικό Διάγραμμα Πρόγραμμα στη Visual Basic

Συνθήκη1

Επόμενη εντολή

ψευδής

αληθής

Διαδικασία 2

Διαδικασία 1

Συνθήκη2

αληθής

ψευδής

Διαδικασία 3

Page 67: Vb

Καθ.:Μίλτος Χαριλάου 67

iFirst = iSecond False

iThird < 0 True

iSecond > iFirst False

iThird <= iSecond True

iFirst >= 5 True

iFirst <> iThird True

Σύγκριση αριθμητικών μεταβλητών και σταθερών

iFirst = 5, iSecond = 4, iThird = -5

Συνθήκη Τιμή

Page 68: Vb

Καθ.:Μίλτος Χαριλάου 68

Private Sub cmdColor_Click() Dim iColor As Integer iColor = val(txtColor.Text) If iColor >= 0 And iColor <= 15 Then Form1.BackColor = QBColor(iColor) lblMessage.BackColor = QBColor(iColor) lblError.Visible = False Else lblError.Visible = True End IfEnd Sub

Παράδειγμα

Παράδειγμα

Page 69: Vb

Καθ.:Μίλτος Χαριλάου 69

Περιπτωσιακή δομή (Δομή Πολλαπλής Επιλογής)

Έκφραση Επιλογής

(Μεταβλητή)

Τιμή Α Τιμή Β Τιμή Γ..Ζ Τιμή Η..Ν Αλλιώς

Εντολές Εντολές Εντολές Εντολές Εντολές

Επόμενη Εντολή

Page 70: Vb

Καθ.:Μίλτος Χαριλάου 70

Εντολή Select Case / End Select

Select Case <Μεταβλητή>

Case <Τιμή 1>

<Διαδικασία 1>

Case <Τιμή 2>

<Διαδικασία 2>

:

Case Else

<Διαδικασία Ν>

End Select

Page 71: Vb

Καθ.:Μίλτος Χαριλάου 71

Παράδειγμα Περιπτωσιακής ΔομήςSelect Case ivathmos

Case 1,2,3,4,5,6,7,8,9

Msgbox ¨Επίδοση Κακή!¨

Case 10 Το 12

Msgbox ¨Επίδοση Μέτρια!¨

Case Is >= 13 And ivathmos <= 15

Msgbox ¨Επίδοση Καλή!¨

:

Case Else

Msgbox ¨Λάθος βαθμός!¨

End Select

Page 72: Vb

Καθ.:Μίλτος Χαριλάου 72

Παράθυρο Μηνυμάτων (Συνάρτηση) MsgBox

Συνάρτηση IsNumeric

Page 73: Vb

Καθ.:Μίλτος Χαριλάου 73

Το παράθυρο μηνυμάτων (συνάρτηση) MsgBox μπορεί να χρησιμοποιηθεί για να παρουσιαστεί κάποιο μήνυμα προς τον χρήστη.

Παράθυρο Μηνυμάτων (Συνάρτηση) MsgBox

Παράδειγμα:

MsgBox “Ο βαθμός να είναι από το 1 μέχρι το 20”

Page 74: Vb

Καθ.:Μίλτος Χαριλάου 74

Η συνάρτηση IsNumeric ελέγχει την τιμή που θα βάλει ο χρήστης σε ένα TextBox αν είναι αριθμός (και όχι γράμματα) ώστε να μπορεί να χρησιμοποιηθεί σε υπολογισμούς, αφού πρώτα μετατραπεί η τιμή από αλφαριθμητική σε αριθμητική. Η συνάρτηση αυτή βοηθά στο να αποφεύγονται προβλήματα στις διαδικασίες οι οποίες περιέχουν υπολογισμούς.

Συνάρτηση IsNumeric

Page 75: Vb

Καθ.:Μίλτος Χαριλάου 75

If IsNumeric(txtKivismos.text) then

cKivismos = Val(txtKivismos.text)

Else

MsgBox “Λάθος. Ο κυβισμός πρέπει να είναι αριθμός”

End if

Συνάρτηση IsNumeric (Συνέχεια)

Παράδειγμα

Page 76: Vb

Καθ.:Μίλτος Χαριλάου 76

1. Εκτέλεση Φύλλου Εργασίας 2 στον Η.Υ

2. Εκτέλεση Ασκήσεων 1, 2, 3, 4, 5

3. Arithmitikes_Logikes_Praxeis

4. Askiseis_domi_diakladosis.doc

5. Askiseis_entheti_domi_diakladosis.doc

Page 77: Vb

Καθ.:Μίλτος Χαριλάου 77

Εντολή Επανάληψης For / Next

Συνάρτηση InputBox

Page 78: Vb

Καθ.:Μίλτος Χαριλάου 78

Λογικό Διάγραμμα

For I=A.T To T.T

<Εντολές επανάληψης>

Next I

<Επόμενη εντολή>

Εντολή στην Visual Basic

Εντολή Επανάληψης For / Next

Αληθής

Ψευδής

Ι<=Τ.Τ

Εντολές επανάληψης

Επόμενη εντολή

I Α.Τ

Ι Ι+1

Page 79: Vb

Καθ.:Μίλτος Χαριλάου 79

H μεταβλητή Ι παίρνει μία Αρχική τιμή (Α.Τ) και ελέγχεται αν η τιμή αυτή είναι μικρότερη ή ίση από την Τελική Τιμή (Τ.Τ).

Αν αυτό ισχύει τότε εκτελούνται οι εντολές της επανάληψης και αυτόματα το Ι αυξάνεται κατά μία μονάδα. Αυτό επαναλαμβάνεται μέχρις ότου το Ι να πάρει τιμή μεγαλύτερη από την Τ.Τ

Οι βρόγχοι FOR….NEXT

Page 80: Vb

Καθ.:Μίλτος Χαριλάου 80

Παράδειγμα 1

Να σχεδιάσετε ένα λογικό διάγραμμα και να γράψετε το πρόγραμμα στη Visual Basic όπου θα προσθέτει τους αριθμούς από το 1 μέχρι το 10 και θα παρουσιάζει το άθροισμα τους. (Να χρησιμοποιηθεί το μήνυμα : ‘Το άθροισμα των αριθμών από το 1 μέχρι το 10 : ’

Page 81: Vb

Καθ.:Μίλτος Χαριλάου 81

Λογικό Διάγραμμα

iSum = 0

For iMetritis=1 To 10

iSum = iSum + iMetritis

Next iMetritis

Print “Το άθροισμα είναι:” ; iSum

Κωδικός στην Visual Basic

Εντολή Επανάληψης For / Next

Αληθής

Ψευδής

iMetritis <=10

iSum iSum + iMetritis

iMetritis 1iSum 0

iMetritis iMetritis + 1

Αρχή

Τέλος

Τύπωσε iSum

Page 82: Vb

Καθ.:Μίλτος Χαριλάου 82

Συνάρτηση InputBoxΣυνάρτηση είναι μία εντολή (μικρό πρόγραμμα) που εκτελεί κάποια σημαντική εργασία και στη συνέχεια επιστρέφει στο κυρίως πρόγραμμα (εκεί που έχει καλεστεί), ένα αποτέλεσμα.

Η συνάρτηση InputBox εμφανίζει ένα διαλογικό παράθυρο που

περιέχει ένα πλαίσιο κειμένου και δύο πλήκτρα διαταγής, το ok και

το Cancel. Ο χρήστης πρέπει να συμπληρώσει το πλαίσιο κειμένου και να κάνει κλικ σε ένα από τα δύο πλήκτρα. Η τιμή που επιστρέφει η συνάρτηση με επιλογή ok είναι ακριβώς το περιεχόμενο του πλαισίου κειμένου, ενώ η επιλογή του πλήκτρου Cancel επιστρέφει τη μηδενική συμβολοσειρά (“”). Η γενική

μορφή της συνάρτησης InputBox είναι:

InputBox(μήνυμα, τίτλος, προεπιλογή, x, y)

Η μόνη υποχρεωτική παράμετρος είναι το μήνυμα.

Καθοδηγητικό κείμενο

Τίτλος

παραθύρου Προκαθορισμένη

Απάντηση

Συντεταγμένες

Μηνύματος

Page 83: Vb

Καθ.:Μίλτος Χαριλάου 83

Παράδειγμα

ΔιαλογικόΠαράθυροInputBox

Page 84: Vb

Καθ.:Μίλτος Χαριλάου 84

1. Εκτέλεση Φύλλου Εργασίας 3 στον Η.Υ

2. Εκτέλεση Ασκήσεων 1, 2, 3

Page 85: Vb

Καθ.:Μίλτος Χαριλάου 85

Δημιουργία αντικειμένου τύπου Shape στη Visual Basic.

Ιδιότητες Shape, Top, Left.

Εντολή Do / While / Loop

Page 86: Vb

Καθ.:Μίλτος Χαριλάου 86

Αντικείμενο Τύπου Shape

Double Click

Page 87: Vb

Καθ.:Μίλτος Χαριλάου 87

Ιδιότητα ShapeΕπιλογή σχήματος

Page 88: Vb

Καθ.:Μίλτος Χαριλάου 88

Top Φόρμας

Top αντικειμένου

Left Φόρμας

Left αντικειμένου

Ιδιότητες Top, LeftΑπόσταση από το πάνω και αριστερό άκρο της φόρμας η της οθόνης

Page 89: Vb

Καθ.:Μίλτος Χαριλάου 89

Μετακίνηση αντικειμένων στην οθόνη: Με αλλαγή των ιδιοτήτων

Left και Top στο παράθυρο

ιδιοτήτων (Designe Mode)

Αλλαγή κατά την εκτέλεση προγράμματος (Run Mode)

Private Sub Form_Load()

Form1.Left = Form1.Left + 100

Form1.Top = Form1.Top + 300

Shape1.Top = Shape1.Top + 100

Shape1.Left = Shape1.Left + 200

End Sub

Page 90: Vb

Καθ.:Μίλτος Χαριλάου 90

Επαναληπτική δομή

Έλεγχοςτης

συνθήκης

Εντολές επανάληψης

Επόμενηεντολή

Λογικό Διάγραμμα

Do While <Συνθήκη>

<Εντολές επανάληψης>

Loop

<Επόμενη εντολή>

Εντολή στην Visual Baic

Ψευδής

Page 91: Vb

Καθ.:Μίλτος Χαριλάου 91

Οι βρόγχοι Do While -Loop

Οι βρόγχοι Do While δεν κάνουν τίποτε αν δεν ελέγξουν προηγουμένως αν είναι αληθής κάποια συνθήκη. Αν η συνθήκη είναι αληθής, ο βρόγχος Do While εκτελεί τις εντολές επανάληψης. Αλλιώς, το πρόγραμμα της Visual Basic θα προχωρήσει στην επόμενη εντολή.

Page 92: Vb

Καθ.:Μίλτος Χαριλάου 92

Η συνθήκη είναι μία παράσταση της οποίας η τιμή είναι True η False. Μπορεί να είναι απλή η σύνθετη.

isum_peritton = 0

iCount = 1

Do While (iCount >= 1) and (iCount <= 15)

iSum_peritton = isum_peritton + iCount

iCount = iCount + 2

Loop

Lblapotelesma.caption = iSum_peritton

Παράδειγμα1

Page 93: Vb

Καθ.:Μίλτος Χαριλάου 93

Dim iCount As Integer

iCount = 1

Do while iCount < 8

shpMove.Left = shpMove.left + 300

shpMove.Top = shpMove.Top + 300

iCount = iCount + 1

Loop

Παράδειγμα2 Παράδειγμα1

Page 94: Vb

Καθ.:Μίλτος Χαριλάου 94

1. Εκτέλεση Φύλλου Εργασίας 4 στον Η.Υ

2. Εκτέλεση Ασκήσεων 1, 2, 3, 4, 5

Page 95: Vb

Καθ.:Μίλτος Χαριλάου 95

Για τον τελικό έλεγχο του αλγόριθμου, πριν από την κωδικοποίηση και εκτέλεση του σε Η.Υ., καθώς επίσης τον έλεγχο του προγράμματος ή μέρος του προγράμματος μετά την κωδικοποίηση, χρησιμοποιείται η Προκαταρτική Εκτέλεση (Dry Run). Με αυτή ο προγραμματιστής εκτελεί βήμα προς βήμα τις εντολές, όπως θα τις εκτελούσε ο Η.Υ., και σημειώνει τις τιμές των μεταβλητών, των συνθηκών και των αποτελεσμάτων σε ένα πίνακα.

ΠΡΟΚΑΤΑΡΤΙΚΗ ΕΚΤΕΛΕΣΗ (Dry Run)

Page 96: Vb

Καθ.:Μίλτος Χαριλάου 96

Αρχή

iY 5

Τύπωσε iK

Τέλος

iX 3

iK iX + iY

ΠΡΟΚΑΤΑΡΤΙΚΗ ΕΚΤΕΛΕΣΗ (Dry Run) – Παράδειγμα 1

iΧ iY iΚ Αποτέλεσμα

3 5 8 8

Μεταβλητές

Page 97: Vb

Καθ.:Μίλτος Χαριλάου 97

Αρχή

iY 5

Τύπωσε iK

Τέλος

iX 3

iK iX + iY

ΠΡΟΚΑΤΑΡΤΙΚΗ ΕΚΤΕΛΕΣΗ (Dry Run) – Παράδειγμα 2

iΧ iY iΚ Αποτέλεσμα

3 5 6

iY iY - 2

3 6

Μεταβλητές

Page 98: Vb

Καθ.:Μίλτος Χαριλάου 98

iNum2iSum Αποτ.

3

iNum1 iNum2α) 10 7β) 5 13γ) 4 4

3, 10

13 18 18, 5

7

iNum1

10

Τέλος

iNum1 > iNum2ΑληθήςΨευδής

Τύπωσε iSum , iNum1

Αρχή

Τύπωσε ‘Δώστε δύο αριθμούς’

ΔιάβασεiNum1, iNum2

iSum = iNum1 - iNum2iSum = iNum1 + iNum2

5

4 4 8 8, 4

ΠΡΟΚΑΤΑΡΤΙΚΗ ΕΚΤΕΛΕΣΗ (Dry Run) – Παράδειγμα 3

Μεταβλητές Συνθήκη

Α/ΨiNum1>iNum2

10 > 7 Α

5 > 13

4 > 4

Ψ

Ψ

Δώστε δύο αριθμούς

Δώστε δύο αριθμούς

Δώστε δύο αριθμούς

Page 99: Vb

Καθ.:Μίλτος Χαριλάου 99

:

iX = 5

iY = 6

Do While iY >= 3

iX = iX + iY

iY = iY – 2

iK = iX

Loop

Lblapotelesma.caption = iK

:

ΠΡΟΚΑΤΑΡΤΙΚΗ ΕΚΤΕΛΕΣΗ (Dry Run) – Παράδειγμα 4

iΧ iY iΚ

5 6

11 4

Αποτέλεσμα

11

15 2 15 15

Μεταβλητές Συνθήκη

Α/ΨiY >= 3

6 >= 3

4 >= 3

2 >= 3

Α

Α

Ψ

Page 100: Vb

Καθ.:Μίλτος Χαριλάου 100

Εκτέλεση Φύλλου Εργασίας prokatartiki_algorith

Page 101: Vb

Καθ.:Μίλτος Χαριλάου 101

Χειριστήριο πλαισίου

Frame

Χειριστήριο πλαισίου ελέγχου

Check Box

Χειριστήριο κουμπιών ελέγχου

Option Buttons

Page 102: Vb

Καθ.:Μίλτος Χαριλάου 102

Παράδειγμα

Page 103: Vb

Καθ.:Μίλτος Χαριλάου 103

Page 104: Vb

Καθ.:Μίλτος Χαριλάου 104

Δίνει τη δυνατότητα στο χρήστη να επιλέξει η να ακυρώσει μία επιλογή. Συνήθως ομαδοποιούνται μέσα σε ένα Frame. Μπορούν να είναι ταυτόχρονα επιλεγμένα ένα ή περισσότερα αντικείμενα ελέγχου.

Πλαίσια Ελέγχου (Check Boxes)

Ιδιότητα Value

Value = 0 ( μη επιλεγμένο)

Value = 1 (επιλεγμένο)

Value = 2 ( απενεργοποιημένο)

Page 105: Vb

Καθ.:Μίλτος Χαριλάου 105

Δίνει τη δυνατότητα στο χρήστη να επιλέξει η να ακυρώσει μία επιλογή. Συνήθως ομαδοποιούνται μέσα σε ένα Frame. Μόνο ένα αντικείμενο μπορεί να είναι επιλεγμένο.

Κουμπιά Ελέγχου (Option Buttons)

Ιδιότητα Value

Value = False ( μη επιλεγμένο)

Value = True (επιλεγμένο)

Page 106: Vb

Καθ.:Μίλτος Χαριλάου 106

Χώροι ομαδοποίησης αντικειμένων (ως επί το πλείστο του ιδίου τύπου) που υπόκεινται στους ίδιους κανόνες.

Πλαίσια (Frames)

Page 107: Vb

Καθ.:Μίλτος Χαριλάου 107

lblMessage.Font.Italic = chkItalic.Value

lblMessage.ForeColor = vbBlue

Εντολές

optBlue.value = True

chkItalic.value = 1

Page 108: Vb

Καθ.:Μίλτος Χαριλάου 108

Ασκηση στο φύλλο εργασίας

Page 109: Vb

Καθ.:Μίλτος Χαριλάου 109

1. Εκτέλεση Φύλλου Εργασίας 5 στον Η.Υ

2. Εκτέλεση Ασκήσεων 1, 2

Page 110: Vb

Καθ.:Μίλτος Χαριλάου 110

Χειριστήριο πλαισίου καταλόγου

List Box

Περιπτωσιακή δομή (Select Case / End Select)

Χειριστήριο Σύνθετου Πλαισίου

Combo Box

Page 111: Vb

Καθ.:Μίλτος Χαριλάου 111

Δίνει τη δυνατότητα στο χρήστη να επιλέξει ένα στοιχείο μέσα σε ένα κατάλογο από στοιχεία.

Πλαίσιο Καταλόγου (List Box)

Ιδιότητα (List) Δίνει τη δυνατότητα στο χρήστη να συμπληρώσει τα στοιχεία του καταλόγου. Για να συμπληρώσουμε το επόμενο στοιχείο πατούμε τα πλήκτρα ENTER + CTRL

ENTER + CTRL

Page 112: Vb

Καθ.:Μίλτος Χαριλάου 112

Πλαίσιο Καταλόγου (List Box)

Ιδιότητα ListIndex

List1.ListIndex = 0 (Επιλεγμένο το πρώτο στοιχείο)

List1.ListIndex = 1 (Επιλεγμένο το δεύτερο στοιχείο)

List1.ListIndex = 2 (Επιλεγμένο το τρίτο στοιχείο)

Page 113: Vb

Καθ.:Μίλτος Χαριλάου 113

List1.List(List1.ListIndex) = “Λάρνακα”

Εντολές

List1.ListIndex = 3

Ιδιότητα List1.List(ListIndex)

List1.List(ListIndex) = “Test”

List1.List( 0 ) = “Βαρώσι”

Page 114: Vb

Καθ.:Μίλτος Χαριλάου 114

Δίνει τη δυνατότητα στο χρήστη να επιλέξει ένα στοιχείο μέσα σε ένα κατάλογο από στοιχεία.

Σύνθετα Πλαίσια (Combo Boxes)

Ιδιότητα (List) Δίνει τη δυνατότητα στο χρήστη να συμπληρώσει τα στοιχεία του Σύνθετου Πλαισίου. Για να συμπληρώσουμε το επόμενο στοιχείο πατούμε τα πλήκτρα ENTER + CTRL

ENTER + CTRL

Ιδιότητα (Text) Δίνει τη δυνατότητα στο χρήστη να δώσει ένα “τίτλο” στο Σύνθετο Πλαίσιο

Page 115: Vb

Καθ.:Μίλτος Χαριλάου 115

Σύνθετα Πλαίσια (Combo Boxes)

Ιδιότητα ListIndex

Combo1.ListIndex = 0 (Επιλεγμένο το πρώτο στοιχείο)

Combo1.ListIndex = 1 (Επιλεγμένο το δεύτερο στοιχείο)

Combo1.ListIndex = 2 (Επιλεγμένο το τρίτο στοιχείο)

Page 116: Vb

Καθ.:Μίλτος Χαριλάου 116

Combo1.List(Combo1.ListIndex) = “Επιταγή”

Εντολές

Combo1.ListIndex = 2

Ιδιότητα Combo1.List(ListIndex)

Combo1.List(ListIndex) = “Test”

Combo1.List( 0 ) = “Cash”

Page 117: Vb

Καθ.:Μίλτος Χαριλάου 117

Εντολή AddItem (Μέθοδος)

Private Sub Form_Load()

List1.AddItem “Ελλάδα”

List1.AddItem “Ιταλία”

List1.AddItem “Γερμανία”

List1.AddItem “Αυστρία”

End Sub

Η εντολή (Μέθοδος) AddItem προσθέτει στοιχεία σε ένα πλαίσιο καταλόγου (List Box) ή σε ένα ένθετο πλαίσιο (Combo Box). Οι λέξεις που περικλείονται σε εισαγωγικά θα προστεθούν και εμφανιστούν στο πλαίσιο καταλόγου ή το ένθετο πλαίσιο.

Page 118: Vb

Καθ.:Μίλτος Χαριλάου 118

1. Εκτέλεση Φύλλου Εργασίας 6 στον Η.Υ

2. Εκτέλεση Ασκήσεων 1, 2

Page 119: Vb

Καθ.:Μίλτος Χαριλάου 119

Εκτέλεση Φύλλων Εργασίας :α. Fyllo_ergasias_For-Next1

β. Fyllo_ergasias_Do-While

γ. Fyllo_ergasias_validation

Page 120: Vb

Καθ.:Μίλτος Χαριλάου 120

Εντολή Print

Εντολές CurrentX, CurrentY

Δημιουργία πίνακα μεταβλητών

Εντολή Cls

Page 121: Vb

Καθ.:Μίλτος Χαριλάου 121

Εντολή PrintH εντολή Print χρησιμοποιείται είτε για να τυπώνει τη φόρμα στον εκτυπωτή, είτε για να τυπώνει πάνω στη φόρμα μηνύματα, είτε για να τυπώνει το περιεχόμενο κάποιων μεταβλητών.

Παραδείγματα

PrintForm

Print “Hello”

Print “hello” ; ”Word”

Print stName

Print “Το όνομα είναι: ” ; stName; ” “ ; stSurname

τυπώνει τη φόρμα στον εκτυπωτή

τυπώνει πάνω στη φόρμα το μήνυμα “Hello”

τυπώνει το περιεχόμενο της μεταβλητής stName

Page 122: Vb

Καθ.:Μίλτος Χαριλάου 122

Εντολή Cls

Η εντολή Cls χρησιμοποιείται για να καθαρίζει τα αποτελέσματα των προηγούμενων εντολών Print, από την φόρμα.

Page 123: Vb

Καθ.:Μίλτος Χαριλάου 123

Εντολές CurrentX, CurrentY

Είναι οι εντολές οι οποίες τοποθετούν το δρομέα σε μία συγκεκριμένη θέση πάνω στην φόρμα. Το X και Y είναι οι συντεταγμένες οι οποίες μετριούνται με twip όπου σε 1cm χωρούν 567 twip

CurrentX=1000CurrentY=200Print “Hello” X

Y

X=1000 twip

Y=200 twip

Page 124: Vb

Καθ.:Μίλτος Χαριλάου 124

Elena Court

Διαμέρισμα

1

2

4

5

3

Κώστας

Μαρία

Νίκος

Ειρήνη

Ελευθερία

Page 125: Vb

Καθ.:Μίλτος Χαριλάου 125

Αν θέλαμε να στείλουμε ένα γράμμα στον Νίκο και γράφαμε μόνο το όνομα της πολυκατοικίας πάνω στο φάκελο, θα είμαστε σίγουροι ότι θα έφτανε στον προορισμό του; ΟΧΙ

Αν πάλι γράφαμε μόνο τον αριθμό του διαμερίσματος πάνω στο φάκελο, θα είμαστε σίγουροι ότι θα έφτανε στον προορισμό του; ΟΧΙ

Αν όμως γράφαμε το όνομα της πολυκατοικίας και τον αριθμό του διαμερίσματος πάνω στο φάκελο, τότε ΝΑΙ θα έφτανε στον προορισμό του.

Page 126: Vb

Καθ.:Μίλτος Χαριλάου 126

Πίνακας μεταβλητών (Arrays)

Πίνακας είναι μια ομάδα διαδοχικών θέσεων της μνήμης, η οποία αποθηκεύει τιμές του ίδιου τύπου (π.χ. Integer, Currency, String). Κάθε συγκεκριμένη θέση μνήμης καλείται στοιχείο του πίνακα και προσδιορίζεται από την τιμή ενός δείκτη (Index). Όλα τα στοιχεία του πίνακα έχουν κοινό όνομα, το όνομα του πίνακα , και διαφορετικό δείκτη.

Υπάρχουν: Μονοδιάστατοι πίνακες (one dimensional arrays), Δισδιάστατοι πίνακες (two dimensional arrays) και Πολυδιάστατοι πίνακες (multidimensional arrays)

Page 127: Vb

Καθ.:Μίλτος Χαριλάου 127

Μονοδιάστατοι πίνακες ονομάζονται οι πίνακες μιας διάστασης και χρησιμοποιούν ένα μόνο δείκτη για την αναφορά των στοιχείων τους.

Το παράδειγμα που αναφέραμε πιο πριν με την πολυκατοικία μπορεί να παρομοιαστεί με ένα μονοδιάστατο πίνακα.

– Το όνομα της πολυκατοικίας αντιστοιχεί με το Όνομα του Πίνακα.

– Τα διαμερίσματα του πίνακα αντιστοιχούν με τους Δείκτες του Πίνακα και

– Τα ονόματα των κατόχων των διαμερισμάτων αντιστοιχούν με τα Στοιχεία/Τιμές του πίνακα.

Mονοδιάστατοι Πίνακες

Page 128: Vb

Καθ.:Μίλτος Χαριλάου 128

iNumber0123456789

iNumber( 0 )iNumber( 1 )iNumber( 2 )iNumber( 3 )iNumber( 4 )iNumber( 5 )iNumber( 6 )iNumber( 7 )iNumber( 8 )iNumber( 9 )

Dim iNumber( 9 ) As Integer

Όνομα πίνακα

Τελευταίο Index 0 - 9

Τύπος δεδομένων

Το πλήθος των στοιχείων ισούται με 10

Παράδειγμα 1:

Mονοδιάστατος Πίνακας (Συνέχεια)

Page 129: Vb

Καθ.:Μίλτος Χαριλάου 129

iNumber

34567

iNumber( 3 )iNumber( 4 )iNumber( 5 )iNumber( 6 )iNumber( 7 )

Dim iNumber( 3 to 7 ) As Integer

Το πλήθος των στοιχείων ισούται με 5

Αρχικό και τελικό Index 3 -7

Παράδειγμα 2:

Mονοδιάστατος Πίνακας (Συνέχεια)

Page 130: Vb

Καθ.:Μίλτος Χαριλάου 130

Μέσα σε μία διαδικασία. Mόνο για αυτή !

Dim <Όνομα πίνακα(τελευταίο Index)> Αs <τύπος δεδομένων>

Δήλωση Μονοδιάστατου Πίνακα

Private Sub Command1_Click() Dim iNumber(9) As Integer . . End Sub

Page 131: Vb

Καθ.:Μίλτος Χαριλάου 131

Μέσα σε μία φόρμα . Για όλες τις διαδικασίες της φόρμας !

Option Explicit

Dim <Όνομα πίνακα(τελευταίο Index)> Αs <τύπος δεδομένων>

Option Explicit Dim iNumber(9) As Integer

Δήλωση Μονοδιάστατου Πίνακα (Συνέχεια)

Page 132: Vb

Καθ.:Μίλτος Χαριλάου 132

Παράδειγμα 1

Dim inumber(4) As integer

For i = 0 To 4

CurrentX = 1000

CurrentY = 300

inumber(i) = i

Print inumber(i)

Print

Next i

Page 133: Vb

Καθ.:Μίλτος Χαριλάου 133

Μέσα σε ένα Module. Για όλες τις φόρμες ενός project !

Public <Όνομα πίνακα(τελευταίο Index)> Αs <τύπος δεδομένων>

Ξεκινά το Index από το 1

Δημόσιες μεταβλητές

Project / Add module

Δήλωση Μονοδιάστατου Πίνακα (Συνέχεια)

Page 134: Vb

Καθ.:Μίλτος Χαριλάου 134

Page 135: Vb

Καθ.:Μίλτος Χαριλάου 135

Page 136: Vb

Καθ.:Μίλτος Χαριλάου 136

Μετατροπή δημόσιας (Public) μεταβλητής σε Τοπική (Private)

Private Number(9) As Integer

Page 137: Vb

Καθ.:Μίλτος Χαριλάου 137

Εισαγωγή δεδομένων σε πίνακα

Τρόπος 1 Τρόπος 2A4(1)=10 A4(1)=InputBox(“Dose vathmo”)A4(2)=5 A4(2)=InputBox(“Dose vathmo”) A4(3)=12 A4(3)=InputBox(“Dose vathmo”) A4(4)=20 A4(4)=InputBox(“Dose vathmo”) A4(5)=19 A4(5)=InputBox(“Dose vathmo”)

Τρόπος 3

FOR icounter= 1 TO 5

A4(icounter)=InputBox(“Dose Vathmo”)

NEXT icounter

O τρόπος 3, είναι αυτός που θα χρησιμοποιούμε στα προγράμματα μας

Page 138: Vb

Καθ.:Μίλτος Χαριλάου 138

Παρουσίαση/Επεξεργασία δεδομένων Πίνακα

Παρουσίαση

Τρόπος 1 Τρόπος 2PRINT A4(1) FOR icounter =1 TO 5 PRINT A4(2) PRINTA4(icounter)PRINT A4(3) NEXT icounterPRINT A4(4) PRINT A4(5)

Επεξεργασία/Έλεγχος

Αν θέλαμε να βρούμε αν ο βαθμός του τρίτου μαθητή είναι πάνω από 18, για να τυπώσουμε το μήνυμα «Άριστα» τι θα κάναμε;

IF A4(3) >18 THEN

PRINT “ARISTA”

END IF

Page 139: Vb

Καθ.:Μίλτος Χαριλάου 139

Ένα ολοκληρωμένο πρόγραμμα

Page 140: Vb

Καθ.:Μίλτος Χαριλάου 140

Page 141: Vb

Καθ.:Μίλτος Χαριλάου 141

Page 142: Vb

Καθ.:Μίλτος Χαριλάου 142

Page 143: Vb

Καθ.:Μίλτος Χαριλάου 143

1. Εκτέλεση Φύλλου Εργασίας 7 στον Η.Υ

2. Εκτέλεση Ασκήσεων 1, 2, 3, 4

Page 144: Vb

Καθ.:Μίλτος Χαριλάου 144

Χρήση Μενού (Menu) και

Πλαισίων Διαλόγου

Page 145: Vb

Καθ.:Μίλτος Χαριλάου 145

Έχουμε την δυνατότητα να βελτιώσουμε τις εφαρμογές που δημιουργούμε, προσθέτοντας μενού (menu).

Για να δημιουργήσουμε γραμμές μενού χρησιμοποιούμε τον επεξεργαστή μενού (menu editor), τον οποίο για να εμφανίσουμε επιλέγουμε Tools και μετά Menu Editor.

Οι πιο σημαντικές ιδιότητες των χειριστηρίων μενού είναι το όνομα (name) και η λεζάντα (caption).

Δημιουργία Μενού (Menu)

Ιδιότητα (caption) προσδιορίζει το κείμενο που θα εμφανίζεται στην οθόνη.

Ιδιότητα (name) προσδιορίζει το όνομα του χειριστηρίου, το οποίο καλό είναι να αρχίζει από mnu.

Page 146: Vb

Καθ.:Μίλτος Χαριλάου 146

Διορθωτής Μενού (Menu Editor)

Ιδιότητες

χειριστηρίων

μενού

Πλαίσιο καταλόγου

Χειριστηρίων μενού

Page 147: Vb

Καθ.:Μίλτος Χαριλάου 147

Τα στοιχεία μενού μπορεί να περιέχουν υπομενού.

Όταν μπροστά από το πρώτο γράμμα του κειμένου που γράψαμε στο caption , τοποθετήσουμε το σύμβολο & πχ &File, τότε αναθέτει στο συγκεκριμένο γράμμα F να έχει πρόσβαση στο μενού όταν πατηθεί σε συνδυασμό με το πλήκτρο Alt. Το γράμμα F εμφανίζεται υπογραμμισμένο.

Σε ένα μενού μπορεί να χρησιμοποιηθεί διαχωριστική γραμμή για να χωρίσει τα στοιχεία σε λογικές ομάδες.

Δημιουργία Μενού (Menu)

Page 148: Vb

Καθ.:Μίλτος Χαριλάου 148

Menu Editor

Χειριστήρια

μενού ή

Στοιχεία μενού

Τίτλοι μενού

Page 149: Vb

Καθ.:Μίλτος Χαριλάου 149

Το αντικείμενο κοινού πλαισίου διαλόγου (Common Dialog) επιτρέπει στον προγραμματιστή να εμφανίζει στα προγράμματα του οποιαδήποτε από τα πέντε τυποποιημένα πλαίσια διαλόγου (Open, Save As, Print, Font, Color).

Κοινό Πλαίσιο Διαλόγου (Common Dialog Object)

Το αντικείμενο κοινού πλαισίου διαλόγου εμφανίζεται στην φόρμα μόνο κατά τον χρόνο σχεδιασμού.

Για να προστεθεί στην εργαλειοθήκη το χειριστήριο Common Dialog, θα πρέπει να επιλεγεί από το μενού Project η διαταγή Components. Στη συνέχεια θα πρέπει να ενεργοποιηθεί το πλαίσιο ελέγχου Microsoft Common Dialog Control 6.0 .

Page 150: Vb

Καθ.:Μίλτος Χαριλάου 150

1. Εκτέλεση Άσκησης 1

Page 151: Vb

Καθ.:Μίλτος Χαριλάου 151

Χειριστήριο Χρονόμετρο (Timer)

Ιδιότητα Περίοδος (Interval)

Δημιουργία Ρολογιού με χρονόμετρο

Page 152: Vb

Καθ.:Μίλτος Χαριλάου 152

Παράδειγμα

Page 153: Vb

Καθ.:Μίλτος Χαριλάου 153

Αντικείμενο Χρονόμετρο (Timer)Το χειριστήριο Timer καταμετρά το χρόνο. Το χρονόμετρο εμφανίζεται στην φόρμα μόνο κατά τον χρόνο σχεδιασμού. Κατά το χρόνο εκτέλεσης, το χρονόμετρο είναι αόρατο. Το κάθε χειριστήριο Timer έχει μια ιδιότητα Interval (Περίοδος).

Double Click

Page 154: Vb

Καθ.:Μίλτος Χαριλάου 154

Ιδιότητα Περίοδος (Interval)

Είναι η ιδιότητα που καθορίζει το χρόνο (σε χιλιοστά του δευτερολέπτου) μεταξύ της εκτέλεσης των συμβάντων του χρονομέτρου.

Interval = 1000 ( 1 Δευτερόλεπτο )

Page 155: Vb

Καθ.:Μίλτος Χαριλάου 155

Δημιουργία ρολογιού

Run Mode

Page 156: Vb

Καθ.:Μίλτος Χαριλάου 156

Εκκίνηση χρονομέτρου με τη βοήθεια κουμπιών

Run Mode

Page 157: Vb

Καθ.:Μίλτος Χαριλάου 157

Παράδειγμα1Χρήση εντολής- Do While

Private Sub cmdMove_Click()

Dim iCount As Integer

iCount = 1

Do While iCount < 8

shpMove.Left = shpMove.Left + 300

shpMove.Top = shpMove.Top + 300

iCount = iCount + 1

Loop

End Sub

•Παράδειγμα

Page 158: Vb

Καθ.:Μίλτος Χαριλάου 158

Παράδειγμα

Private Sub tmrMove_Timer()

shpMove.Left = shpMove.Left + 300

shpMove.Top = shpMove.Top + 300

If shpMove.Top = 2100 Then

tmrMove.Enabled = False

End If

End Sub

Παράδειγμα2Χρήση - Timer

Page 159: Vb

Καθ.:Μίλτος Χαριλάου 159

1. Εκτέλεση Φύλλου Εργασίας 8 στον Η.Υ

Page 160: Vb

Καθ.:Μίλτος Χαριλάου 160

Χρήση Πολλών Φορμών

Σε ένα Έργο

Page 161: Vb

Καθ.:Μίλτος Χαριλάου 161

Ένα ολοκληρωμένο έργο (πρόγραμμα) περιέχει συνήθως αρκετές φόρμες που επιτρέπουν την επικοινωνία με τον χρήστη.

Κάθε φόρμα αποτελεί ένα ξεχωριστό αντικείμενο (Object) και χαρακτηρίζεται από τις δικές της ιδιότητες (properties).

Για κάθε φόρμα εκτελούνται διάφορες ενέργειες που ονομάζονται μέθοδοι (methods), και αντιδρά σε διάφορα συμβάντα (events).

Φόρμες (Forms)

Page 162: Vb

Καθ.:Μίλτος Χαριλάου 162

Κατά την εκτέλεση ενός προγράμματος ελέγχονται τα συμβάντα που καθόρισε ο προγραμματιστής και εμφανίζονται διαφορετικές φόρμες ή και εκτελούνται διάφορες εντολές / υποπρογράμματα (Event Driven Programming).

Προγραμματισμός με συμβάντα

Page 163: Vb

Καθ.:Μίλτος Χαριλάου 163

Για την προσθήκη μίας νέας φόρμας σε ένα έργο, θα πρέπει να επιλεγεί από την γραμμή μενού το Project (έργο) και στην συνέχεια η διαταγή Add Form (προσθήκη Φόρμας). Ακολούθως στο παράθυρο διαλόγου που εμφανίζεται θα πρέπει να επιλεγεί το New και μετά Open. Η καινούργια φόρμα θα παρουσιαστεί και θα προστεθεί στη εξερεύνηση έργου.

Επίσης το πιο πάνω μπορεί να επιτευχθεί χρησιμοποιώντας απλώς το εικονίδιο για την δημιουργία καινούργιας φόρμας που βρίσκεται στη γραμμή εργαλείων.

Προσθήκη Νέας Φόρμας

Page 164: Vb

Καθ.:Μίλτος Χαριλάου 164

Για την αφαίρεση μιας φόρμας από ένα έργο, επιλέγουμε απλά το όνομα της φόρμας από την εξερεύνηση έργου. Ακολούθως πατούμε το δεξί κουμπί του ποντικιού και από τις επιλογές που εμφανίζονται επιλέγουμε remove.

Αφαίρεση Υφιστάμενης Φόρμας

Page 165: Vb

Καθ.:Μίλτος Χαριλάου 165

Σε ένα έργο που χρησιμοποιούνται πολλές φόρμες, είναι δυνατό να φορτώσουμε στη μνήμη και να εμφανίσουμε στην οθόνη πολλές φόρμες ταυτόχρονα, ανάλογα με τις ανάγκες του προγράμματος που εκτελείται.

Οι φόρμες πού διεκπεραιώνονται και δεν χρειάζονται πλέον, αποφορτώνονται από τη μνήμη ώστε να απελευθερώνεται το κομμάτι της μνήμης που καταλαμβάνεται.

Φόρτωση και Αποφόρτωση Φορμών

Εντολές φόρτωσης και αποφόρτωσης των φορμών στη μνήμη:

Φόρτωση φόρμας στη μνήμη : Load <FormName>

Αποφόρτωση φόρμας από τη μνήμη : Unload <FormName>

Page 166: Vb

Καθ.:Μίλτος Χαριλάου 166

Οι φόρμες που είναι στη μνήμη μπορεί να εμφανίζονται η να αποκρύβονται από την οθόνη.

Εμφάνιση και Απόκρυψη Φορμών

Εντολές εμφάνισης και απόκρυψης των φορμών στη οθόνη:

Εμφάνιση φόρμας στη οθόνη : <FormName>.Show

Απόκρυψη φόρμας από τη οθόνη : <FormName>.Hide

Όταν ζητηθεί να εμφανιστεί στην οθόνη μια φόρμα που δεν έχει φορτωθεί ακόμη στη μνήμη, φορτώνεται πρώτα στη μνήμη και στη συνέχεια γίνεται ορατή στη οθόνη.

Όταν ζητηθεί να αποκρυφτεί από την οθόνη μια φόρμα, παύει να είναι ορατή αλλά συνεχίζει να παραμένει στη μνήμη και να καταλαμβάνει το χώρο που χρειάζεται.

Page 167: Vb

Καθ.:Μίλτος Χαριλάου 167

Ενοποίηση μουσικής με το Χειριστήριο Multimedia MCI

Γραφικά Κινούμενα Σχέδια

Ενοποίηση βίντεο με το Χειριστήριο Multimedia MCI

Page 168: Vb

Καθ.:Μίλτος Χαριλάου 168

1. Μενού Controls Components

2. Ενεργοποίηση του πλαισίου ελέγχου Microsoft Multimedia Control 6.0

Προσθέτουμε το Χειριστήριο

Multimedia MCI στην Εργαλειοθήκη

Page 169: Vb

Καθ.:Μίλτος Χαριλάου 169

Visual Basic

ΤΕΛΟΣ

Visual Basic

ΤΕΛΟΣ