請問如何在VB.NET中應(yīng)用OpenGL?

受不了，中國的人才到哪去了，這個(gè)問題被看了2067次居然還是沒有人回答。不好意思，我不是來回答的，我是看到這個(gè)比較氣憤而已，這個(gè)答案我找了快一個(gè)小時(shí)了，還是沒找到。

在康保等地區(qū)，都構(gòu)建了全面的區(qū)域性戰(zhàn)略布局，加強(qiáng)發(fā)展的系統(tǒng)性、市場前瞻性、產(chǎn)品創(chuàng)新能力，以專注、極致的服務(wù)理念，為客戶提供網(wǎng)站設(shè)計(jì)、成都網(wǎng)站制作 網(wǎng)站設(shè)計(jì)制作按需策劃設(shè)計(jì),公司網(wǎng)站建設(shè),企業(yè)網(wǎng)站建設(shè),成都品牌網(wǎng)站建設(shè),成都全網(wǎng)營銷推廣,外貿(mào)營銷網(wǎng)站建設(shè),康保網(wǎng)站建設(shè)費(fèi)用合理。

關(guān)于 vb.net 引用directx的問題

.net 的WPF工程，用的就是directX,根本無需使用directx sdk。。。 而且WPF 非常方便比directX sdk好用，10倍以上，主要是簡單。。。用.net還要去用directX sdk，本來就是個(gè)很不明智的事，因?yàn)閃PF把directX封裝的非常完美。。。

VB.net可以開發(fā)小型3D圖形顯示軟件嗎？

可以借助DirectX來編程。免費(fèi)3D引擎可不好找，一般來說速度比不上硬件加速后的DX，尤其令人頭疼的是一般都沒有針對VB的文檔，LZ有這方面理想的話，自己寫一個(gè)吧……

我不得不承認(rèn)在VB上寫DirectX的教程相當(dāng)難找！如果LZ想深入研究三維圖形問題，C++一定要學(xué)，就算不能用C++編程，起碼要能把C++程序翻譯成VB程序。

我自己學(xué)會(huì)DX編程花了兩三個(gè)月（很淺）。編這樣一個(gè)程序難度是有點(diǎn)大的。

工具：DirectX9和其針對VB的庫(項(xiàng)目-添加引用。.NET庫里DX庫一般都有)，VB不知道現(xiàn)在支不支持DX10以上的版本，不過9絕對夠用了。

思路：一切3D圖形都是由三角形拼成的。矩形挖掉一個(gè)圓孔可不是一個(gè)方便畫的圖形，我估計(jì)至少得有24個(gè)三角形。你需要記錄這些點(diǎn)的坐標(biāo)，或者干脆把它們寫在文件里，到時(shí)讀出來。

這是我的一個(gè)老DX程序的不完全的代碼(顯示一個(gè)黑乎乎的平面)，不一定能編譯，可以參考一下。

Imports Microsoft.DirectX '一定要~

Public Class FormMain

'Direct3D Startup

Dim d3dpp As New Direct3D.PresentParameters 'DX基本參數(shù)，例如全屏還是窗口等

Public MyDevice As Direct3D.Device ‘DX基本設(shè)備，畫圖就靠它。

'Matrices

Dim matWorld, matView, matProj As Matrix '世界位置矩陣，攝像機(jī)位置矩陣和透視矩陣，數(shù)學(xué)要學(xué)好啊。

'mesh

Public MyPlane as Direct3D.Mesh ’我們的物體

Public VBPlane(3) As Direct3D.CustomVertex.PositionNormalTextured '存放頂點(diǎn)位置的數(shù)組

#Region "DX Core"

Public Sub InitDeviceObjects()

With d3dpp ‘以下請照抄。

.Windowed = True ‘不全屏。

.SwapEffect = Direct3D.SwapEffect.Discard ’雙緩沖交換效果。請百度“雙緩沖”

.BackBufferFormat = Direct3D.Format.Unknown

.EnableAutoDepthStencil = True ’讓DX自動(dòng)管理深度緩沖

.AutoDepthStencilFormat = Direct3D.DepthFormat.D16

End With

MyDevice = New Direct3D.Device(0, Direct3D.DeviceType.Hardware, Me.Handle, Direct3D.CreateFlags.HardwareVertexProcessing, d3dpp) '創(chuàng)建DX設(shè)備啦！以下兩句請照抄。

MyDevice.SetRenderState(Direct3D.RenderStates.ZEnable, True) ‘Z緩沖

MyDevice.SetRenderState(Direct3D.RenderStates.NormalizeNormals, True)'法線歸一化，請看相關(guān)數(shù)學(xué)書籍。

End Sub

Public Sub RestoreDeviceObjects()

Dim PlaneIB() As Short = {0, 1, 3, 0, 2, 3} ’頂點(diǎn)索引信息。

Dim AttrTable(1) As Direct3D.AttributeRange ‘頂點(diǎn)分組屬性表

AttrTable(0).AttributeId = 0

AttrTable(0).FaceStart = 0

