VB,编写程序,找出7的倍数中十位数为2的所有3位数.

问题描述:

VB,编写程序,找出7的倍数中十位数为2的所有3位数.

Private Sub Command1_Click()
Dim i%
For i = 100 To 999
If i Mod 7 = 0 And Mid(CStr(i),2,1) = "2" Then Print i
Next
End SubMid(CStr(i), 2, 1) = "2"中 (CStr(i), 什么意思???请翻译一下