vb拼图游戏增加排行榜 就是大学vb课程设计里的拼图游戏,更上一层楼的排行榜怎么做,要求记录每个用
发布网友
发布时间:2022-07-12 15:19
我来回答
共2个回答
热心网友
时间:2023-10-18 17:45
Select Case Index '选择语句,这里根据不同INDEX值来选择
Case 0 ’index 为0时候
If Com(Index + 1).Visible = False Then ‘如果COM应该是个控件名字,如果控件com1不可见
Com(Index + 1).Visible = True ’则 com1变成可见
Com(Index + 1).Caption = Com(Index).Caption‘com1的标题变成COM0的标题
Com(Index).Visible = False‘com0变成不可见
Com(Index).Caption = "" ‘com0的名称变为空
Else
If Com(Index + 3).Visible = False Then ’如果COM(INDEX+3)不可见
Com(Index + 3).Visible = True ‘则COM(INDEX+3)变成可见
Com(Index + 3).Caption = Com(Index).Caption’把COM(INDEX)的标题赋给COM(INDEX+3)
Com(Index).Visible = False 'COM(INDEX)变成不可见
Com(Index).Caption = "" ‘com(index)标题变成空
End If
End If
Case 1 ‘index 为1的时候
热心网友
时间:2023-10-18 17:46
open app。path&"1.tet" as #1
你这个只需要自己创个文本就行了
输入的方式用print
如果不嫌麻烦可以用小的数据库