Arrays and Variables, another question :(

danielschnarr
04-15-2004, 06:41 AM
Dim j As Integer
For j = 0 To 7
If chkTopping(j).Value = 1 Then pizza1(j) = Checked
If pizza1(j).Value = Checked Then
pizza1(j).Enabled = False
Next
End If


how do i get J to multiply by .20 if it is checked (value =1) for the cost of the topping on a pizza?

thanks

candela
04-15-2004, 06:59 AM
be carfull.... your loop will work only checking... it doesn't uncheck your control
i suggest:
Dim j As Integer
For j = 0 To 7
IF chkTopping(j).Value = 1 Then
pizza1(j) = Checked
pizza1(j).Enabled = False
ELSE
pizza1(j) = unChecked
pizza1(j).Enabled = true
ENDIF
Next
End If
then i don't get exactly what u need... making a sum of certain selected values?Dim j As Integer, mSUM as single
' u have to define an array like myPRICE() as Single
mSUM=0
For j = 0 To 7
IF chkTopping(j).Value = 1 Then
pizza1(j) = Checked
pizza1(j).Enabled = False
mSUM=mSUM+myPRICE(j)
ELSE
pizza1(j) = unChecked
pizza1(j).Enabled = true
ENDIF
Next
End If

EZ Archive Ads Plugin for vBulletin Copyright 2006 Computer Help Forum