Shoutbox

quote:

---

Originally posted by mwe99
nope still comes up red... here look

it doesn't seem to like the & sign

i have the colour going in the box... i just need something to tell the other colours to go to the next box

so after cmdfinal1 has been filled, automatically make the next colour go to cmdfinal2

---

Well try this code:

(If your version of VB recognises "ME" - otherwise replace "me" with the box name)

code:

---

"C" & selector.backcolor = me.backcolor
If selector =< 4 then
selector = selector + 1
end if

---

Whats the selector then? the cmdfinal1 ?

quote:

---

Originally posted by mwe99
Whats the selector then? the cmdfinal1 ?

---

I told you before - selector is a variable with a number which is between 1 and 4. Every time a colour is picked, the number goes up - so that C & selector always gives you the right selection.

if you would have used arrays of buttons, you'd only have to write one procedure and it would have been much easier.

code:

---

"C" & selector.backcolor = me.backcolor
If selector =< 4 then
selector = selector + 1
end if

---

I really can't see how that's meant to work. It's not logical, and it obviously doesn't work as mwe has said three times it highlights it in red.

What is ""C" & selector.backcolor "? You can't dynamically concatenate a backcolor onto the end of a string and set it to something. You make no sense.

quote:

---

Originally posted by mwe99
lol wow am i confused

---

no wonder

First of all disregard everything Blade has said... sorry Blade, but yours make no sense at all. As Segosa said, that isn't even logic programming code.

quote:

---

Originally posted by Millenium_edition
if you would have used arrays of buttons, you'd only have to write one procedure and it would have been much easier.

---

indeed. And this is the way to go for something like this...

code:

---

Option Explicit

Dim CurrentBox As Byte

Private Sub Form_Load()
  CurrentBox = 1
  Call ClearBoxes
End Sub

Private Sub cmdColor_Click(Index As Integer)
  cmdFinal(CurrentBox).BackColor = cmdColor(Index).BackColor
  CurrentBox = CurrentBox + 1
  If CurrentBox = 5 Then
    Call Validate
    '
    CurrentBox = 1
    Call ClearBoxes
  End If
End Sub

---

see attached zip for full example code

It still makes the code red

i don't know why but its not seeming to accept the code so i deleted the code,


i attached this to see if anyone can see the solution.

quote:

---

Originally posted by mwe99
It still makes the code red

i don't know why but its not seeming to accept the code so i deleted the code

---

We said to disregard Blade's code as that isn't even logical programming code and will never work in any programming language.

quote:

---

Originally posted by mwe99
i attached this to see if anyone can see the solution.

---

1) The code you're working in is "VBA" (aka "Visual Basic for Applications"). This is not the same as "Visual Basic" which we were all talking about (although many things are similar)!

2) Look at my code which I attached in the zipfile in my previous post and the related comments... The thing you need to change is to add the code for the colorbutton to each individual color button on your form, as VBA doesn't support array's of controls, the rest of the principle is just the same.
EDIT: I've edited your Excel sheet with working code for that particular form (see attachment in this post).