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 + -
显示快捷键?