Event Handler error/problem Resolved

dashley

Well-known member
Joined
May 27, 2005
Messages
59
Location
Tennessee
Programming Experience
10+
The procedure below works fine on a normal windows form. When I put it in a PPC project form (compact framework) the line i have marked with ***** gives me a "to many arguments to Public sub New" error. Does anyone have any ideas on how this can be corrected?

Thanks

Dan

VB.NET:
[/size]
[size=2][color=#0000ff]Dim[/color][/size][size=2] handlerFile [/size][size=2][color=#0000ff]As[/color][/size][size=2] EventHandler
handlerFile = [/size][size=2][color=#0000ff]New[/color][/size][size=2] EventHandler([/size][size=2][color=#0000ff]AddressOf[/color][/size][size=2] MenuItemFileClick)
 
[/size][size=2][color=#0000ff]Dim[/color][/size][size=2] I [/size][size=2][color=#0000ff]As[/color][/size][size=2][color=#0000ff]Integer
 
[/color][/size][size=2][color=#0000ff]Dim[/color][/size][size=2] FileLine [/size][size=2][color=#0000ff]As[/color][/size][size=2][color=#0000ff]String
 
[/color][/size][size=2][color=#0000ff]Dim[/color][/size][size=2] pre_FileLine [/size][size=2][color=#0000ff]As[/color][/size][size=2][color=#0000ff]String
 
[/color][/size][size=2][color=#0000ff]Dim[/color][/size][size=2] sr [/size][size=2][color=#0000ff]As[/color][/size][size=2] StreamReader = [/size][size=2][color=#0000ff]New[/color][/size][size=2] StreamReader("mtrxcat.txt")
 
[/size][size=2][color=#0000ff]Dim[/color][/size][size=2] myArray() [/size][size=2][color=#0000ff]As[/color][/size][size=2][color=#0000ff]String
 
[/color][/size][size=2][color=#0000ff]Dim[/color][/size][size=2] MySTRING [/size][size=2][color=#0000ff]As[/color][/size][size=2][color=#0000ff]String
 
 
 
[/color][/size][size=2]I = 0
 
[/size][size=2][color=#0000ff]While[/color][/size][size=2] sr.Peek > 0
 
FileLine = (sr.ReadLine)
 
pre_FileLine = Replace((FileLine), Chr(34), " ")
 
myArray = pre_FileLine.Split(",")
 
[/size][size=2][color=#0000ff]If[/color][/size][size=2] UBound(myArray) >= 2 [/size][size=2][color=#0000ff]Then
 
[/color][/size][size=2]MySTRING = myArray(3).ToString
 
[/size][size=2][color=#0000ff]Dim[/color][/size][size=2] men1 [/size][size=2][color=#0000ff]As[/color][/size][size=2][color=#0000ff]New[/color][/size][size=2] MenuItem(MySTRING, handlerFile) *****
 
[/size][size=2][color=#0000ff]Me[/color][/size][size=2].MenuItem1.MenuItems.Add(men1)
 
[/size][size=2][color=#0000ff]End[/color][/size][size=2][color=#0000ff]If
 
[/color][/size][size=2]I = I + 1
 
[/size][size=2][color=#0000ff]End[/color][/size][size=2][color=#0000ff]While[/color][/size]
[size=2][color=#0000ff]
[/color]
 
Last edited:
Resolved

Well for what its woth I found a obscure writing on the subject and the following code works


VB.NET:
[size=2][color=#0000ff]Dim[/color][/size][size=2] menuitem(Menux) [/size][size=2][color=#0000ff]As[/color][/size][size=2] MenuItem
 
menuitem(Menux) = [/size][size=2][color=#0000ff]New[/color][/size][size=2] MenuItem
 
[/size][size=2][color=#0000ff]Me[/color][/size][size=2].MenuItem8.MenuItems.Add(menuitem(Menux))
 
menuitem(Menux).Text = myArray(3)
 
[/size][size=2][color=#0000ff]AddHandler[/color][/size][size=2] menuitem(Menux).Click, [/size][size=2][color=#0000ff]AddressOf[/color][/size][size=2] MenuItemFileClick
 
[/size]
 
Last edited:
If you check the help topic for the MenuItem constructor you'll see that only the most basic constructor (the one with no arguments) is supported by the compact framework. The Visual Studio help system is a wonderful thing. Every method has a help topic and it tells you whether it is supported by the compact framework.
 
Back
Top