fork download

copy

Imports System
Declare Function GetStdHandle Lib "kernel32" (ByVal _
           nStdHandle As Long) As Long
Declare Function WriteConsole Lib "kernel32" Alias "WriteConsoleA" _
           (ByVal hConsoleOutput As Long, lpBuffer As Any, ByVal _
           nNumberOfCharsToWrite As Long, lpNumberOfCharsWritten As Long, _
           lpReserved As Any) As Long
Public Class Test
	Public Shared Sub Main()
		Dim hConsole As Long
		hConsole = GetStdHandle(STD_OUTPUT_HANDLE)
		If hConsole = 0 Then Console.WriteLine("0")
	End Sub
End Class

Visual Basic.Net Compiler version 0.0.0.5914 (Mono 2.4.2 - r)
Copyright (C) 2004-2008 Rolf Bjarne Kvinge. All rights reserved.


/home/Zjfo4h/prog.vb (2,8) : Error VBNC30203: Not valid as identifier.
/home/Zjfo4h/prog.vb (4,8) : Error VBNC30203: Not valid as identifier.
There were 2 errors and 0 warnings.
Compilation took 00:00:00.6484950

Standard output is empty