VB九九乘法表编码 要求 [左对齐 右对齐 完美]。。。。

[复制链接]
查看11 | 回复2 | 2011-3-29 21:54:16 | 显示全部楼层 |阅读模式
Dim a As IntegerDim b As IntegerFor a= 1 To 9For b = 1 To aPrint b; "*"; a; "="; a *b,Next bPrintNext a 如果还对不齐的话在Print b; "*"; a; "="; a *b,后面再加个逗号(Print b; "*"; a; "="; a *b,,)就OK了
回复

使用道具 举报

千问 | 2011-3-29 21:54:16 | 显示全部楼层
ck()Select Case Label1.Alignment
Case 0
Label1.Alignment = 2
Case 2
Label1.Alignment = 1
Case 1
Label1.Alignment = 0
Case ElseEnd SelectEnd
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行