How To Use The With Statement

[ChubbyArse]

Hi All.

I have a code snippett, that Id like to use the with statement, to make it more readable.

If frmComponentSearchForm Is Nothing Then
frmComponentSearchForm = New frmPartSearch
frmComponentSearchForm.MdiParent = Me.ParentForm
frmComponentSearchForm.Show()
Else
frmComponentSearchForm.Show()
End If

How would I use the with statement, beacuse as far as I know I cant use the = operator with the object which is the subject of the with:

With frmComponentSearchForm
If withobject Is Nothing Then
withobject = New frmPartSearch
.MdiParent = Me.ParentForm
.Show()
Else
.Show()
End If
End With

Is there a better may of doing this?

Thanks Very Much!

 

[dynamic_sysop]

the If statement seems fine to me, although you could use a Boolean value to see if a form exsists or not, eg:

Private Exsists As Boolean 
/// somewhere below the windows generated code section ^^^.
///
If Not Exsists Then
    With frmComponentSearchForm
        .MdiParent = MyBase.ParentForm
        frmComponentSearchForm = New frmPartSearch
       .Show()
       Exsists = True /// prevent more instances of a New Form.
Else
    frmComponentSearchForm.Show()
End If

 

[ChubbyArse]

Thanks

I was really asking how do you set an object, or test for is nothing when the object is in a with statement?

 

[dynamic_sysop]

heres a quick example of checking if a Form is Nothing or not...

    If frmComponentSearchForm Is Nothing Then
        MessageBox.Show("its nothing!")
        /// do your stuff here. eg:
    With frmComponentSearchForm
        .MdiParent = MyBase.ParentForm
        frmComponentSearchForm = New frmPartSearch
       .Show()
    Else
        MessageBox.Show("it exsists!")
        /// just show the Form.
        frmComponentSearchForm.Show()
    End If

not sure if that helps.

 

[ChubbyArse]

With frmSearch

How do I test frmSearch here for nothing?
If I can at all????

If I do this within a with statement
frmSearch = new frmSearch
.MDIParent = Me.ParentForm

The Code falls over on the line above,
statingobject not set to an instance.

End With

Does a with statement, only allow you access tot he objects properties and methods?
Are you allowed to modify the actual object (set it to a new, check for nothing)?

 

[ChubbyArse]

I know how to check an object is nothing.