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

2013-07-16 01:12

导读：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

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

（转载自http://zw.nseac.coM科教作文网）

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

上一篇：大型管理应用软件SAPR3系统内部结构剖析(一) 下一篇：没有了