操作系统课程设计报告模拟进程调度程序(七)

        If Label8.Width < b And Label7.Width >= a And Label9.Width >= c And Label10.Width >= d Then
            Label21.Visible = False
            Label20.Visible = True
            Label19.Visible = False
        ElseIf Label8.Width = b Then
            Label21.Visible = False
            Label20.Visible = False
            Label19.Visible = True

        End If
    End Sub

    Private Sub Timer3_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer3.Tick
        Dim i As Integer
        i = c - Label9.Width
        If i < 20 Then
            Label9.Width += i

            Label24.Visible = False
            Label23.Visible = False
            Label22.Visible = True

            Timer3.Enabled = False
            Timer4.Enabled = True
        End If

        If Label9.Width < c Then
            Label9.Width += 10

            Label24.Visible = True
            Label23.Visible = False
            Label22.Visible = False

            Timer3.Enabled = False
            Timer4.Enabled = True
        Else
       &nb

首页 上一页 4 5 6 7 8 9 下一页 尾页 7/9/9