用什么方法使axwindowsmediaplayer的播放列表与listbox中的列表联动

ncat123 2013-09-28 05:55:41
如题
Dim i, j As Integer

Private Sub ListBox1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListBox1.DoubleClick
AxWindowsMediaPlayer1.currentPlaylist.clear()
For j = 0 To i Step 1
AxWindowsMediaPlayer1.currentPlaylist.appendItem(AxWindowsMediaPlayer1.newMedia(ListBox1.Items.Item(j).ToString))
Next
AxWindowsMediaPlayer1.URL = ListBox1.SelectedItem
End Sub



Private Sub AxWindowsMediaPlayer1_DoubleClickEvent(ByVal sender As Object, ByVal e As AxWMPLib._WMPOCXEvents_DoubleClickEvent) Handles AxWindowsMediaPlayer1.DoubleClickEvent

FolderBrowserDialog1.ShowDialog()
ListBox1.Items.Clear()
ListBox1.Items.AddRange(IO.Directory.GetFiles(FolderBrowserDialog1.SelectedPath))
i = ListBox1.Items.Count - 1
'MsgBox(ListBox1.Items.Item(i))
AxWindowsMediaPlayer1.currentPlaylist.clear()
For j = 0 To i Step 1
AxWindowsMediaPlayer1.currentPlaylist.appendItem(AxWindowsMediaPlayer1.newMedia(ListBox1.Items.Item(j).ToString))
Next
End Sub
我想实现:
 当播放器的播放列表发生改变时,listbox中的项目相应发生改变
 且当listbox的当前选中项发生改变时,播放器的当前选中项也发生相应改变


求大侠指点一二
...全文
149 回复 打赏 收藏 转发到动态 举报
写回复
用AI写文章
回复
切换为时间正序
请发表友善的回复…
发表回复
内容概要:本文档为鹏鼎EES项目第二阶段关于设备闲置与富余识别的需求设计方案,旨在通过自动化方式识别低利用率设备,减少资产浪费。系统基于OEE系统提供的设备近6个月时间稼动率数据,设定“闲置”(连续6个月稼动率为0%)和“富余”(6个月平均稼动率≤30%)的判断标准,每周一自动执行识别任务并生成记录。支持在系统查看识别结果列表、筛选导出数据、发起闲置申请及删除记录(管理员权限)。同时,系统通过鼎加机器人按设备闲置/富余持续时长(7天、30天、90天、180天)逐级向上推送预警消息至维护人员、厂长、处长、经管等层级,推动问题处理。此外,若设备被判定为闲置但未提交闲置申请,系统将向维护人员和设备课长发送D+提醒。; 适合人群:系统设计人员、开发人员、测试人员、设备管理人员及项目实施相关人员;尤其适用于熟悉OEE系统、设备管理流程及企业信息化系统的专业人员;; 使用场景及目标:① 实现设备利用率的动态监控与闲置风险预警;② 支持企业优化设备资源配置,降低资产闲置成本;③ 推动设备闲置处理流程自动化与责任到人机制建立;④ 为后续设备处置、调配、报废等决策提供数据支撑;; 阅读建议:本文档为研发与实施阶段的核心指导文件,涉及系统逻辑、数据来源、权限控制与集成接口等关键内容,建议结合OEE数据对接情况、企业组织架构与设备管理流程协同研读,并关注阈值配置、提醒机制与状态联动等可配置项的实际业务适配性。

1,453

社区成员

发帖
与我相关
我的任务
社区描述
VB 控件
社区管理员
  • 控件
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