求助关于VB动态控制EXCEL表格边框 - VB / 基础类
我用以下代码往EXCEL里添加数据，最后要把表格边框设置出来，使用了录制宏的办法
一个是在加了一行数据以后添加边框，一种是全部数据都添加完毕后，用一个按键为整个表格添加边框（下列代码为后者），但是都出现了对象变量或with块变量未设置的提示，后来我试了一下，启动程序后不添加数据，直接添加边框是成功的，但是再次点击添加边框又是这个提示，怀疑是range的问题，请高手们帮忙指点一下啊
Dim xlApp As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
Dim hang As Long '计算添加了几行数据
’添加一行数据
Private Sub Command2_Click()
Dim content(10) As String
content(0) = Time
For i = 1 To 9 Step 2
content(i) = 12.5
Next
For i = 2 To 10 Step 2
content(i) = 22.11
Next
Set xlApp = CreateObject("Excel.Application")
xlApp.DisplayAlerts = False '不显示是否保存
Set xlBook = xlApp.Workbooks.Open("C:\exper.xls")
On Error GoTo 0
Set xlSheet = xlBook.Worksheets(1)
xlApp.Visible = False '不显示出创建的文件
xlSheet.Activate
For i = 0 To 10
xlSheet.Cells(hang, i + 1) = content(i)
Next
相关问答：
现在我想根据treeview上每个节点的权限，没有权限的节点不能被选中，而且成灰色，怎么实现，在线等。。。
这个？。。。
貌似没法。
试试能不能改某些node的颜色，记录下上次的nodeclick里的node。
下次点击的如� ......
vb中 现在我要把数据库里存储的一个附件的内容替换了，怎么做，只是替换我指定的位置，不是全部替换
请将问题说明白，存储字段格式，如果是Binary格式的比较麻烦，如果是字串，直接替换。最好不要进行指定位置替换� ......
xmlDoc1.loadXML(h)总是返回false，为什么？谢谢帮忙回答一下
h是什么呢。。。。。。。。。
h是xml格式的字符串
你是想打开。XML格式的文件吧？
我是把h放在xmlDoc1里，用xmlDoc1.loadXML(h)，然后取xmlDo ......
我的要求是：通过抓取别的程序上的表格的句柄，然后读取这个表格的内容。
表格句柄（类名：MSFlexGridWndClass）我已抓到，接下来如何读取表格的内容就不会了？求助。
能把代码发来学习下不？
244326867@qq.com ......
现在小弟在用vb6.0编写程序，遇到异步的问题，具体如下：
点击按钮A时，调用外部的dll(C++)，此dll是同步返回数据。此时如果远程未响应，我的程序界面就会卡死。因此我想到用timer来实现异步 ，但是不清楚具体的实� ......
