作者:VB.NET开发
项目:System.Windows.Media.Media3
Public Sub UpdateResultInfo(ByVal rayMeshResult As RayMeshGeometry3DHitTestResult)
HitVisualInfo.Text = rayMeshResult.VisualHit.ToString()
HitModelInfo.Text = rayMeshResult.ModelHit.ToString()
HitMeshInfo.Text = rayMeshResult.MeshHit.ToString()
HitDistanceInfo.Text = rayMeshResult.DistanceToRayOrigin.ToString()
Vertex1Info.Text = (rayMeshResult.VertexWeight1 * 100) & "%"
Vertex2Info.Text = (rayMeshResult.VertexWeight2 * 100) & "%"
Vertex3Info.Text = (rayMeshResult.VertexWeight3 * 100) & "%"
End Sub