8258.html
来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· HTML 代码 · 共 27 行
HTML
27 行
<html>
<head>
<title>Re: 各位VB的高手们好.....小弟想要在执行阶段建立Shape控制项,不知可否????</title>
</head>
<body bgcolor="#FFFFFF" vlink="#808080">
<center>
<h1>Re: 各位VB的高手们好.....小弟想要在执行阶段建立Shape控制项,不知可否????</h1>
</center>
<hr size=7 width=75%>
<hr size=7 width=75%><p>
Posted by <a href="mailto:yehu@tpts6.seed.net.tw">Yeong huann</a> on December 13, 1998 at 03:02:54:<p>
In Reply to: <a href="8162.html">各位VB的高手们好.....小弟想要在执行阶段建立Shape控制项,不知可否????</a> posted by VB初学者... on December 09, 1998 at 12:48:36:<p>
: 因程式需要,必须要在执行阶段依使用者之需求建立多个shape控制项,不知是否可以做到??<p>请在表单中置入 command1及Shape1两个控制项,并将Shape1设为控制项阵列<p>Dim SHA Integer<br>Private Sub Command1_Click()<p> SHA = SHA + 1<br> Load Shape1(SHA)<br> '在此写程式码指定新生成控制项的属性<br> '你可以开一个新表单,利用Textbox设定属性<br> '再将设定好的值传给新生成的控制项即可 <br> Shape1(SHA).Top = 0<br> Shape1(SHA).Left = Shape1(SHA).Width * SHA<br> Shape1(SHA).Visible = True<br> <br>End Sub<p>
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 8258-->
<!--top: 8277--><li><a href="8277.html">谢谢....感激不尽....</a> <b>VB初学者</b> <i>14:09:53 12/14/98</i>
(<!--responses: 8277-->0)
<ul><!--insert: 8277-->
</ul><!--end: 8277-->
</ul><!--end: 8258-->
<br><hr size=7 width=75%><p>
</body></html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?