VB 操作题题库 分析和总结.docxVIP

-

-PAGE1-

1.这是打印乘法九九表的程序，请完善程序。

PrivateSubForm_click()DimiAsInteger

①9②i③i*jDimjAs

①9

②i

③i*j

Forj=1To②

PrintTab((j-1)*12);Printj;*;i;=;③;

NextjPrint

NextiEndSub

2.(1)运行程序能够显示数字金字塔，请完善程序。PrivateSubForm_Click()

DimiAsInteger,jAsIntegerFori=1To①

PrintTab(10-i);Forj=1To②

PrintStr(③);

①4②i③i④j

①4

②i

③i

④j

End

EndSub

-PAGE2-

2.(2)运行程序能够显示数字金字塔，请完善程序。

PrivateSubForm_Click()DimiAsInteger

DimjAsIntegerFori=1To5

PrintTab(10-i);Forj=1Toi

PrintStr(i);Nextj

PrintNextiEndSub

3.输出平行四边形

PrivateSubC