Passing an Array

[Thomas Beyerlein]

Hello,
I am trying to build a UI and I need the user to go though about 4 forms
making decisions and then passing the decision to the next form. Finally
on the last form I need all the answers to open the next and final form,
which there are 16 different ways to go. So I thought by putting the
decisions in an array, and passing it to each form. I get this error-:
Value of type '1-dimensional array of String' cannot be converted to
'String'.

Here is an example of my code:

dim PFINFO() as string
BTNCLICK EVENT

PFINFO(0) = "F"
Dim f As New frmchooseType(pfinfo)
f.show()
Me.Close()

NEW FORM:

Public sub new(byref p as string)
mybase.new
initializecomponent()

Dim PFINFO() as string
PFINFO = P
end sub

Any help would be great

Tom

 

[Rick Mogstad]

Hello,
I am trying to build a UI and I need the user to go though about 4 forms
making decisions and then passing the decision to the next form. Finally
on the last form I need all the answers to open the next and final form,
which there are 16 different ways to go. So I thought by putting the
decisions in an array, and passing it to each form. I get this error-:
Value of type '1-dimensional array of String' cannot be converted to
'String'.

Here is an example of my code:

dim PFINFO() as string
BTNCLICK EVENT

PFINFO(0) = "F"
Dim f As New frmchooseType(pfinfo)
f.show()
Me.Close()

NEW FORM:

Public sub new(byref p as string)
mybase.new
initializecomponent()

Dim PFINFO() as string
PFINFO = P
end sub

Any help would be great

Tom

You told it in the new that you wanted a string parameter rather than a
string() parameter. It is telling you that it cannot convert a string array
to a string.

 

[Herfried K. Wagner [MVP]]

So I thought by putting the
decisions in an array, and passing it to each form. I get this error-:
Value of type '1-dimensional array of String' cannot be converted to
'String'.

Here is an example of my code:

dim PFINFO() as string
BTNCLICK EVENT

PFINFO(0) = "F"
Dim f As New frmchooseType(pfinfo)
f.show()
Me.Close()

NEW FORM:

Public sub new(byref p as string)

=> '...(ByVal p() As String)'.