早教吧作业答案频道 -->数学-->
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
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
看了 VB,编写程序,找出7的倍数...的网友还看了以下：
读我国矿产资源分布图，完成下列题：（1）写出图中数码所代表的油田名称．①，②，③（2）写出图中数码 2020-04-06 …
写出图中字母或数字代表的地理名称：（1）写出图中数字代号所代表的地理事物名称海洋：①②③④⑤海峡： 2020-05-16 …
用2,4,7,0,四个数字求写数(所写的各数中,每个数字只能出现一次)1,小于1的三位数.2,大于 2020-06-03 …
在正方体的8个顶点处分别标上1，2，3，4，5，6，7，8，然后再把每条棱两端所标的两个数之和写在 2020-06-11 …
读世界地图，写出图中字母所代表的地理事物的名称：（1）写出图中字母所表示的大洲的名称：A洲，B洲， 2020-06-14 …
黑白团队各写下一个数，每三人所写的数的平均数加上余下一人所写的数之和分别是55、37、33、49， 2020-07-15 …
1、一个两位数,在它的后面写上0,所成的三位数比原两位数多333,原来的两位数是2、在一个三位数前 2020-07-19 …
1）n°圆心角所对的弧长是圆周长的（）.（填写分数）2）在半径为r的圆中,一条弧长为l的弧所对的圆 2020-07-26 …
读东西半球图回答下列问题：（1）写出图中数字所代表的大洲名称①③④⑥其中面积最大的大洲是．（2）写 2020-07-29 …
把1~8这8个数字放到一个正方体的八个顶点处,然后在每条棱的中点处写上这条棱的两个顶点处所写的数的 2020-08-01 …