欢迎您来到CFG全球,投资有风险,选择需谨慎!
当前位置 : CFG全球 > 理财社区问答 > 详情
?
VB编程问题.请金斧子专家帮下忙
2025.04.30 21:38:56· 莹火‘’茧 浏览23次
1条回答
1F
OptionExplicitOptionBase1PrivateSubForm_Click()Dimn,i,jAsIntegerDima()AsIntegern=Val(InputBox("n="))ReDima(n,n)Fori=1TonForj=1TonIfi=jOri+j=n+1Thena(i,j)=1Elsea(i,j)=0EndIfPrinta(i,j);NextjPrintNextiEndSub
2025.05.01 19:50:35 · 萧经理
0