Question

在VB2008中，如何点一个按钮，这个按钮执行完自己的代码之后，继续执行第二个按钮的代码呢？

当然第二个按钮就是不起作用的，所以就在属性上将其visible设为false。
这是为了编程的时候方便分模块做而已！
现在我要将其整合起来。。
MessageBox.Show("Button2")
是做什么用呢？

Answer 1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MessageBox.Show("Button1")
'
'
'
Button2_Click(sender, e)
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
'
'
'
MessageBox.Show("Button2")
End Sub

MessageBox.Show("Button2") 就是一个弹出消息框，和MsgBox类似

Answer 2

Dim xlapp As Object
Set xlapp = CreateObject("Excel.Application")
xlapp.Workbooks.Open ("C:\Documents and Settings\dll\桌面\HRMS\HRMS\bin\human.xls")
xlapp.Application.Visible = True