2019年11月20日
3、循环语句
摘要： 1、 Sub 奇数() Dim i As Integer xrow = 1 For i = 1 To 100 Step 2 Cells(xrow, "A").Value = i xrow = xrow + 1 NextEnd Sub 2、 Sub 能被3整除的数() Dim i As Integer 阅读全文
posted @ 2019-11-20 09:59 chengeng45 阅读(102) 评论(0) 推荐(0)