vb 制作flash播放器播放暂停按钮 在线等

【专家解说】：Private Sub Command1_Click() If Command1.Caption = "Pause" Then Command1.Caption = "Play" '暂停 ElseIf Command1.Caption = "Play" Then Command1.Caption = "Pause" '播放 End If End Sub