AttrTable(0).FaceCount = 2 ’有兩個(gè)三角形

AttrTable(0).VertexStart = 0

AttrTable(0).VertexCount = 4 ‘四個(gè)點(diǎn)

‘頂點(diǎn)坐標(biāo)信息。

VBPlane(0) = New Direct3D.CustomVertex.PositionNormalTextured(-500, -500, 0, 0, 0, 1, 0, 0)

VBPlane(1) = New Direct3D.CustomVertex.PositionNormalTextured(500, -500, 0, 0, 0, 1, 1, 0)

VBPlane(2) = New Direct3D.CustomVertex.PositionNormalTextured(-500, 500, 0, 0, 0, 1, 0, 1)

VBPlane(3) = New Direct3D.CustomVertex.PositionNormalTextured(500, 500, 0, 0, 0, 1, 1, 1)

MyPlane = New Direct3D.Mesh(2, 4, Direct3D.MeshFlags.Managed, Direct3D.VertexFormats.Position + Direct3D.VertexFormats.Normal + Direct3D.VertexFormats.Texture1, MyDevice) ’創(chuàng)建物體

MyPlane.SetVertexBufferData(VBPlane, Direct3D.LockFlags.None) ‘輸入頂點(diǎn)坐標(biāo)數(shù)據(jù)

MyPlane.SetIndexBufferData(PlaneIB, Direct3D.LockFlags.None) ‘輸入索引數(shù)據(jù)

MyPlane.SetAttributeTable(AttrTable) ‘輸入頂點(diǎn)分組屬性表

End Sub

Public Sub Render() ‘調(diào)用它畫圖

Dim vlook As New Vector3(1, 0, 0)

Dim vPos As New Vector3(0,0,0)

Dim vUp As New Vector3(0, 0, 1)

MatView = Matrix.LookAtLH(vPos, vlook, vUp) ‘計(jì)算攝像機(jī)位置矩陣

Device.SetTransform(Direct3D.TransformType.View, MatView) ‘設(shè)置當(dāng)前攝像機(jī)位置矩陣為MatView。

Dim fAspect As Single = Me.Width / Me.Height ’窗口長寬比

matProj = Matrix.PerspectiveFovLH(Math.PI / 4, fAspect, 1.0F, 10001) ‘計(jì)算透視矩陣MatProj。

MyDevice.SetTransform(Direct3D.TransformType.Projection, matProj) ‘設(shè)置當(dāng)前透視矩陣為MatProj。

MyDevice.Clear(Direct3D.ClearFlags.Target + Direct3D.ClearFlags.ZBuffer, Color.Blue, 1.0F, 0) ’先刷藍(lán)屏

MyDevice.BeginScene() ‘開始畫

MatWorld = Matrix.Identity ’物體位于原點(diǎn)，不旋轉(zhuǎn)

Device.SetTransform(Direct3D.TransformType.World, MatWorld) ’設(shè)置物體位置

Me.Mesh.DrawSubset(0) ‘畫物體

MyDevice.EndScene() ’結(jié)束

MyDevice.Present() ‘顯示在屏幕上

End Sub

Public Sub DeleteDeviceObjects() ’結(jié)束程序時(shí)放掉資源

MyPlane.Dispose()

MyDevice.Dispose()

End Sub

#End Region

Private Sub FormMain_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing

DeleteDeviceObjects()

Windows.Forms.Cursor.Show()

End Sub

Private Sub FormMain_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

InitDeviceObjects()

RestoreDeviceObjects()

Windows.Forms.Cursor.Hide()

Render()

End Sub

End Class

如何用vb.net進(jìn)行網(wǎng)站開發(fā)

打開VS?,?選擇VisualBasic?--?Web?--?ASP.NET?Web?應(yīng)用程序

如下圖:

vb.net中怎么調(diào)用DirectX來播放視頻

使用Microsoft.DirectX.AudioVideoPlayback組件。

首先，需要安裝DirectX SDK.

DirectX 9.0c Redistributable

DirectX 9.0 SDK Update

然后將對Microsoft.DirectX.AudioVideoPlayback.dll的引用添加到你的項(xiàng)目。

使用這段代碼在Panel控件上放置一個(gè)視頻文件：

ImportsMicrosoft.DirectX.AudioVideoPlayback

Public Class Form1

Private Sub Form1_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs) Handles MyBase.Load

Dim videoFile As Audio =New Audio("D:\Video1.avi")

videoFile.Owner = Panel1

videoFile.Play()

EndSub

EndClass

'以前收集的資料，沒用過,你自己整整

2)使用Windows Media Player控件也能播放視頻。

右擊工具箱-選項(xiàng)- COM組件-定位并添加“Windows Media Player” ActiveX控件

然后“Windows Media Player”控件將會(huì)出現(xiàn)在工具箱上。將它拖動(dòng)到窗體上來生產(chǎn)一個(gè)AxWindowsMediaPlayer1對象,并為URL屬性指定音頻或者視頻文件。

AxWindowsMediaPlayer1.URL = "D:\VideoOrAudio.wmv"

