📄 15125.html
字号:
<html>
<head>
<title>哪有那样复杂</title>
</head>
<body bgcolor="#FFFFFF" vlink="#808080">
<center>
<h1>哪有那样复杂</h1>
</center>
<hr size=7 width=75%>
<hr size=7 width=75%><p>
Posted by Honey on July 02, 1999 at 20:04:52:<p>
In Reply to: <a href="15089.html">Re: 可否明示 .......</a> posted by gg on July 02, 1999 at 08:28:03:<p>
: : 唔 ... 不如使用 HWND 作为 parameter 吧 ...<br>: : 用 API 来显示应该可行的<p>: 先进可否明示实际的作法呢 ? <p>首先是语法错误<br>括号去掉就可以了 因为加括号的时候要有回传的值<br>但是sub没有回传值 <br>showform Form2<p>不然前面要加个call<br>call showform(Form2)<p><br>另外如果很多表单都要用同一组程式码 有两种方式<br>如果每个表单都一样 只要用表单阵列的方式<br>执行时他会将表单复制(包含控制项 程式码)<br>例如现在有个表单Form2<br>可执行以下程式<br>Dim ek(1) As Form2<br>Dim CONX As Control<br>Set ek(1) = New Form2<br>For Each CONX In Form2.Controls<br>'/*复制表单内所有Controls*/<br>Next<br>ek(1).Show<br>另一种方式 只要将这段程式放在模组的sub 或Function<br>内前面要宣告成Public<br>例如<br>Public Function ds()<p>End Function
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 15125-->
</ul><!--end: 15125-->
<br><hr size=7 width=75%><p>
</body></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -