vb 6.0 如何处理刚生成的vb.net excell,中间一小部分不太懂

vb6.0新人,想用vb6.0调用excel中的规划求解,好像要把excel中的library下的solve.dll调用吧,怎么操作啊_百度知道
vb6.0新人,想用vb6.0调用excel中的规划求解,好像要把excel中的library下的solve.dll调用吧,怎么操作啊
具体是通过vb建立查询,输出数据到mshflexgrid中,再赋值到excel,然后其用规划求解命令求解,可以固定excel格式,再用录制宏,这话太麻烦了。但是我想直接用vb处理数据mshflexgrid中的数据,能实现么……
我有更好的答案
按默认排序
你要用mshflexgrid显示什么数据?如果是类似于excel的表格似的数据,推荐你用Listview控件,容易而且美观。
其他类似问题
vb6的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁如何在VB中的指定目录下生成EXCEL,我用了磁盘驱动器,文件目录驱动,自己输入一个文件名,然后在指定_百度知道
如何在VB中的指定目录下生成EXCEL,我用了磁盘驱动器,文件目录驱动,自己输入一个文件名,然后在指定
的目录生成一个EXCEL文件,文件名就是输入的Text。希望解决一下。
提问者采纳
你这个操作流程就是,1.vb创建一个excel。2.保存excel到当前文件下。当然首先得先引用excel。工程、引用、excel11.0 Dim xlapp As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSHEET As Excel.Worksheet
Set xlapp = CreateObject(&excel.application&) '这里是小写,如果出错的话,下面还有大写的创建。
Set xlBook = xlapp.Workbooks.Add
Set xlSHEET = xlBook.Worksheets(1)
On Error Resume Next
If Err.Number && 0 Then
Set xlapp = CreateObject(&Excel.Application&)
Set xlBook = xlapp.Workbooks.Add
Set xlSHEET = xlBook.Worksheets(1)
xlBook.SaveAs app.path & “\” & text1.text & &.XLS&
xlBook.Close (True)
xlapp.Quit
倒数第三行代码提示语法错误
怎么会语法错误。我这边是正常的。恕我能力有限,帮不了你了。我不知道是什么错误。
提问者评价
其他类似问题
按默认排序
其他1条回答
'磁盘驱动器加入下面事件Private Sub Drive1_Change()&&&&Me.Dir1.Path = Me.Drive1.DriveEnd Sub'下面生成EXCEL文件Dim xlapp,fnfn=Me.Dir1.Path+"\"+me.text1.text+".xls"Set xls = CreateObject("excel.application")Set xlBook = xls.Workbooks.Add'在这里向电子表格中添加内容xls.workbooks(1).saveas fnxls.quit
这个好像有点问题啊。。。
我试过了没有问题呀。
磁盘驱动器的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁请较,如何用vb控制的EXCEL中, 用函数,查找一个字符串,并返回所在行的
请较,如何用vb控制的EXCEL中, 用函数,查找一个字符串,并返回所在行的 20
&请较,如何用vb控制的EXCEL中, 用函数,查找一个字符串,并返回所在行的.比如我查找b文件里的字符“A”所在行,我用语句不行i = b.Sheets("sheet1").Range("a:a").Find(what:="A", lookat:=2).Row查找“1”就能正确找到,不知道为什么i = b.Sheets("sheet1").Range("a:a").Find(what:="1", lookat:=2).Row
已发邮箱,注意查收
的感言:没办法,没人螚解决
等待您来回答
编程领域专家温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!&&|&&
LOFTER精选
阅读(12061)|
用微信&&“扫一扫”
将文章分享到朋友圈。
用易信&&“扫一扫”
将文章分享到朋友圈。
历史上的今天
id:'fks_',
blogTitle:'VB操作EXCEL表的常用方法',
blogAbstract:'VB是常用的应用软件开发工具之一,由于VB的报表功能有限,而且一但报表格式发生变化,就得相应修改程序,给应用软件的维护工作带来极大的不便。因此有很多程序员现在已经充分利用EXECL的强大报表功来实现报表功能。但由于VB与EXCEL由于分别属于不同的应用系统,如何把它们有机地结合在一起,是一个值得我们研究的课题。一、 VB读写EXCEL表:VB本身提自动化功能可以读写EXCEL表,其方法如下:1、在工程中引用Microsoft Excel类型库:从\"工程\"菜单中选择\"引用\"栏;选择Microsoft Excel 9.0 Object Library(EXCEL2000),然后选择\"确定\"。表示在工程中要引用EXCEL类型库。2、在通用对象的声明过程中定义EXCEL对象:Dim xlApp As Excel.ApplicationDim xlBook As Excel.WorkBook',
blogTag:'',
blogUrl:'blog/static/',
isPublished:1,
istop:false,
modifyTime:0,
publishTime:7,
permalink:'blog/static/',
commentCount:0,
mainCommentCount:0,
recommendCount:1,
bsrk:-100,
publisherId:0,
recomBlogHome:false,
currentRecomBlog:false,
attachmentsFileIds:[],
groupInfo:{},
friendstatus:'none',
followstatus:'unFollow',
pubSucc:'',
visitorProvince:'',
visitorCity:'',
visitorNewUser:false,
postAddInfo:{},
mset:'000',
remindgoodnightblog:false,
isBlackVisitor:false,
isShowYodaoAd:false,
hostIntro:'',
hmcon:'1',
selfRecomBlogCount:'0',
lofter_single:''
{list a as x}
{if x.moveFrom=='wap'}
{elseif x.moveFrom=='iphone'}
{elseif x.moveFrom=='android'}
{elseif x.moveFrom=='mobile'}
${a.selfIntro|escape}{if great260}${suplement}{/if}
{list a as x}
推荐过这篇日志的人:
{list a as x}
{if !!b&&b.length>0}
他们还推荐了:
{list b as y}
转载记录:
{list d as x}
{list a as x}
{list a as x}
{list a as x}
{list a as x}
{if x_index>4}{break}{/if}
${fn2(x.publishTime,'yyyy-MM-dd HH:mm:ss')}
{list a as x}
{if !!(blogDetail.preBlogPermalink)}
{if !!(blogDetail.nextBlogPermalink)}
{list a as x}
{if defined('newslist')&&newslist.length>0}
{list newslist as x}
{if x_index>7}{break}{/if}
{list a as x}
{var first_option =}
{list x.voteDetailList as voteToOption}
{if voteToOption==1}
{if first_option==false},{/if}&&“${b[voteToOption_index]}”&&
{if (x.role!="-1") },“我是${c[x.role]}”&&{/if}
&&&&&&&&${fn1(x.voteTime)}
{if x.userName==''}{/if}
网易公司版权所有&&
{list x.l as y}
{if defined('wl')}
{list wl as x}{/list}

我要回帖

更多关于 vb.net excel 的文章

 

随机推荐