我要用vb6.0 建个小程序就是添加一个单击按钮可以调出一个已知excel表格要详细步骤我自己做的老是提示错
来自: 更新日期:早些时候
VB6.0创建EXCEL~
我要用vb6.0 建个小程序就是添加一个单击按钮可以调出一个已知excel表格要详细步骤我自己做的老是提示错视频
相关评论:
createobject,百度VB Excel
Set xlapp = CreateObject("Excel.Application") '创建EXCEL对象
按功能键盘上的F5 运行就可以! 如果有错误,VB会出现新窗口,用汉字写出如何错误。在新窗口内点击调试,在代码窗口中出错的代码为黄色背景。 最后保存程序,单击“文件”菜单——选择“保存工程”。需要保存两个窗体,首先是.frm的应用程序窗体,然后是.vbp的工程文件。
'添加部件Microsoft Common Dialog Control 6.0 (SP6),并在form中画一个CommonDialog控件
'将以下代码添加到你需要的地方即可
Set wsh = CreateObject("WScript.Shell")
With CommonDialog1
.DialogTitle = "选取文件"
.Flags = 4
.FileName = ""
.InitDir = wsh.SpecialFolders("Mydocuments")
.Filter = "Excel2003电子表格(*.xls)|*.xls"
.ShowOpen
End With
strfilename = CommonDialog1.FileName
If strfilename = "" Then Exit Sub
Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Open(strfilename)
xlapp.Visible = True
我要用vb6.0 建个小程序就是添加一个单击按钮可以调出一个已知excel表格要详细步骤我自己做的老是提示错视频
相关评论: