18048.html

来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· HTML 代码 · 共 35 行

HTML
35
字号
<html>  <head>    <title>Re: 帮帮忙~~~</title>  </head>  <body bgcolor="#FFFFFF" vlink="#808080">    <center>      <h1>Re: 帮帮忙~~~</h1>    </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by <a href="mailto:luo570@ms31.hinet.net">小琳</a> on August 28, 1999 at 15:35:20:<p>In Reply to: <a href="18044.html">帮帮忙~~~</a> posted by eddy on August 28, 1999 at 14:44:48:<p>: 在VB6中如何用excel将其已key 好的数值结果存在定义好的阵列<p>:::先建立一个Excel档,然后程式如下:<br>Option Explicit<p>Private Sub Command1_Click()<br>    Dim temp As Excel.Application<br>    Dim abc(20) As Integer, i As Integer<br>    <br>    Set temp = CreateObject("excel.application")<br>    temp.Workbooks.Open "F:\其他\book2.xls"<br>    temp.Visible = False<br>    <br>    For i = 1 To 20<br>        abc(i) = temp.Range("a" & i)<br>    Next i<br>    Set temp = Nothing<br>End Sub<br><br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 18048--><!--top: 18055--><li><a href="18055.html">Re: 感谢 再帮个忙~~~</a> <b>eddy</b> <i>17:36:49 8/28/99</i>(<!--responses: 18055-->0)<ul><!--insert: 18055--></ul><!--end: 18055--><!--top: 18054--><li><a href="18054.html">Re: 感谢 再帮个忙~~~</a> <b>eddy</b> <i>17:36:15 8/28/99</i>(<!--responses: 18054-->1)<ul><!--insert: 18054--><!--top: 18061--><li><a href="18061.html">Re: 感谢 再帮个忙~~~</a> <b>小琳</b> <i>20:10:43 8/28/99</i>(<!--responses: 18061-->0)<ul><!--insert: 18061--></ul><!--end: 18061--></ul><!--end: 18054--></ul><!--end: 18048--><br><hr size=7 width=75%><p></body></html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?