Welcome to the Lounge

Quote:

On Error Resume Next

Try
       
        x = x \ y
        MessageBox.Show("end of Try block")

    Catch ex As Exception
        MessageBox.Show(ex.Message)
        MessageBox.Show("Stack Trace: " & vbCrLf & ex.StackTrace)

    Finally
        MessageBox.Show("in Finally block")
    End Try

Module Module1

    Sub Main()
        On Error Resume Next

        Console.WriteLine("Hello World!")
        Console.ReadLine()
    End Sub

End Module

for (int i = 0; i < x; i++)
        {
            for (int j = 0; j < y; j++)
            {
                if (array[i, j].Equals(myNumber))
                {
                    goto Found;
                }
            }
        }

        Console.WriteLine("The number {0} was not found.", myNumber);
        goto Finish;

    Found:
        Console.WriteLine("The number {0} is found.", myNumber);

    Finish:
        Console.WriteLine("End of search.");

Quote:

Face it: VB is based on a language designed for people who can't code, don't want to code, and have no interest in quality. It still has those early days buried deep in it's fabric: the On Error rubbish, the weak typing, the lack of need to declare anything.

Quote:

the weak typing, the lack of need to declare anything.

Option Strict On

georani wrote:

but more fun and readable to program with

georani wrote:

but more fun and readable to program with

Nathan Minier wrote:

In my experience (and as a teen, what was my experience) there isn't some sinister master plan on the part of the coder to torture code; they just don't have the grounding to really understand what's going on or why some approach is wrong/fragile/ill-conceived.

Public Class MyClass1
    Public Property Mynumber As Integer = 3
End Class

public class MyClass1
{
	public int Mynumber {get; set;} = 3;
}

georani wrote:

I Think VB.NET is more readable and fun.

public class MyClass1
{
	public int Mynumber {get; private set;} = 3;
}

Public Class MyClass1
    Private _Mynumber As Integer = 3

    Public Property Mynumber() As Integer
        Get
            Return _Mynumber
        End Get
        Private Set(value As Integer)
            _Mynumber = value
        End Set
    End Property
End Class

public class MyClass1
{
	public int Mynumber {get; private set;} = 3;
}