For intIndex = 1 To intCount
        strChar = Mid$(strNumber, intIndex, 1)
        ' skipped  
  Next

for(int i=0; i<10; i++)
 {
   for(int ii=i+1; ii<10; ii++)
    {
      for(int iii.....
    }
 }

A>  For intIndex = 1 To intCount
A>        strChar = Mid$(strNumber, intIndex, 1)
A>        ' skipped  
A>  Next
A>

  for index = 1 to count
    char = mid$(strNumber, index, 1)
    ' ...
  next

Один студент очень любил давать всем элементам имена вида i, ii, i123, f(), g(), hh()...
чем весьма напрягал препода. Тот однажды зажал его в подворотне и сказал, что не примет следующую лабу, если он не будет писать длинные мнемонические идентификаторы. Студент исправился:

int long_mnemonic_identifier_i,
    long_mnemonic_identifier_ii,
    long_mnemonic_identifier_i123;

void long_mnemonic_identifier_f();
char long_mnemonic_identifier_g();
bool long_mnemonic_identifier_hh();

for(int row=0; row < 10; row++)
{
   for(int col= row; col < 10; col++)
    {
    }
}

int a;

// в роли индекса
for(a = 0; a < vec.size(); ++i) { ... }

...

// в роли элемента
for(int k = 0; k < vec.size(); ++k) { a = vec[k]; ... }

...

// в роли какого-то еще числа
a = (int) floor( exp(10) );

...

// что сейчас означает a ?

A>for(int row=0; row < 10; row++)
A>{
A>   for(int col= row; col < 10; col++)
A>    {
A>    }
A>}

A>

A>  For intIndex = 1 To intCount
A>        strChar = Mid$(strNumber, intIndex, 1)
A>        ' skipped  
A>  Next
A>

XmlNodeList nodelistGroup=nodeGrouped.SelectNodes("group");
for(int indexGroup=0; indexGroup<nodelistGroup.Count; indexGroup++)
{
    XmlNode nodeGroup=nodelistGroup.Item(indexGroup);
    Console.WriteLite("{0}:",nodeGroup.InnerText);
    XmlNodeList nodelistItem=nodeGroup.SelectNodes("item");
    for(int indexItem=0; indexItem<nodelistItem.Count; indexItem++)
    {
        XmlNode nodeItem=nodelistItem.Item(indexItem);
        Console.WriteLite(" - {0}",nodeItem.InnerText);
    }
}