|
Programiranje Programski jezici, tehnike, alatke... |
|
Alatke vezane za temu | Vrste prikaza |
26.5.2008, 19:50 | #1 |
Novi član
Član od: 26.5.2008.
Poruke: 4
Zahvalnice: 0
Zahvaljeno 0 puta na 0 poruka
|
pomoc...hitno VB
Braco...trebam vasu pomoc....imam zadatak iz accessa..vezano je za VB
Zadatak glasi ovako: Kreirati formu i proceduru koja ce po pokretanju ispisati vase ime kao naziv forme. Na formi kreirati text box u koji ce se unositi vrijednost izrazena u Dolarima a nakon toga da se automatski tu vrijednost pretvori u Euro u novoj labeli. Nisam bio u skoli vec neki duzi period u skoli zato sto sam slomio kljucnu kost...a profesorica je ne daj boze nikom,,,kaze da sam ja kuci mogao vjezbati...treba mi sto prije ako mozete mi pomoci molim vas..ili makar neke upute kako i sta hvala |
26.5.2008, 23:35 | #2 |
Član
|
Re: pomoc...hitno VB
A sta ovde ima veze sa Accessom ???
|
27.5.2008, 0:02 | #3 |
V.I.P. GNU/Linux
Član od: 1.11.2005.
Poruke: 11.166
Zahvalnice: 2.085
Zahvaljeno 4.923 puta na 2.859 poruka
|
Re: pomoc...hitno VB
Možda rade u Accessu koristeći VBA...
|
27.5.2008, 7:18 | #4 |
Novi član
Član od: 26.5.2008.
Poruke: 4
Zahvalnice: 0
Zahvaljeno 0 puta na 0 poruka
|
Re: pomoc...hitno VB
Jeste...radimo u VBA
|
27.5.2008, 18:44 | #5 |
Novi član
Član od: 26.5.2008.
Poruke: 4
Zahvalnice: 0
Zahvaljeno 0 puta na 0 poruka
|
Re: pomoc...hitno VB
Uradio sam..hvala na vasoj pomoci.......LOL
ovako ide Private Sub Form1_Load() Me.Caption = "Moje ime" End Sub Private Sub Text1_Enter() Text2 = Text1 * 1.576 End Sub |
27.5.2008, 21:20 | #6 |
Član
Član od: 30.6.2007.
Poruke: 487
Zahvalnice: 341
Zahvaljeno 103 puta na 52 poruka
|
Re: pomoc...hitno VB
Da ne otvaram novu temu....
Ovako treba mi mala pomoc, U prvom textboxu stoji cifra (npr. 1000) kada ispisete u drugi textbox neki broj (npr 3) treba da izbaci rezultat (*)(po primeru je 3000), e sad to sam uradio ali kada u drugom textboxu obrisem cifru tako da textbox bude prazan iskoci mi error zato sto nemoze da mnozi 1000 i prazan textbox... Pa ako imate vremena i volje a vi odgovorite nije hitno... |
27.5.2008, 22:29 | #7 |
Član
Član od: 30.10.2005.
Lokacija: Vancouver, BC
Poruke: 475
Zahvalnice: 48
Zahvaljeno 95 puta na 75 poruka
|
Re: pomoc...hitno VB
Pre nego sto pokusas da mnozis, postavi jedan IF koji ce da provera da li je textbox prazan. Ukoliko nije (ili ako je ono upisano u njemu validan broj), onda moze da se mnozi - u suprotnom se nista ne desava.
|
Sledeći korisnik se zahvaljuje korisniku pyost na korisnoj poruci: | ||
Eris (27.5.2008) |
28.5.2008, 13:05 | #8 |
V.I.P. Programiranje
|
Re: pomoc...hitno VB
Možeš da uradiš nešto ovako:
Kod:
Public Sub Command1_Click() If Text1.Text="" Or Text2.Text="" Then MsgBox "Neko od polja je prazno. Molimo unesite cifre u oba polja", vbExclamation, "Greška" Exit Sub End If Label1.Caption = Val(Text1.Text) * Val(Text2.Text) End Sub |
Sledećih 2 korisnika se zahvaljuje korisniku Geomaster na korisnoj poruci: | ||
Eris (28.5.2008), Sillent_Dead (1.6.2008) |
28.5.2008, 20:51 | #9 |
Novi član
Član od: 26.5.2008.
Poruke: 4
Zahvalnice: 0
Zahvaljeno 0 puta na 0 poruka
|
Re: pomoc...hitno VB
A samo da pitam..jeli moguce napraviti U VBA da kad se otvori forma da se mjenja background color....koji je code za to
private sub Form1_Load() i sta dalje....... |
28.5.2008, 21:07 | #10 |
V.I.P. Programiranje
|
Re: pomoc...hitno VB
Naravno...
Imaš 2 varijante. Ako znaš da koristiš RGB kolorni sistem (crvena, zelena, plava) onda ideš ovako: Kod:
Public Sub Form_Load() Me.BackColor = RGB(intenzitet crvene(0-255), intenzitet zelene(0-255), intenzitet plave(0-255) End Sub Uđi u Paint, Idi na Colors->Edit Colors, Klikni na dugme Define Custom Colors, Zatim odaberi boju (pojaviće ti se color picker sa desne strane) ili klikni na neku već definisanu, Pogledaj vrednosti Red, Green, Blue na dnu color picker-a i njih unesi kao intenzitet crvene, zelene i plave u kodu koji sam ti dao. Naravno prethodni kod možeš koristiti u bilo kojoj proceduri, npr. Timer, click CommandButton-a itd. P.S <offtopic> Jedna stvar koja mi se dopala je disco efekat: Napravi timer, Dodeli mu interval 100 U njegov kod ukucaj: Kod:
Sub Timer1_Timer() Randomize Me.BackColor=Rnd * vbWhite End Sub </offtopic> |
Sledeći korisnik se zahvaljuje korisniku Geomaster na korisnoj poruci: | ||
Sillent_Dead (1.6.2008) |
Bookmarks sajtovi |
|
|
Slične teme | ||||
tema | temu započeo | forum | Odgovora | Poslednja poruka |
HP 530 problem, molim pomoć, hitno | davidology | Prenosni računari | 1 | 11.9.2008 8:41 |
potrebna pomoc hitno oko instalacije xp-a na friskom kompu | muki85 | Operativni sistemi | 8 | 11.2.2008 20:12 |
Pomoc!!! Hitno! | K'R' HooD | Operativni sistemi | 7 | 29.10.2007 20:57 |
Pomoc, hitno! | Alek92 | Šta da kupim? | 1 | 16.9.2007 14:18 |
pomoc pri izboru - hitno | gagi_ns | ŠDK - Foto i audio/video | 10 | 6.8.2007 13:24 |