Pomoc oko zadatka u vba basicu(access)

poruka: 4
|
čitano: 1.352
|
moderatori: XXX-Man, vincimus
1
+/- sve poruke
ravni prikaz
starije poruke gore
13 godina
neaktivan
offline
Pomoc oko zadatka u vba basicu(access)
ako moze neko da mi kaze gdje sam napravio gresku u zadatku.. zadatak glasi.. u text boxu upisati ime i prezime a onda klikom na komandnu tipku mjenjati boju slova pocevsi od crne pa nadalje .. eh ja sam ovako uradio :
Private Sub Command0_Click()
Public imeprezime As String
Dim imeprezime As String
For Each imeprezime In Form_petlja.Controls
With imeprezime
For .Color = black(0, 0, 0) To RGB(36, 182, 36)
MsgBox imeprezime
Next .Color
End With
End Sub

Private Sub Text1_LostFocus()
imeprezime = Val(Text1.Text)
End Sub
neko ako zna da mi pomogne
 
0 0 hvala 0
17 godina
offline
Re: Pomoc oko zadatka u vba basicu(access)

Boze dragi al ga nadrobi....

 

evo ovo ubaci u Click event od buttona:

 

   Dim imeprezime As String, boja As Long

   boja = Int(16581375 * Rnd)

   Me.imeprezime.ForeColor = boja

***** Maxxy *****
17 godina
offline
Re: Pomoc oko zadatka u vba basicu(access)

Uh, sad vidim da trebas krenuti od crne, pa dalje.... onda je situacija malo jednostavnija.

 

Ovo ubaci u Button Click event:

 

Me.imeprezime.ForeColor = Me.imeprezime.ForeColor + 50000

 

***** Maxxy *****
13 godina
neaktivan
offline
Re: Pomoc oko zadatka u vba basicu(access)
hvala ti na zadatku :)
1
Nova poruka
E-mail:
Lozinka:
 
vrh stranice