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

el20.Visible = True
Label19.Visible = False
End If

        If Label7.Width < a And Label8.Width >= b And Label9.Width >= c And Label10.Width >= d Then
            Label18.Visible = False
            Label17.Visible = True
            Label16.Visible = False
        ElseIf Label29.Width = a Then
            Label18.Visible = False
            Label17.Visible = False
            Label16.Visible = True

End If

End Sub

    Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
        Dim i As Integer
        i = b - Label8.Width
        If i < 20 Then
            Label8.Width += i

            Label21.Visible = False
            Label20.Visible = False
            Label19.Visible = True

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

If Label8.Width < b Then
Label8.Width += 10

            Label21.Visible = True
            Label20.Visible = False
            Label19.Visible = False

            Timer2.Enabled = False
            Timer3.Enabled = True
        Else
            Label21.Visible = False
            Label20.Visible = False
            Label19.Visible = True

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

If Lab

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

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