Guida Visual Basic completa

Programma

• Introduzione a visual basic 2010
• Preparazione ambiente di sviluppo visual basic 2010 express
• Primo programma: acquisizione da input di un messaggio e stampa
• Programma che fa la somma di 2 numeri
• Tooltrip
• Selezione if
• Realizzazione di un timer
• Proteggere un programma con password e label nascoste
• Simulazione orologio digitale
• Compilazione programmi
• Manipolazione di stringhe
• Ciclo for
• Gestione di files
• Evento keypress
• Istruzione val
• Programmazione ad oggetti in visual basic
• Altri tipi di ciclo : while, do while, do until
• colorDialog
• generatore di numeri casuali
• picturebox
• progressBar
• webBrowser
• programma che genera listato HTML
• inviare mail con GMAIL
• MasketTextBox ed ErrorProvider
• dataGridView
• procedure in visual basic
• mettere programmi in pausa
• gioco dell’impiccato
• ciclo for each

Visual Basic 2010

Il Visual Basic VB è un linguaggio di programmazione ad alto livello molto

moderno che permette di creare programmi con molta facilità. La grande

potenza di VB è che si può modificare la parte grafica del programma

direttamente al momento; questa rende VB Pro un ambiente di sviluppo Visuale.

Preparazione Ambiente di Sviluppo

L'IDE che useremo è Visual Basic 2010 express che scaricheremo da Internet.

Ricordiamoci che i programmi VB funzionano senza

eseguiti solo in ambiente Windows, quindi se si vuol provare un altro SO, è

due creare uno simula Windows. Inoltre il compilatore necessita

Microsoft.

Vediamo come funziona l'IDE: faccio Nuovo Progetto => lascia l'impostazione vuota

Form => dare un nome al Progetto = Il VB inizierà a creare tutti i componenti del

Progetto. La Finestra di Progettazione viene fatta così:

Form1 (1 correntano i)

Form1 - (NomeForm)

Solution esplorazione

QB 4 vincitore certificato windows.e

(i nomi file)

La Finestra di Progettazione viene fatta così:

1) Form1 è la finestra del nostro programma che ter adesio è creatui dentro

trovano tutte numero serie di componenti (buttons, labels...) presenti nella

casseruola strumenti o controles. Ogni oggetto che inseriamo sarà modificabile, oltre può

modificare le proprietà dei menchini e abel di° mezionando e mantando per modificare note il

numerett' del form scrita. Due inseriamo un component e trare solamente basta

moduli che menuto consape faccio un doppio click. Inserisci ed eserta insieme un butoni

Selezioni (IF) in VB10

Le selezioni sono dei comandi per far prendere "decisioni" al programma in base al soddisfare o meno di uno o più condizioni.

Dim N1 As Integer Dim N2 As Integer Private Sub Button1_Click ( ... )

N1 = TextBox1.Text N2 = TextBox2.Text

If ( N1 > N2 ) Then MsgBox ( "Il numero maggiore è " & N1 & ... )

Else If ( N1 = N2 ) Then MsgBox ( "Numeri uguali" ... )

Else MsgBox ( "Il numero maggiore è : " & N2 ... ) End If

End Sub

Poss. concatenare più condizioni usando il connettiva logico AND oppure OR

Realizzare un Timer

La parte grafica è fatta così:

Form1:

• -->

Mettere una Label con Text uguale a 0, una TextBox per aggiungere il numero di secondi, un Button e i nomi di un Timer che faremo partire “Ammesso al form1”, non vedere.

Nelle proprietà: Interval del Timer mettere 1000, perché cento in mms e 1000 mms=1 s

Fermate cllic su Button0 gettavamo Panne. i numeri tick del Timer in cui è Range che aumenta ogni 1000 ms timeer deve essere 10

Public Class Form1

Dim Secondi As Integer

Private Sub Button1_Click ( ... ) Handles Button1.Click

Secondi = TextBox1.Text

"PULSANTE CHE SCRIVE SU UN FILE"

