Hajde da sada izmenimo program PREVODILAC, tako što ćemo umesto MsgBox-a koji je do sada prikazivao prevod, ubaciti u projekat novi obrazac koji će da zameni prethodni način prikaza prevoda. Ubacite novi obrazac tako što ćete ući u meni Project, a nakon toga kliknuti na Add Form.
Kreirajte obrazac kao na slici
Podesite svojstva:
Label1 Font Times New Roman
14 point
Text1 TabStop False
Command1 Caption Zatvori
Form2 Caption Prevod
Izbrišite programski red
MsgBox (Def),, List1.Text
Na isto mesto upišite:
Load Form2
Form2.Label1=List1.Text
Form2.Text1=Def
Form2.Show
Dupli klik na dugme Zatvori, upisati kod:
Form2.Hide
Kreirajte obrazac kao na slici
Podesite svojstva:
Label1 Font Times New Roman
14 point
Text1 TabStop False
Command1 Caption Zatvori
Form2 Caption Prevod
Izbrišite programski red
MsgBox (Def),, List1.Text
Na isto mesto upišite:
Load Form2
Form2.Label1=List1.Text
Form2.Text1=Def
Form2.Show
Dupli klik na dugme Zatvori, upisati kod:
Form2.Hide
Нема коментара:
Постави коментар