VB实现远程共享显示及声音2节能

age = FileName

splay ' 显示收到的图像

rnInAnnotations 0, 2

usePointer = 0

Exit Sub

End If

' 收到一块二进制图像信息

Put #FileID, , Buf ' 将当前数据块存盘

ndData "Next Block" ' 申请下一块

FileLen = Fil即能够租用正规旅游车？康卉称eLen + bytesTotal

ption = "TCP Client " + Trim(S2011年第二季度运营费用为3.66亿元人民币（5tr(FileLen)) + _

" Bytes Received." ' 显示当前收到的字节数

End Sub

客户端成功共享服务器端显示画面后的外观如图三所示。



二、共享声音

共享声音与共享显示的思想是一致的，只是这时是客户端向服务器端发送声音文件，以便共享服务器的声卡。服务器端应使用微软的多媒体控件（MMControl） 进行声音播放（使用 Ctrl+T 或菜单“工程-部件”来添加）。用该控件播放声音不仅是简单的，而且功能强大。

由于关键模块与共享显示一致，故此处略去源代码。

聊城好的白癜风医院
菏泽牛皮癣医院那个好
克拉玛依白癜风治疗医院