Visual Basic – Kreiranje jednostavne ActiveX kontrole

U danaลกnjem prilogu kreiraฤ‡emo jednostavnu ActiveX kontrolu, koja ฤ‡e predstavljati dugme (button) sa odreฤ‘enim natpisom i prikazom message box-a na klik. Inaฤe, ActiveX kontrole moลพete iskoristiti za automatizaciju i bolju kontrolu sadrลพaja vaลกih web stranica. Kontrolu koju ฤ‡emo mi kreirati, na web stranicama, mnogo lakลกe moลพete odraditi preko razliฤitih skript jezika, ali naลก cilj je da nauฤimo kako se kreiraju ActiveX kontrole, a ne kako to odraditi na ลกto efikasniji naฤin.

Na samom poฤetku, startujte Visual Basic i izaberite „ActiveX Control“ na kartici „New“, u okviru prozora „New Project“. Nakon ovoga, videฤ‡emo prikazanu formu – UserControl, te ฤ‡emo prvo dati nazive elementima projekta. Naลกu novu kontrolu nazvaฤ‡emo „DugmePoruka“, pa zato promenite osobinu Name u paleti „Properties“ u DugmePoruka. Zatim kliknite na Project1 u paleti „Project“ i ponovo u paleti sa atributima promenite osobinu Name u „MojaXKontrola“. Sledi dodavanje kontrole „Button“ na naลกu novu korisniฤku kontrolu (user control). U Toolbox-u izaberite kontrolu Button i „iscrtajte“ je na formi (veliฤina, za sada, nije bitna). Selektujte postavljeno dugme, jednim klikom (ako veฤ‡ nije bilo selektovano), da biste dobili njegove osobine u paleti Properties. Promeniฤ‡emo naziv dugmadi u „Dugme“ (osobina Name), a takoฤ‘e neฤ‡emo ostaviti ni default vrednost osobine Caption – promenite vrednost u „Klikni ovde“.

Dvostruko kliknite na postavljeno dugme da biste dobili prozor za unos programskog koda. Poลกto je „Click“ standardna procedura, poฤeฤ‡emo sa sub-om „Dugme_Click“. Ovo znaฤi da ฤ‡emo uneti programski kod koji ฤ‡e se izvrลกiti u sluฤaju dogaฤ‘aja „klik na dugme“ – sada nema nikakvog koda pa se neฤ‡e niลกta ni desiti, a mi ลพelimo da prikaลพemo messagebox. Za ove potrebe iskoristiฤ‡emo funkciju MsgBox() detaljno opisanu u prethodnom Visual Basic prilogu. Jednostavno u prozor programskog koda prekopirajte sledeฤ‡u liniju (izmeฤ‘u kljuฤnih reฤi sub i end sub):


MsgBox „Puno pozdrava!“,“Poruka“

Sada je naลกa kontrola spremna za testiranje. Poลกto je naลก projekat jedna kontrola, ne moลพemo jednostavno pokrenuti projekat, veฤ‡ nam je potrebno neลกto u ลกta ฤ‡emo ubaciti kontrolu – kontejner. Jedan ovakav kontejner moลพe biti Internet Explorer (verzije veฤ‡e od 3) ili neki VB izvrลกni fajl. Za test ฤ‡emo iskoristiti VB izvrลกni projekt, pa zato izaberite meni „File> Add Project…“. Podesite naziv novog projekta u „TestKontrole“ i naziv forme u „TestForma“. Sada ฤ‡emo na novu formu postaviti naลกu novu kontrolu, ali pre toga potrebno je da zatvorimo dizajn prozor ActiveX kontrole. Potom kliknite na novu formu i u paleti ToolBox zapazite ikonicu nove kontrole; ukoliko zadrลพite pokazivaฤ miลกa iznad kontrole, videฤ‡ete naziv „DugmePoruka“. Postavite kontrolu „DugmePoruka“ i saฤuvajte projekat.

I na kraju, preostalo nam je da pokrenemo projekt sa korisniฤkom ActiveX kontrolom – izaberite meni „Run> Start“ ili pritisnite taster „F5“ na tastaturi. U sledeฤ‡em prilogu ฤ‡emo videti kako se nova kontrola implementira u web browser.

Pratite Krstaricu na www.krstarica.com