Because I am a novice vb, the following program to the 000. BMP - 004. BMP joining together, but still we have a problem, if can 000. BMP - 018. BMP by such as "3 5 1 0 8 15... "Sequence splicing, of course, the best, if not, can you help to 000. The first BMP - 004. BMP splicing program to change to?
Private Sub Form_Load ()
Dim J As Long
Me. The ScaleMode=3
Picture1. ScaleMode=3
Picture2. ScaleMode=3
Picture2. AutoRedraw=True
Picture1. AutoRedraw=True
Picture1. AutoSize=True
Picture1. BorderStyle=0
Picture2. BorderStyle=0
The Set Picture1. Picture=LoadPicture (" C: \ Users \ \ Desktop \ 000 DELL BMP ")
'Picture1. PaintPicture Picture2. PaintPicture, 0, 0
Picture2. Width=Picture1. ScaleWidth * 5
Picture2. Height=Picture1. ScaleHeight
For J=0 To 4
The Set Picture1. Picture=LoadPicture (" C: \ Users \ \ Desktop \ "DELL & amp; "00" & amp; CStr (J) & amp; ". BMP ")
Picture2. PaintPicture Picture1. Picture, J * Picture1 ScaleWidth, Picture1. ScaleHeight
Next
SavePicture Picture2. Image, "C: \ Users \ \ Desktop \ All DELL BMP"
End Sub
We may not be able to run debug no problem, is the last stop, is the need to run too long? And there have been all. BMP, but nothing after the open, why?
CodePudding user response:
See: http://zhidao.baidu.com/question/1667348479424013067.html? Reply and engineering example of oldq=1.CodePudding user response:
Can't stop what do you mean? The program died?When debugging running at the same time press ctal + break see above that a statement