加入收藏 | 设为首页bet体育备用
 365bet投注
有一个VB代码可以绘制这样写的钻石
发布时间:2019-03-22 点击:
有一个VB代码可以绘制这样写的钻石
PrivateSubForm_Click()Fori = 1到5 Forj = 6 - iTo 1 PrintNextjForj = 1到2 * i - 1打印*下一个jPrintNextiFori = 1到4 Forj = 1 Toi + 1 PrintNextjForj = 1到9 - 2 * iPrint * NextjPndint 1
PrivateSubForm_Click()Fori = 1To5Forj = 6 - iTo1PrintNextjForj = 1 - iPrint * NextjPrintNextiFori = 1To4Forj = 1To4Forj = AE本文中类的百分比。Print3print“”;用逗号后跟分号退出空格
要部署