7,763
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
BlueBeer 2004-08-25
- 打赏
- 举报
Private Sub Form_Click()
For i = 1 To 12
Me.FontSize = i
Print "测试"
Next
End Sub
For i = 1 To 12
Me.FontSize = i
Print "测试"
Next
End Sub
northwolves 2004-08-25
- 打赏
- 举报
Private Sub Command1_Click()
Me.FontSize = Me.FontSize + 5
Me.Print "ABC"
End Sub
Private Sub Form_Load()
Me.Print "ABC"
End Sub
