error in me.show()

[ed]

Hi I can't seem to make the Me.Show() work

My code is

dim dlgresult as dialogresul

dlgresult=me.sh ow(

The message is : "expression does not produce a value

But if I sue this: dlgresult=Me.Sh owDialog(), it works. It's just that I need my form to me modeless

What am I missing here

Thanks :)

[Simon Jefferies]

Hello,

Me.Show() doesn't return a value this is because its modeless and execution
continues without waiting.

Just try Me.Show() on its own.

Regards
Simon Jefferies
Tools Programmer, Headfirst Productions
mailto:si****@h eadfirst.co.uk
-
"ed" <an*******@disc ussions.microso ft.com> wrote in message
news:0F******** *************** ***********@mic rosoft.com...

Hi I can't seem to make the Me.Show() work.

My code is:

dim dlgresult as dialogresult

dlgresult=me.sh ow()

The message is : "expression does not produce a value"

But if I sue this: dlgresult=Me.Sh owDialog(), it works. It's just that I
need my form to me modeless.

What am I missing here?

Thanks :)

[Cor Ligthert]

Hi Ed,

But if I sue this: dlgresult=Me.Sh owDialog(), it works.

Does this works, what did you more on your form to create this.

You shows a form itself again as a dialog withouth instancing a new one?

Tell something more what you want to archieve.

Cor

[Ed]

Oh I see. The problem now is that i need to return a value....to make it clearer, here's the rest of the code: (sorry for not showing this earlier

dim dlgresult as dialogresul

dlgresult=me.sh ow(

select case dlgresul
Case DialogResult.Ca nce
-----right code her

Case DialogResult.Ch ang
-----right code her

Case DialogResult.Ig nor
-----right code her

end selec

As you said, Me.Show doesnt return a value, how can i make my code above work? Is there a workaround? Thanks :

Hello

Me.Show() doesn't return a value this is because its modeless and execution
continues without waiting

Just try Me.Show() on its own

Regard
Simon Jefferie
Tools Programmer, Headfirst Production
mailto:si****@h eadfirst.co.u

"ed" <an*******@disc ussions.microso ft.com> wrote in message
news:0F******** *************** ***********@mic rosoft.com..

Hi I can't seem to make the Me.Show() work

My code is
dim dlgresult as dialogresul
dlgresult=me.sh ow(
The message is : "expression does not produce a value
But if I sue this: dlgresult=Me.Sh owDialog(), it works. It's just that I

need my form to me modeless

What am I missing here
Thanks :)

[Ed]

Hi Cor

What I'm doing here is a spell check routine. The spell check form will appear if it sees a misspelled word. If it finds one, then it will run this code

-----start code----

startPos = InStr(1, ctrl.Text, strWord
wordLength = Len(strWord
ctrl.Select(sta rtPos - 1, wordLength
ctrl.Focus(

dim dlgresult as dialogresul
dlgresult=me.sh ow(

select case dlgresul
Case DialogResult.Ca nce
-----right code her

Case DialogResult.Ch ang
-----right code her

Case DialogResult.Ig nor
-----right code her

end selec
----end code---

Basically, the main reason why i want the spell checker form to be modeless is because after finding a misspelled word, it will highlight that word. If the spell checker form is modal then the focus will always be on the spell checker form, thus the highlight won't be shown in the main form

The problem now is that dlgresult=me.sh ow won't work, it only works if it's dlgresult=me.sh owdialog(). How can i make it work? Thanks :

edga

Hi Ed

But if I sue this: dlgresult=Me.Sh owDialog(), it works

Does this works, what did you more on your form to create this
You shows a form itself again as a dialog withouth instancing a new one
Tell something more what you want to archieve

Co

[Armin Zingler]

"Ed" <an*******@disc ussions.microso ft.com> schrieb

Oh I see. The problem now is that i need to return a value....to make
it clearer, here's the rest of the code: (sorry for not showing this
earlier)

/When/ should it return a value?
--
Armin

How to quote and why:
http://www.plig.net/nnq/nquote.html
http://www.netmeister.org/news/learn2quote.html

[Cor Ligthert]

Hi Ed,

Normaly it goes something like this

dim dlgresult as dialogresult dim myDialog as new FormDialog dlgresult=myDia log.showDialog

Cor

[CJ Taylor]

On your SpellCheck form, when the Ok Button (or any button for that matter)
is clicked just do

Me.DialogResult = --- whatever ---

then hide the form...

thats the exact same thing show dialog does...
"Ed" <an*******@disc ussions.microso ft.com> wrote in message
news:8A******** *************** ***********@mic rosoft.com...

Oh I see. The problem now is that i need to return a value....to make it clearer, here's the rest of the code: (sorry for not showing this earlier)
dim dlgresult as dialogresult

dlgresult=me.sh ow()

select case dlgresult
Case DialogResult.Ca ncel
-----right code here

Case DialogResult.Ch ange
-----right code here

Case DialogResult.Ig nore
-----right code here

end select

As you said, Me.Show doesnt return a value, how can i make my code above work? Is there a workaround? Thanks :)

Hello,

Me.Show() doesn't return a value this is because its modeless and execution continues without waiting.

Just try Me.Show() on its own.

Regards
Simon Jefferies
Tools Programmer, Headfirst Productions
mailto:si****@h eadfirst.co.uk
-
"ed" <an*******@disc ussions.microso ft.com> wrote in message
news:0F******** *************** ***********@mic rosoft.com...

Hi I can't seem to make the Me.Show() work.

My code is:
dim dlgresult as dialogresult
dlgresult=me.sh ow()
The message is : "expression does not produce a value"
But if I sue this: dlgresult=Me.Sh owDialog(), it works. It's just that

I need my form to me modeless.

What am I missing here?
Thanks :)

[Ed]

I changed my code to

Me.Show(

select case me.dialogresul
Case DialogResult.Ca nce
-----right code her

Case DialogResult.Ch ang
-----right code her

Case DialogResult.Ig nor
-----right code her

end selec

there are no more error messages. The problem now is that the code will continue executing after Me.Show without waiting for an event on the spell check form. How can I make it stop after the Me.show? Is it possible? What i want to happen is somehow mimic the ME.ShowDialog() , but unlike it, i can switch forms (modeless).

Thanks

Ed

[Jay B. Harlow [MVP - Outlook]]

Ed,
It sounds like you are confusing returning a single value once and returning
a value multiple times.

The point behind a modeless form is to allow returning a value multiple
times. The easiest way to return a value multiple times is to have your form
raise an event.

I would recommend having the dialog raise an event when the parent form
needs Cancel, Change, or Ignore.

You then either need to use a WithEvents variable or AddHandler &
RemoveHandler to handle the events the dialog raises.

Hope this helps
Jay

"Ed" <an*******@disc ussions.microso ft.com> wrote in message
news:C5******** *************** ***********@mic rosoft.com...

I changed my code to:

Me.Show()

select case me.dialogresult
Case DialogResult.Ca ncel
-----right code here

Case DialogResult.Ch ange
-----right code here

Case DialogResult.Ig nore
-----right code here

end select

there are no more error messages. The problem now is that the code will continue executing after Me.Show without waiting for an event on the spell
check form. How can I make it stop after the Me.show? Is it possible? What i
want to happen is somehow mimic the ME.ShowDialog() , but unlike it, i can
switch forms (modeless).
Thanks,

Ed