📄 21556.html

📁 VB技巧问答10000例 VB技巧问答10000例

💻 HTML

字号:

<html>  <head>    <title>Re: 如何show出图片的大小和k数</title>  </head>  <body bgcolor="#FFFFFF" vlink="#808080">    <center>      <h1>Re: 如何show出图片的大小和k数</h1>    </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by <a href="mailto:enn0930@ms35.hinet.net">Emily</a> on November 23, 1999 at 15:27:01:<p>In Reply to: <a href="21496.html">Re: 如何show出图片的大小和k数</a> posted by AP on November 20, 1999 at 18:47:46:<p>: : 我利用image去捉图..<br>: : 我要如何show出图片的大小和k数呢<br>:         Dim x As New StdPicture                 <br>:         <br>:         Set x = LoadPicture(Filename)<br>:         宽 = CInt(ScaleX(x.Width, vbHimetric, vbPixels))<br>:         高 = CInt(ScaleY(x.Height, vbHimetric, vbPixels))<br>:         <br>:         或<br>:         Image1 = LoadPicture(Filename)<br>:         xx =Image1.Width<br>:         yy =Image1.Height<br>:         宽=CStr(CInt(ScaleX(xx, vbTwips, vbPixels))) <br>:         高=CStr(CInt(ScaleY(yy, vbTwips, vbPixels)))<p><br>我试了可是他只show出我所拉出来的image框的大小<br>而我所要的是图档实际的大小<br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 21556--></ul><!--end: 21556--><br><hr size=7 width=75%><p></body></html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -