Home > Visual Basic Language > C# fixed to VB

C# fixed to VB

what would be the VB conversion for this?

fixed(void* pxBasis = &modelRotation.M11)

{

fixed(void* pyBasis = &modelRotation.M21)

{

fixed(void* pzBasis = &modelRotation.M31)

{

UnsafeNativeMethods.Vector3.Normalize((Vector3*)pxBasis, (Vector3*)pxBasis);

UnsafeNativeMethods.Vector3.Cross((Vector3*)pyBasis, (Vector3*)pzBasis, (Vector3*)pxBasis);

UnsafeNativeMethods.Vector3.Normalize((Vector3*)pyBasis, (Vector3*)pyBasis);

UnsafeNativeMethods.Vector3.Cross((Vector3*)pzBasis, (Vector3*)pxBasis, (Vector3*)pyBasis);

}

}

}

thanks

JAG33912 Sunday, February 05, 2006 10:51 PM

would this do the job?

Dim pxBasis As New Vector3(ModelRotation.M11, ModelRotation.M12, ModelRotation.M13)

Dim pyBasis As New Vector3(ModelRotation.M21, ModelRotation.M22, ModelRotation.M23)

Dim pzBasis As New Vector3(ModelRotation.M31, ModelRotation.M32, ModelRotation.M33)

pxBasis = Vector3.Normalize(pxBasis)

pyBasis = Vector3.Cross(pzBasis, pxBasis)

pyBasis = Vector3.Normalize(pyBasis)

pzBasis = Vector3.Cross(pxBasis, pyBasis)

With ModelRotation

.M11 = pxBasis.X

.M12 = pxBasis.Y

.M13 = pxBasis.Z

.M21 = pyBasis.X

.M22 = pyBasis.Y

.M23 = pyBasis.Z

.M31 = pzBasis.X

.M32 = pzBasis.Y

.M33 = pzBasis.Z

End With

JAG33912 Monday, February 06, 2006 4:08 AM

Moved to VB forum

David Weller - NVIDIA Monday, February 06, 2006 9:57 PM

You can use google to search for other answers

Custom Search

More Threads

• Class Reflection Problem

• New Project Inquiry

• unable to refresh ListView

• How to create a new datarow by it's self?

• DefaultLocation

• problems with dynamic control creating

• Regarding Sql statements

• Getting the result from a simple dir /s

• Search text in .BIN (binary) file

• VISUAL BASIC & SQL SERVER