Who knows how I can translate this to VB D3D Code?
It's quite confusing for someone who never coded OpenGL

to quote my friend who's busy with it:.

"Can you tell me how i could convert this GL rendercode to D3D triangle Strip or triangle list."


Code:
 for ( int j = 0; j < WATERY; j++ )
 {
  glBegin( GL_QUAD_STRIP );
  
  for ( int i = 0; i < WATERX; i++ )
  {
   int x = i&(WATERX-1);
   int y = j&(WATERY-1);
   int y1 = (j+1)&(WATERY-1);

   glNormal3fv( (float*)&waterNormal[ x + y * WATERX ] );
   glTexCoord2f( i * 0.3f, j * 0.3f );
   glVertex3f( (float)( i-WATERX/2 ), 
         waterHeight[ x + y * WATERX ],
      (float)( j-WATERY/2 ) );

   
   glNormal3fv( (float*)&waterNormal[ x + y1 * WATERX ] );
   glTexCoord2f( i * 0.3f, j * 0.3f + 0.3f );
   glVertex3f( (float)( i-WATERX/2 ), 
         waterHeight[ x + y1 * WATERX ],
      (float)( j+1-WATERY/2 ) );
  }
  
  glEnd();
 }
Thanks if someone knows how to translate this.