我需要一些修正VB.net Code Framework 2.0制作一个注册系统

时间:2016-08-22 07:22:13

标签: vb.net error-correction

在我的程序中,我想在进度条结束时检查我的应用是否已注册。如果已注册(通过表单1中的标签文本检查),则应显示第二个文本框,如果未注册,则应显示第一个文本框

问题是我必须在不想要时添加结尾if,因为它会不断弹出文本框。

这是我的代码:

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
    ProgressBar1.Value += 1
    If ProgressBar1.Value =
    ProgressBar1.Maximum Then
        Timer1.Stop()
        ProgressBar1.Value = ProgressBar1.Minimum
        If Form1.Label4.Text = "Unregistered" Then
        MsgBox("Exampletext", MsgBoxStyle.Information)
        Me.Hide()
    Else
        MsgBox("Exampletext1", MsgBoxStyle.Information)
        Hide()
    End If
End Sub 
End Class

顺便说一句:我不想在framework 2.0中创建它,但我做到了,使它与旧版Windows更兼容。

1 个答案:

答案 0 :(得分:0)

这就是正确的缩进很重要的原因......

编译器认为{1,2,3,5} and {7,8,11,12}与第一个Else有关。

实际上,当你的第二个If正确时,没有任何事情会发生,因为没有If。因此,假设指令在同一行上。

End If

但我投票决定关闭这个问题,因为这是一个拼写错误...