Private Sub Command1_Click() Dim i, j As Integer Label1.Caption = " 万岁!世界重新得到了和平!" Form1.Cls For i = 1 To 9 For j = 1 To i Print j; "x"; i; "="; j * i, Next j Print Next i End Sub Private Sub Command2_Click() Form1.Cls Label1.Caption = "世界正在遭受着苦难!点击上方按钮拯救世界!" End Sub
exe才是本体。
时间: 2024-10-26 07:32:44