导读 您好,今日明帅来为大家解答以上的问题。VB九九乘法表编程右下三角,vb九九乘法表相信很多小伙伴还不知道,现在让我们一起来看看吧!1、Priva...
您好,今日明帅来为大家解答以上的问题。VB九九乘法表编程右下三角,vb九九乘法表相信很多小伙伴还不知道,现在让我们一起来看看吧!
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。
本文就为大家分享到这里,希望小伙伴们会喜欢。