PrivateSubForm_DblClick()‘窗體雙擊事件Fori=
1To9’外層循環,用于控制打印行數ForT=1Toi‘內層循環,用于控制每行的打印列數PrintTab(10-i);’定位首個打印字符的位置。
這里可以使用spc(10-i),可以獲得相同的效果NextForj=1Toi‘打印字符PrintTrim(j);NextFork=j-
2To1Step-1‘打印另一組字符PrintTrim(k);NextPrint’換行NextEndSub
PrivateSubForm_DblClick()‘窗體雙擊事件Fori=
1To9’外層循環,用于控制打印行數ForT=1Toi‘內層循環,用于控制每行的打印列數PrintTab(10-i);’定位首個打印字符的位置。
這里可以使用spc(10-i),可以獲得相同的效果NextForj=1Toi‘打印字符PrintTrim(j);NextFork=j-
2To1Step-1‘打印另一組字符PrintTrim(k);NextPrint’換行NextEndSub