Private Sub Button2_Click ( ... ) Handles Button2.Click

OpenFileDialog1.Filter = "File di Testo (.txt) | * .txt" : "nome proprio mio" & ".txt"

OpenFileDialog1.Title = "Scegli o guarda file e aggiungere il Text"

OpenFileDialog1.ShowDialog()

If Nome del File a voler a divermento momento aprire il File in scrittura e il nome OpenFileDialog1.FileName "" Then

IO.File.OpenText ( OpenFileDialog1.FileName)

aggiungere _{il text esattamente TextBox1}

PrintLine( Line = TextBox1.Text)

chiudici il processo di scrittura:

Stream.Close()

End If

End Sub

"PULSANTE CHE LEGGE UN FILE"

Private Sub Button3_Click ( ... ) Handles Button3.Click

OpenFileDialog1.Filter = "File di testo (.txt) | *.txt"

OpenFileDialog1.Title = "negli quale file leggere"

OpenFileDialog1.ShowDialog()

If OpenFileDialog1.FileName "" Then

^{nome al file creato con nome diverso da nulla} IO.OpenText

legg = IO.File.OpenText ( OpenFileDialog1.FileName)

_{Desso il testo riggo fin rigo e lo assp nella TextBox2, non sin altro variable contempurante a TextBox2.Text = TextBox2.Text & legg.ReadLine() & ControlLf}

chiudi ^{il flurro di lettura}

legg.close()

End If

End Sub

End term

PictureBox

È un componente che ci permette di inserire immagini nel programma.

Nella Property Immagelocation mettere l'URL se l'immagine si trova su Internet,

altrimenti nella Property Image focus immutata nel residendo del computer. In

ogni caso non occorre altro mettere la dimensione mettere come modalità di

dimensionamento le stretch image appena le alberga manualmente.

Vedremo anche come inserire l'immagine del file:

PictureBox1.ImageLocation = “... qui mette l'URL o l'URI”

Sfruttando mettere sulla mano la HScrollBar e la VScrollBar, che sono delle

Barre che vanno inserite per montare e alleggerire le foto.

PictureBox1

(Disegno di un esempio di finestra del tool PictureBox)

Da queste Barre basta mettere Moving Maximum dal settore

la lunghezza/altezza delle immagini che che cercate

• Per Algaravir le immagini, allo Shirtsammento delle Barre
• Pensata Sub VScrollBox1-Scroll(…) Handles VScrollBox1, Scroll
• PictureBox1.Height = VScrollBox1.Value
• End Sub

L'altezza dell'immagine davanti al valore della Barra verticale

• Pensato Sub HScrollBox1-Scroll(…) Handles HScrollBox1, Scroll
• PictureBox1.Width = HScrollBox1.Value
• End Sub

Per l'imbagliosi dell'immagine davanti al valore della Barra orsentimila

• Per Sripatarò le immagini, allo Sherlockmento delle Barre
• Nella gestione degli eventi Scroll menzero:
• PictureBox1.Top = VScrollBox1.Value
• PictureBox1.Left = HScrollBox1.Value

Mi connetto al Server di GMail

creo un smtpe client che mi connette al Serser di GMail

• Dim SMTPServer As New SmtpClient("smtp.gmail.com")
• importa la paerch. Gmail che è la 587
• SMTPServer.Port = 587
• Dover fare il Login a Gmail mettendo la mail e la password dell'account SmithServer.Credentials = New System.Net.NetworkCredential("mail",
• Abilità la criptografie SSL per ladifueh del daio momonte SMTPServer.EnableSSL = True

Inviare la Mail, non gestire gli errori non un Blocco Try - Patch

1. Try
2. SMTPServer.Send(mail)
3. MsgBox("Mail Inviata Corretta mentesi")
4. Here opoio mandalo la mail Mever gidi feet mail. Attachments. Clean()

Patch ex An Exception

MsgBox("Errore durante i'innaco..")

End In:

End If

End Sub

End Class