qq安全助手:vb简单问题 初学vb

来源:百度文库 编辑:杭州交通信息网 时间:2024/05/05 01:31:33
Private Sub Command1_Click()

End Sub

单击command1打开c:\book1.xls
注意:打开excel界面就好像是我们在windows里面打开, 不是在程序内部打开。

Set objexcel = CreateObject("Excel.Application")
objexcel.Workbooks.Open "C:\book1.xls"
objexcel.Visible = True

Private Sub Command1_Click()
command1=c:\boos1.xls