作业帮 > 数学 > 作业

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

来源:学生作业帮 编辑:搜搜考试网作业帮 分类:数学作业 时间:2024/05/01 16:20:00
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 Sub
再问: Mid(CStr(i), 2, 1) = "2"中 (CStr(i), 什么意思???请翻译一下