📄 18844.html

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

💻 HTML

字号:

<html>  <head>    <title>Re: 怎样才能动态增加picture box / image box?</title>  </head>  <body bgcolor="#FFFFFF" vlink="#808080">    <center>      <h1>Re: 怎样才能动态增加picture box / image box?</h1>    </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by <a href="mailto:luo570@ms31.hinet.net">小琳</a> on September 12, 1999 at 20:33:29:<p>In Reply to: <a href="18841.html">怎样才能动态增加picture box / image box?</a> posted by tong110 on September 12, 1999 at 17:58:15:<p>: 怎样才能动态增加picture box / image box?<p>:::假如使用PictureBox的话，程式则如下：<br>Private Sub Command1_Click()<br>    Dim temp As PictureBox<br>    <br>    Set temp = Controls.Add("VB.PictureBox", "tempnew")<br>    With temp<br>        .Left = 0<br>        .Top = 0<br>        .Picture = LoadPicture("F:\Girl Friend\sh4.jpg")<br>        .AutoSize = True<br>        .Visible = True<br>    End With<br>End Sub<br><br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 18844--><!--top: 18997--><li><a href="18997.html">Re: 怎样才能动态增加picture box / image box?</a> <b>tong110</b> <i>13:16:05 9/16/99</i>(<!--responses: 18997-->0)<ul><!--insert: 18997--></ul><!--end: 18997--></ul><!--end: 18844--><br><hr size=7 width=75%><p></body></html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -