VB的课设,可是我完全不知道那些代码是什么意思,我选的是数字拼图游戏,希望好心人帮我解释一下

[复制链接]
查看11 | 回复1 | 2011-9-7 10:33:20 | 显示全部楼层 |阅读模式
PrivateSubCom_Click(IndexAsInteger)SelectCaseIndexCase0IfCom(Index1).Visible=FalseThenCom(Index1).Visible=TrueCom(Index1).Caption=Com(Index).CaptionCom(Index).Visible=FalseCom(Index).Caption=\"\"ElseIfCom(Index3).Visible=FalseThenCom(Index3).Visible=TrueCom(Index3).Caption=Com(Index).CaptionCom(Index).Visible=FalseCom(Index).Caption=\"\"EndIfEndIfCase1
回复

使用道具 举报

千问 | 2011-9-7 10:33:20 | 显示全部楼层
SelectCaseIndex\'选择语句,这里根据不同INDEX值来选择Case0’index为0时候IfCom(Index1).Visible=FalseThen‘如果COM应该是个控件名字,如果控件com1不可见Com(Index1).Visible=True’则com1变成可见Com(Index1).Caption=Com(Index).Caption‘com1的标题变成COM0的标题Com(Index).Visible=False‘com0变成不可见Com(Index).Caption=\"\"‘com0的名称变为空ElseIfCom(Index3).Visible=FalseThen’如果COM(INDEX3)不可见Com(Index3).Visible=True‘则COM(INDEX3)变成可见Com(Index3).Caption=Com(Index).Caption’把COM(INDEX)的标题赋给COM(INDEX3)Com(Index).Visible=False\'COM(INDEX)变成不可见Com(Index).Caption=\"\"‘com(index)标题变成空EndIfEndIfCase1‘index为1的时候追问解释的很清楚,非常感谢O(∩_∩)O还有一个问题,com控件是什么啊我做的课设是数字拼图,可是一块一块的拼图是用什么控件做的呢?是用命令按钮(⊙_⊙)?真是一头雾水啊
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行