MsgBox() throws exception

[IlyaRabyy]

Colleagues,
I've never seen anything like this! This is what system throws

which is totally untrue, here's the code (from the line #1 on):

Imports System
Imports System.Net
Imports System.String
Imports System.IO
Imports System.Windows.Forms
Imports System.Threading
Imports System.Net.Mail
Imports System.Windows
Imports Microsoft.VisualBasic
Imports Microsoft.VisualBasic.FileIO
'====================================================================================================================================
Module Common_Subs_Functions
'====================================================================================================================================
Public Sub Main()
'====================================================================================================================================
' Purpose       : Test the functions and procedures of the Common_Functions class.
' Description   : N/A.
' Parameters	: N/A.
' Returns	: N/A.
' Side effects  : N/A.
' Notes         : 1. Non-specific.
'                 2. Complies with .NET Framework ver. X.X and higher.
' Author        : Ilya I. Rabyy
' Revisions     : by Ilya on 2022-12-15 - started 1st draft.
'====================================================================================================================================
' Testing WaitNSeconds

For I As Int16 = 0 To 10
	MsgBox(I.ToString() & " seconds elapsed")
	WaitNSeconds(5)
Next

End Sub
'====================================================================================================================================

WaitNSeconds() is the procedure I have programmed and tried to test.

IOW, it looks like the VS (2019) doesn't "see" System.Windows.Forms when I have it as Windows Application in the Project's properties, and all the needed components are Imported.

What am I doing wrong?
Please advise!
TIA!


Regards,

Ilya

 

[Andrzejek]

Shouldn't you use:

MessageBox.Show(I.ToString() & " seconds elapsed")

---- Andy

"Hmm...they have the internet on computers now"--Homer Simpson

 

[IlyaRabyy]

No, Andy, this syntax is for C# rather than for VB.
Refer to

https://learn.microsoft.com/en-us/d...ic.interaction.msgbox?view=netframework-4.7.1

What makes it even more strange is that the same syntax works flawlessly in my other programs!

Regards,

Ilya

 

[strongm]

Well, Andy has a point: MessageBox is the component in System.Windows.Forms; msgbox is in the Microsoft.VisualBasic namespace (as the documention you link to states)

So something odd is going on.

Your code (with an added End Module (and commenting out the WaitNSeconds line) works 100% as expected here (as long as I rename Sub Main). Can you confirm exactly what type of project you are creating?

 

[IlyaRabyy]

works 100% as expected here (as long as I rename Sub Main)

Rename how/to what?
Please clarify.

Regards,

Ilya

 

[strongm]

Oh, I have a test application into which I drop people's example code. It already has a Sub Main, so I have to rename YOUR Sub Main. You should not have to, though.

 

[IlyaRabyy]

It already has a Sub Main, so I have to rename YOUR Sub Main. You should not have to, though.

Got it, thanks!

Still can't figure out what's going on.
Here's another weird thing:

Now I am at total loss!

Regards,

Ilya