21430.html

来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· HTML 代码 · 共 22 行

HTML
22
字号
<html>  <head>    <title>高手帮忙看一下这个api的副程式哪里错了</title>  </head>  <body bgcolor="#FFFFFF" vlink="#808080">    <center>      <h1>高手帮忙看一下这个api的副程式哪里错了</h1>    </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by <a href="mailto:a2002@kimo.com.tw">slimov</a> on November 17, 1999 at 16:54:04:<p>Sub AVI2(pathname)<br>Dim mciCommand As String<p>mciSendString "close all", vbNullString, 0, 0<p>mciCommand = "open " & pathname & " alias MyAVI"<br>mciCommand = mciCommand & " parent " & Picture1.hWnd & " style child"<br>mciSendString mciCommand, vbNullString, 0, 0<p>With Picture1<br>.ScaleMode = vbPixels<br>mciCommand = "put MyAVI window at 0 0 " & _<br>.ScaleWidth & " " & .ScaleHeight<br>mciSendString mciCommand, vbNullString, 0, 0<br>End With<p>mciSendString "play MyAVI", vbNullString, 0, 0<p>End Sub<p><br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 21430--></ul><!--end: 21430--><br><hr size=7 width=75%><p></body></html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?