Media Player控件默認(rèn)將會(huì)自動(dòng)播放文件。

VB.net 和C#.net 各有什么優(yōu)缺點(diǎn)

C#.net優(yōu)點(diǎn)：

運(yùn)算符重載。不安全代碼（指針和固定內(nèi)存區(qū)）、?無符號整數(shù)、移位運(yùn)算。

VB的優(yōu)點(diǎn)：?

即時(shí)編譯、靜態(tài)事件綁定、條件異常捕獲、COM兼容類、寬松的類型檢查和變量聲明、VisualBasicRuntime庫、可選參數(shù)、帶參數(shù)屬性、模塊等語言特征、動(dòng)態(tài)數(shù)組。

通過VB.NET開發(fā)好的程序絕對沒有問題（包括DirectX游戲開發(fā)）。雖然VB.NET的資料少，但是只要C#支持的VB.NET都支持（大體上這樣，因?yàn)槎家?jīng)過MSIL中間環(huán)節(jié)。除了指針之類的VB.NET不支持C#支持，但是沒有多大實(shí)際用處）。

vb.net的資料以英文資料居多（只有英文資料才有看頭，中國的沒有什么好資料），得看看英文水平過不過關(guān)。還有VB.NET的ide也比C#的IDE好得多，代碼看得也舒服。（C#的大括號｛｝太煩人）。

至于VB6對C的幫助，只是理解上會(huì)容易一些，其它用處不大。有VB6的基礎(chǔ)學(xué)VBNET會(huì)方便一些，但是并不是會(huì)VB6就會(huì)VB.NET，它們差別也不小。

擴(kuò)展資料：

NET、C#和ASP.NET之間的區(qū)別：

1、NET是一個(gè)平臺(tái)，一個(gè)抽象的平臺(tái)的概念。

NET平臺(tái)其本身實(shí)現(xiàn)的方式其實(shí)還是庫，抽象層面上來看是一個(gè)平臺(tái)。

基本可以理解的NET核心就是NETFramwork。

NETFramework包括兩個(gè)關(guān)鍵組成元素：

a.CommonLanguageRuntime，公共語言運(yùn)行時(shí)（CLR0）-提供內(nèi)在管理，代碼安全性檢測等功能。

b.NETFrameworkClassLibrary，.NET框架類庫（FLC）-提供大量應(yīng)用類庫，提高開發(fā)效率。

學(xué)習(xí)NETFramework是所有.NET開發(fā)人員都必須的，否則開發(fā)NET程序永遠(yuǎn)都是停留在‘外功’的招式，NETramework是NET開發(fā)高手的‘內(nèi)功’修行之一。

2、C#是一個(gè)程序設(shè)計(jì)語言，僅僅是一個(gè)語言。

程序設(shè)計(jì)語言僅僅是為了方便開發(fā)人員和計(jì)算機(jī)溝通的工具，雖然C#語法相對C和?C+要多一些，但是相對來看C#語法都比較固定，這樣使用起來卻都很容易。我認(rèn)可一位朋友說的，C#的語法更嚴(yán)謹(jǐn)！

這里回過來看看NET和C#的關(guān)系，不得不提的是NET程序的執(zhí)行過程。

C#符合NETCLR中的公共語言運(yùn)行規(guī)范。CLS:commonlanguagespecification，當(dāng)然所有的NETLanguage都是符合這個(gè)規(guī)范的例如：VB.NET、XAML和C++/CL等等。

C#需要符合NETCLS，是因?yàn)镹ETCLR和JAVA虛擬機(jī)類似，有一個(gè)中間語言共機(jī)器來執(zhí)行。所有不同語言的.NET代碼在執(zhí)行前會(huì)被編譯成同樣的中間語言(MSIL)，所以所有NET支持語言都必須符合符合CLS規(guī)范。

P.S：如果做.NET3.0XAML開發(fā)的朋友，可以嘗試下ildasm.exe看看XAML的應(yīng)用程序，會(huì)發(fā)現(xiàn)原來XAML其實(shí)很簡單。

3、ASP.NET是一個(gè)網(wǎng)站開發(fā)的技術(shù)，僅僅是.NET框架中的一個(gè)應(yīng)用模型。

用微軟公司ASP.NET快速入門中的一句話來解釋，ASP.NET是用于生成基于Web的應(yīng)用程序的內(nèi)容豐富的編程框架。

ASP.net和C#的區(qū)別：

編寫asp.net通常包括兩部分的代碼:網(wǎng)頁層和后臺(tái)處理層，網(wǎng)頁就是用標(biāo)記語言來寫的，而網(wǎng)頁對應(yīng)的后臺(tái)處理程序則需要.net語言來完成，目前主要是采用c#和vb.net。

可以說整個(gè)的asp.net網(wǎng)站通過c#或者vb.net來實(shí)現(xiàn)。而c#則是ms.netframework的主要語言，可以用在網(wǎng)站，桌面應(yīng)用等方面。可以算是一種比較流行的編程語言。