VB6.0如何编写游戏?
答案:1 悬赏:40 手机版
解决时间 2021-03-08 18:53
- 提问者网友:放下
- 2021-03-08 00:00
求这么用VB6.0编写游戏? 需要什么插件??或者需要什么东东 本人是新手 想知道编写一个按键运动的游戏!
最佳答案
- 五星知识达人网友:毛毛
- 2021-03-08 00:43
picture数组
可以用坐标来完成
用数组来记录坐标
棋谱代码 我想是靠自己写吧
比如
Private Sub Form_Load()
Picture1(1).Picture = LoadPicture("") '这图是兵
End Sub
Private Sub Picture1_Click(Index As Integer)
If Index = 1 Then
If Picture1(1).Top >= 1000 Then '没过河
Picture1(1).Left = 500 '保持不变 意思就是不能左右移动,当用鼠标指定他的位子就可以上前一步
ElseIf Picture1(1).Top <= 700 Then '已经过河
'可以就解除限制
End If
End If
End Sub
'还要判断你指定位子的坐标,是否远远超过一步距离,或远远小于一步距离
'可以用所画的线来判断位子
实际代码不是这样写的
只是希望你明白这个道理
可以用坐标来完成
用数组来记录坐标
棋谱代码 我想是靠自己写吧
比如
Private Sub Form_Load()
Picture1(1).Picture = LoadPicture("") '这图是兵
End Sub
Private Sub Picture1_Click(Index As Integer)
If Index = 1 Then
If Picture1(1).Top >= 1000 Then '没过河
Picture1(1).Left = 500 '保持不变 意思就是不能左右移动,当用鼠标指定他的位子就可以上前一步
ElseIf Picture1(1).Top <= 700 Then '已经过河
'可以就解除限制
End If
End If
End Sub
'还要判断你指定位子的坐标,是否远远超过一步距离,或远远小于一步距离
'可以用所画的线来判断位子
实际代码不是这样写的
只是希望你明白这个道理
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