用VB制作拼图游戏

答案:2 悬赏:80 手机版

解决时间 2021-04-16 04:35

提问者网友：辞取
2021-04-16 01:38

用VB制作拼图游戏

最佳答案

五星知识达人网友：七十二街
2021-04-16 02:51

Private Declare Function SetParent Lib ″user32″ _（ByVal hWndChild As Long，ByVal hWndNewParent As Long） As Long ＇利用api函数setparent实现控件的移动
Private Sub Command1_MouseMove（Button As Integer，Shift As Integer，X As Single，Y As Single）
Static w ＇w为picture1控件数组的索引号（即index）
If w ＝ 3 Then w ＝ -1
w ＝ w + 1
Select Case w
Case 0 ＇把command1从第一个图片框移到第二个内
Call SetParent（Command1.hWnd，Picture1（1）.hWnd）
Case 1 ＇把command1从第二个图片框移到第三个内
Call SetParent（Command1.hWnd，Picture1（2）.hWnd）
Case 2 ＇把command1从第三个图片框移到第四个内
Call SetParent（Command1.hWnd，Picture1（3）.hWnd）
Case 3 ＇把command1从第四个图片框移到第一个内
Call SetParent（Command1.hWnd，Picture1（0）.hWnd）
End Select
End Sub

全部回答

1楼网友：妄饮晩冬酒
2021-04-16 04:14

这个可以做，可以有偿做。如果需要可以给我百度私信。

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息