lionsun1987
幼苗
共回答了12个问题采纳率:83.3% 举报
三位数已知?
Private Sub Command1_Click()
Dim i As Integer
For i = 100 To 999
If i Mod 3 = 2 And i Mod 10 = 1 Then
Picture1.Print i; enter
Dim index1 As Integer
index1 = index1 + 1
End If
Next
End Su
1年前
追问
3
玛勒格鄙
举报
有VB程序吗??同学,我下载不太会,可以传过来吗??