直接上图
Private Sub Command1_Click()Picture1.Print "ABC"k = 4567465Picture1.Print kEnd Sub
Picture1.AutoRedraw = truePicture1.Print "AAA"Picture1.Print 34
