Vb.net vb中表单的不断更新

Vb.net vb中表单的不断更新,vb.net,Vb.net,有没有办法不断更新表单?我有一个游戏有3个困难,你需要一个高分数至少5解锁下一个困难,它的工作,但困难解锁你需要重新启动应用程序。或者我猜使用一个按钮来更新困难,这是我在表单加载中的代码 EHighScore = My.Computer.FileSystem.ReadAllText("EasyHighScore.txt") MHighScore = My.Computer.FileSystem.ReadAllText("MediumHighScore.txt") HHig

有没有办法不断更新表单?我有一个游戏有3个困难,你需要一个高分数至少5解锁下一个困难,它的工作,但困难解锁你需要重新启动应用程序。或者我猜使用一个按钮来更新困难,这是我在表单加载中的代码

    EHighScore = My.Computer.FileSystem.ReadAllText("EasyHighScore.txt")
    MHighScore = My.Computer.FileSystem.ReadAllText("MediumHighScore.txt")
    HHighScore = My.Computer.FileSystem.ReadAllText("HardHighScore.txt")


    If EHighScore < 5 Then
        MediumDifficulty.Enabled = False
        MediumDifficulty.BackColor = Color.Gray
    Else
        MediumDifficulty.Enabled = True
        MediumDifficulty.BackColor = Color.Black

    End If

    If MHighScore < 5 Then
        HardDifficulty.Enabled = False
        HardDifficulty.BackColor = Color.Gray
    Else
        HardDifficulty.Enabled = True
        HardDifficulty.BackColor = Color.Black
    End If
EHighScore=My.Computer.FileSystem.ReadAllText(“EasyHighScore.txt”)
MHighScore=My.Computer.FileSystem.ReadAllText(“MediumHighScore.txt”)
HHighScore=My.Computer.FileSystem.ReadAllText(“hardhigscore.txt”)
如果EHighScore<5,则
中等难度。启用=错误
中等难度。背景色=颜色。灰色
其他的
中等难度。启用=真
中等难度。背景色=颜色。黑色
如果结束
如果MHighScore<5,则
hardDemobility.Enabled=False
hard.BackColor=颜色.灰色
其他的
hardDemobility.Enabled=True
hard.BackColor=颜色.黑色
如果结束

当窗体打开时,当我关闭显示用户得分的结束屏幕时,我将如何运行此操作(如果他们确实击败了高分,则加上高分)。我已尝试执行MainMenu.close()打开游戏,但结果与MainMenu.Hide()相同

您可以使用变量创建和操作&使用计时器工具实时更新表单更改(将间隔设置为1000ms)

例如,考虑下面的代码:

声明:

Dim difficult As Boolean
代码:

和计时器:

Private Sub Timer1_Tick(sender ....) Handles Timer1.Tick
    if difficult = True Then
        ' ...
    End If
End Sub
因此,以一种非常简单的方式处理实时事务会更容易

注意:不要使用这种需要网络的技巧,否则会使程序运行缓慢


所以基本上我可以使用定时器滴答,然后把任何我想继续运行的代码放进去?很明显,你的代码会每秒钟更新一次。这就是我基本上处理实时更改(但不是网络)的应用程序代码所做的。我将原始帖子中的代码放入计时器中。勾选,但它仍然没有更新,我必须使用atm按钮单击,然后更新表单确保您已从属性启动计时器。非常感谢,它工作正常!!,visual studio/basic非常新,如果我听起来很笨,那么很抱歉哈哈,它看起来像
EHighScore
是保存文件内容的
字符串。如何将字符串与数字进行比较?如果EHighScore<5,请启用选项Strict。这是一个由两部分组成的过程。首先,对于当前项目-在解决方案资源管理器中双击“我的项目”。选择左边的Compile。在“选项严格”下拉列表中,选择“启用”。第二,对于未来的项目-进入工具菜单->选项->项目和解决方案->VB默认值。在“选项严格”下拉列表中,选择“启用”。这将使您在运行时免受bug的困扰。我将EHighScore和其余部分声明为全局整数,这样我就可以通过表单传输它所保存的变量和内容。如果它声明为整数,那么它将如何保存文本文件的内容?尽管它工作正常?我相信它只会起作用,因为文本文件中唯一的东西就是高分数字,但是如果有文本,那么它就不起作用了
Private Sub Timer1_Tick(sender ....) Handles Timer1.Tick
    if difficult = True Then
        ' ...
    End If
End Sub