[RESOLVED] [2005]
Hi all!
Thanks for coming to my rescue again.
I'm getting this error:
Cannot refer to an instance member of a class from within a shared method or shared member initializer without an explicit instance of the class.
Currently trying to code teh dreaded hwk question everyone is getting. Try to run my code:
...... and thats where the error stops!Code:[B] Public Shared Sub OnTimerEvent(ByVal [source] As Object, ByVal e As EventArgs) Dim i, j, l, k As Integer Do i = i + 1 j = i + 1 k = i + 1 l = i + 1 Select Case Val(i) Case 0 topPence.ForeColor = Color.Black topleftPence.ForeColor = Color.Black toprightPence.ForeColor = Color.Black bottomleftPence.ForeColor = Color.Black bottomPenceRight.ForeColor = Color.Black bottomPence.ForeColor = Color.Black Case 1 toprightPence.ForeColor = Color.Black bottomPenceRight.ForeColor = Color.Black Case 2 topPence.ForeColor = Color.Black toprightPence.ForeColor = Color.Black topmiddlePence.ForeColor = Color.Black bottomleftPence.ForeColor = Color.Black bottomPence.ForeColor = Color.Black Case 3 topPence.ForeColor = Color.Black toprightPence.ForeColor = Color.Black topmiddlePence.ForeColor = Color.Black bottomPenceRight.ForeColor = Color.Black bottomPence.ForeColor = Color.Black Case 4 topleftPence.ForeColor = Color.Black topmiddlePence.ForeColor = Color.Black bottomPenceRight.ForeColor = Color.Black toprightPence.ForeColor = Color.Black Case 5 topPence.ForeColor = Color.Black topleftPence.ForeColor = Color.Black topmiddlePence.ForeColor = Color.Black bottomPenceRight.ForeColor = Color.Black bottomPence.ForeColor = Color.Black Case 6 topleftPence.ForeColor = Color.Black topmiddlePence.ForeColor = Color.Black bottomPenceRight.ForeColor = Color.Black bottomPence.ForeColor = Color.Black bottomleftPence.ForeColor = Color.Black Case 7 topPence.ForeColor = Color.Black toprightPence.ForeColor = Color.Black bottomPenceRight.ForeColor = Color.Black Case 8 topPence.ForeColor = Color.Black topleftPence.ForeColor = Color.Black toprightPence.ForeColor = Color.Black topmiddlePence.ForeColor = Color.Black bottomleftPence.ForeColor = Color.Black bottomPence.ForeColor = Color.Black bottomPenceRight.ForeColor = Color.Black Case 9 topPence.ForeColor = Color.Black topleftPence.ForeColor = Color.Black toprightPence.ForeColor = Color.Black topmiddlePence.ForeColor = Color.Black bottomPenceRight.ForeColor = Color.Black End Select Select Case Val(j) Case 0 topPence2.ForeColor = Color.Black topleftPence2.ForeColor = Color.Black topRightPence2.ForeColor = Color.Black bottomleftpence2.ForeColor = Color.Black bottomPenceRight2.ForeColor = Color.Black bottomPence2.ForeColor = Color.Black Case 1 topRightPence2.ForeColor = Color.Black bottomPenceRight2.ForeColor = Color.Black Case 2 topPence2.ForeColor = Color.Black topRightPence2.ForeColor = Color.Black topmiddlePence2.ForeColor = Color.Black bottomleftpence2.ForeColor = Color.Black bottomPence2.ForeColor = Color.Black Case 3 topPence2.ForeColor = Color.Black topRightPence2.ForeColor = Color.Black topmiddlePence2.ForeColor = Color.Black bottomPenceRight2.ForeColor = Color.Black bottomPence2.ForeColor = Color.Black Case 4 topleftPence2.ForeColor = Color.Black topmiddlePence2.ForeColor = Color.Black bottomPenceRight2.ForeColor = Color.Black topRightPence2.ForeColor = Color.Black Case 5 topPence2.ForeColor = Color.Black topleftPence2.ForeColor = Color.Black topmiddlePence2.ForeColor = Color.Black bottomPenceRight2.ForeColor = Color.Black bottomPence2.ForeColor = Color.Black Case 6 topleftPence2.ForeColor = Color.Black topmiddlePence2.ForeColor = Color.Black bottomPenceRight2.ForeColor = Color.Black bottomPence2.ForeColor = Color.Black bottomleftpence2.ForeColor = Color.Black Case 7 topPence2.ForeColor = Color.Black topRightPence2.ForeColor = Color.Black bottomPenceRight2.ForeColor = Color.Black Case 8 topPence2.ForeColor = Color.Black topleftPence2.ForeColor = Color.Black topRightPence2.ForeColor = Color.Black topmiddlePence2.ForeColor = Color.Black bottomleftpence2.ForeColor = Color.Black bottomPence2.ForeColor = Color.Black bottomPenceRight2.ForeColor = Color.Black Case 9 topPence2.ForeColor = Color.Black topleftPence2.ForeColor = Color.Black topRightPence2.ForeColor = Color.Black topmiddlePence2.ForeColor = Color.Black bottomPenceRight2.ForeColor = Color.Black End Select Select Case Val(k) Case 0 topPence3.ForeColor = Color.Black topleftPence3.ForeColor = Color.Black topRightPence3.ForeColor = Color.Black bottomleftPence3.ForeColor = Color.Black bottomPenceRight3.ForeColor = Color.Black bottomPence3.ForeColor = Color.Black Case 1 topRightPence3.ForeColor = Color.Black
If you could help me please, Thanks again in advance
thrillseeker
Reply With Quote
