Add Text To String

My brain has gone blank. :blush:

EntryRiskText (string variable) can either be Low, Med or High so depending on it's value, LowRiskCounter, MedRiskCounter or HighRiskCounter is checked. My problem is the 2nd line which returns an "Expected: expression" error and the first "&" is highlighted.

Can anyone help me out?

VB Code:

If EntryRiskText & "RiskCounter" <> 10 Then
EntryRiskText & "RiskCounter" = EntryRiskText & "RiskCounter" + 1
End if

[B]

VB Code:

EntryRiskText = EntryRiskText + 1 & "RiskCounter"

that what you need?

EntryRiskText is a String data type, and your concantinating it with an Integer (guess) and then evaluating it ??????

VB Code:

If EntryRiskText & "RiskCounter" <> 10 Then

Should it be something like:

VB Code:

If (EntryRiskText = "Med") And (RiskCounter <> 10) Then

Bruce.

Quote:

---

Originally Posted by lintz

My brain has gone blank. :blush:

EntryRiskText (string variable) can either be Low, Med or High so depending on it's value, LowRiskCounter, MedRiskCounter or HighRiskCounter is checked. My problem is the 2nd line which returns an "Expected: expression" error and the first "&" is highlighted.

Can anyone help me out?

VB Code:

If EntryRiskText & "RiskCounter" <> 10 Then
EntryRiskText & "RiskCounter" = EntryRiskText & "RiskCounter" + 1
End if

[B]

---

You need to do something else. You have no variable to add a value to.
You would need something like this:

VB Code:

If LowRiskCounter.value = 1 then
  eVal = 2
end if
if  MedRiskCounter.value = 1 then
  eVal = eVal + 5
end if
if HighRiskCounter.value = 1 then
  eval = eVal + 8
end if 
EntryRisk.Text = & "RiskCounter = "  & eVal

Not quite.

If EntryRiskText = Low then the second line should read:

LowRiskCounter = LowRiskCounter +1

but instead of hard coding the Low (or Med/High) I use the varaible EntryRiskText

EDIT: I posted to the first reply but have now read the others. Thanks