📄 18172.html
字号:
<html> <head> <title>&#25105;&#26159;&#19981;&#30693;&#36947;&#20320;&#22312;&#23531;&#21861;&#21862;...</title> </head> <body bgcolor="#FFFFFF" vlink="#808080"> <center> <h1>&#25105;&#26159;&#19981;&#30693;&#36947;&#20320;&#22312;&#23531;&#21861;&#21862;...</h1> </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by #29833;#29833; on August 31, 1999 at 10:15:01:<p>In Reply to: <a href="18161.html">Re: 副程式传参数，可不可以传控制项阵列？</a> posted by 黄牛 on August 31, 1999 at 03:44:25:<p>: 这样写是哪里错了呢？<p>: Private Sub MyFunction(Txt1 As Variant)<br>: For i = 0 To UBound(Txt1)<br>: Txt1(i).Text = i<br>: Next i<br>: End Sub<p>: Private Sub Command1_Click()<br>: MyFunction (Text1)<br>: End Sub<p>我是不知道你在寫啥啦... (我用 IE 5 , 無法相容於你的字碼)<br>不過你的 Code 大概是不可行的... 我以你用 TextBox 為範例, 你就自行參考吧!<p>嗯... 請寫繁體中文...<p>Sub TestTextBox(txtArray As Variant)<p>For i = txtArray.LBound To txtArray.UBound<br>' 或 For i = 0 To txtArray.Count - 1<br> With txtArray(i)<br> Debug.Print .Index, .Text<br> End With<br>Next i<p>End Sub<p>Private Sub Form_Load()<p>Me.Show<br>TestTextBox Text1 ' Text1(0), Text1(1), ...<p>End Sub<br><ul><li><a href="http://feitsui.hyd.ncku.edu.tw/TLCheng/Basic/index.htm">培基語言</a></ul><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 18172--><!--top: 18239--><li><a href="18239.html">对不起,我想问个问题!</a> <b>天儿</b> <i>11:06:42 9/01/99</i>(<!--responses: 18239-->2)<ul><!--insert: 18239--><!--top: 18243--><li><a href="18243.html">Re: 对不起,我想问个问题!</a> <b>琏琏</b> <i>11:52:36 9/01/99</i>(<!--responses: 18243-->1)<ul><!--insert: 18243--><!--top: 18293--><li><a href="18293.html">谢谢!</a> <b>天儿</b> <i>11:25:50 9/02/99</i>(<!--responses: 18293-->0)<ul><!--insert: 18293--></ul><!--end: 18293--></ul><!--end: 18243--></ul><!--end: 18239--><!--top: 18236--><li><a href="18236.html">谢谢！</a> <b>黄牛</b> <i>09:56:30 9/01/99</i>(<!--responses: 18236-->0)<ul><!--insert: 18236--></ul><!--end: 18236--></ul><!--end: 18172--><br><hr size=7 width=75%><p></body></html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -