Code: Select all
Imports System
Imports System.IO
Imports Irrlicht
Imports Irrlicht.Video
Imports Irrlicht.Core
Imports Irrlicht.Scene
Module Module1
Sub Main()
Dim mDevice As New IrrlichtDevice(Video.DriverType.OPENGL, New Dimension2D(1024, 768), 32, False, True, False)
Dim mDebug As System.IO.TextWriter
mDebug = Console.Out
If (mDevice Is Nothing) Then
mDebug.WriteLine("Device nao definido !")
Exit Sub
End If
Dim mScene As ISceneManager = mDevice.SceneManager
Dim mDriver As IVideoDriver = mDevice.VideoDriver
While mDevice.Run()
End While
End Sub
End Module
System.IO.FileNotFoundException was unhandled
Message="Não foi possível encontrar o módulo especificado. (Exception from HRESULT: 0x8007007E)"
Source="HP"
StackTrace:
at HP.Module1.Main()
at System.AppDomain.nExecuteAssembly(Assembly assembly, String[] args)
at System.AppDomain.ExecuteAssembly(String assemblyFile, Evidence assemblySecurity, String[] args)
at Microsoft.VisualStudio.HostingProcess.HostProc.RunUsersAssembly()
at System.Threading.ThreadHelper.ThreadStart_Context(Object state)
at System.Threading.ExecutionContext.Run(ExecutionContext executionContext, ContextCallback callback, Object state)
at System.Threading.ThreadHelper.ThreadStart()