恭喜,你发布的帖子
发布于 2016-10-25 16:21:47
14楼
用VB
Dim xx, xxx
xx = 0
xxx = 0
For xx = 1 To 500000
xxx = xxx + 1
Next xx
If xxx < 5000 Or xxx < 0 Then
md = md + 1
end if
If xxx > 5000 Or xxx < 10000 Then
md = md + 10
End If
If xxx > 10000 Then
md = md + 100
End If
请填写推广理由:
分享
只看
楼主