VB问题解惑->请大侠指教

God_125 2010-02-08 03:29:12

跪求...

写一个CLIK事件的编码过程，按钮标题为N，要求打开一个标题为STUdent的表格.....

...全文

180 17 打赏收藏转发到动态举报

写回复

用AI写文章

17 条回复

切换为时间正序

请发表友善的回复…

发表回复

神马都能聊 2010-02-22

打赏
举报

有人跪着就得有人围观不是，我来围观。

兜售身边位置的站票，有意的直接捐赠可用分就可以了。

嗷嗷叫的老马 2010-02-22

打赏
举报

又一个跪的.....帮顶了....连问题都说不清楚,有心无力帮.

高手都到碗里来 2010-02-22

打赏
举报

鄙视跪求的路过

回复内容太短了！

gewbshuai 2010-02-22

打赏
举报

看看~

贝隆 2010-02-22

打赏
举报

飘过。。。。。。。。。。。。。。。。。。。。。。。

神马被哪个妞占用了呢 2010-02-09

打赏
举报

男儿膝下有黄金啊……

liguicd 2010-02-09

打赏
举报

从不给跪求的人任何东西

stayor 2010-02-08

打赏
举报

[Quote=引用楼主 god_125 的回复:]
跪求...

写一个CLIK事件的编码过程，按钮标题为N，要求打开一个标题为STUdent的表格.....
[/Quote]

都不知道你求什么？白跪了。

bcrun 2010-02-08

打赏
举报

原来楼主说的"标题为STUdent的表格"就是指的老张说的文件名?

God_125 2010-02-08

打赏
举报

跪求...

写一个CLIK事件的编码过程，按钮标题为N，要求打开一个标题为STUdent的表格.....

如果是ACCESS数据库的表呢...

SYSSZ 2010-02-08

打赏
举报

Private Sub Command1_Click()

Dim xlApp As Object   '定义存放引用对象的变量。

   

Set xlApp = CreateObject("excel.application")

   

xlApp.Visible = True

  Set objWorkBook = xlApp.Workbooks.Open("C:\STUdent.xls")



'xlApp.Quit   '完成时，调用 Quit 方法关闭

'Set xlApp = Nothing   '该应用程序，然后释放该引用。





End Sub

Private Sub Form_Load()

Command1.Caption = "N"

End Sub