vb九九乘法表的代码_vb九九乘法表
发布时间：2023-06-22 18:51:40
来源：互联网
(相关资料图)
1、Private Sub Form_click()For a = 1 To 9 For b = 1 To a Print b;"*"; a;"="; b * a; Next b Print Next aEnd SubPrivate Sub Form_Load() Me.AutoRedraw = True Cls For j = 1 To 9 For k = 1 To 9 If k > j Then Exit For Print k &"*"& j &"="& j * k;""; Next k Print Next jEnd Sub Private Sub Form_Click()Dim i, j As IntegerFor i = 1 To 9 For j = i To 9 Line (i * 200, j * 250)-(i * 200, j * 250) ForeColor = i * j * 253 Print Space((i - 1) * 6); i &"×"& j &"="& i * j Next jNext iEnd Sub。
本文就为大家分享到这里，希望小伙伴们会喜欢。
标签：
