Dim i As Integer, j As Integer, k As Integer
Private Sub Form_Activate()
Print: Print: Print: Print: Print
i = 1
Do While i ＜= 9
j = 1
Do While j ＜= 9
k = i * j
Print Spc(3); i; " * "; j; " = "; Format(k, "00");
j = j + 1
Loop
Print: Print
i = i + 1
Loop
End Sub
請問這個Form_Activate()是什麼意思
Private Sub Form_Activate()
Print: Print: Print: Print: Print
i = 1
Do While i ＜= 9
j = 1
Do While j ＜= 9
k = i * j
Print Spc(3); i; " * "; j; " = "; Format(k, "00");
j = j + 1
Loop
Print: Print
i = i + 1
Loop
End Sub
請問這個Form_Activate()是什麼意思
文章標籤
全站熱搜
意思就是「當表單成為現用視窗時」