[jasser]

the problem is as following .
i need to call this function saveBase from more than one place
so i decided to send a number in variable x to know of what type to create the object named Model.
however when it's within the if statemet i keep getting the error that model is not declared !!!!!
how can i build the object i want of type depending on the incoming variable x ?????

thx

 Public Function SaveBase(ByVal x As Integer) As BaseHumanModel
        If x = 99 Then
            Dim Model As New StudentModel
        End If
        If x = 99 Then
            Dim Model As New UserModel
        End If
        Model.Code = TxtCode.Text
        Model.Name = TxtName.Text
        Model.Name2 = TxtName2.Text
        Model.IDNumber = TxtID.Text
        Model.Tel = TxtTel.Text
        Model.Mobile = TxtMobile.Text
        Model.BirthDate = DTPBdate.Text
        'Model.BirthLocation.Code = CmbBaseHuman.SelectedValue
        Model.Address = TxtAddress.Text
        Model.Username = TxtUserName.Text
        Model.Password = TxtPassword.Text

        Return Model
    End Function

[smohd]

You will need something like:

         Dim Model
        If x = 99 Then
            Model = New StudentModel
        End If
        If x = 99 Then
            Model = New UserModel
        End If 

[deery5000]

Hey mate

ive spotted a simple error.

Q. if x = 99 then which class should the object model be from?

If x = 99 Then

           Dim Model As New StudentModel

       End If


       If x = 99 Then

           Dim Model As New UserModel

       End If

When declaring variables inside an if statement they are local to that statement. Look at the code in previous post to correct error and revise the x=99. The object " model " be always be of the class UesrModel

This post has been edited by deery5000: 12 August 2011 - 04:18 AM

[trevster344]

You could always call a public method if the conditions are true within your If statement. So then you'd be declaring your objects publicly. Anyone correct me if I'm wrong.

This post has been edited by trevster344: 12 August 2011 - 09:08 AM

[jasser]

thx everyone

smohd, on 12 August 2011 - 02:31 AM, said:

You will need something like:

         Dim Model
        If x = 99 Then
            Model = New StudentModel
        End If
        If x = 99 Then
            Model = New UserModel
        End If 

this method seems to work
i have some further bugs i'm working on
thanks

[smohd]

We are glad to help with those also