[Vb.net] String InvalidCastException

[comprobot]

code:

Module result

    Private pin1 As String
    Private pin2 As String
    Public Function setValue(ByVal pin As String, ByVal i As Integer)
        If i = 0 Then pin1 = pin Else pin2 = pin
    End Function

    Public Function getvalue(ByVal i As Integer) As String
        If i = 0 Then getvalue = pin1 Else getvalue = pin2

    End Function


End Module

Ik heb geprobeerd met string .

code:

result.setValue("0",1) 
dim keuze as string 
keuze = result.getValue(1)

Het komt een foutmelding InvalidCastExecption .

Maar bij vb6 is er geen probleem ..

dit code was bestemd voor .Net Framework Compact

waarom?

[gorgi_19]

Visual Basic .NET:

Public Class Result

    Private pin1 As String
    Private pin2 As String

    Public Sub setValue(ByVal pin As String, ByVal i As Integer)

        If i = 0 Then 
             pin1 = pin 
        Else 
             pin2 = pin
        End if

    End Sub

    Public Function getvalue(ByVal i As Integer) As String

        If i = 0 Then 
           return pin1 
        Else 
          return pin2
        End if

    End Function

End Class

' .........
Dim __result as Result = new Result()
result.setValue("0",1) 
Dim keuze as string = result.getValue(1)

zou moeten werken?

[comprobot]

gorgi_19 schreef op 03 februari 2004 @ 01:34:

Visual Basic .NET:

Public Class Result

    Private pin1 As String
    Private pin2 As String

    Public Sub setValue(ByVal pin As String, ByVal i As Integer)

        If i = 0 Then 
             pin1 = pin 
        Else 
             pin2 = pin
        End if

    End Sub

    Public Function getvalue(ByVal i As Integer) As String

        If i = 0 Then 
           return pin1 
        Else 
          return pin2
        End if

    End Function

End Class

' .........
Dim __result as Result = new Result()
result.setValue("0",1) 
Dim keuze as string = result.getValue(1)

zou moeten werken?

andere probleem: Reference to a non-shared member requires an object reference.

[gorgi_19]

Dan moet je of mijn code goed overnemen of de methods en vars Shared declaren.

Wat is trouwens het nut van deze functie?

[ Voor 24% gewijzigd door gorgi_19 op 03-02-2004 01:56 ]

[Uiligheid]

edwtie schreef op 03 februari 2004 @ 01:43:
[...]


andere probleem: Reference to a non-shared member requires an object reference.

Volgens mij pakt hij de verwijzing naar je class hier niet.