已有一个excel工资表
姓名 职位 月工资
张三 总工 60000
李四 工程师 5000

想用VB的窗体做一个模版，每次只需要输入姓名，后面就自动显示职位和月工资，再计算月工资总和。最好变成一个可放在桌面上的，双击就打开模版。

谢谢！

加上可以保存为excel表。

纯粹让别人替你做,恐怕 没人有那时间哎, GG

是啊！自己先做做，有问题的地方再拿出来讨论！

给钱让别人做罢

不难.
我们可以将一个excel工作簿看作为一个数据库.每一个工作表.则为一个数据表.
这样我们就可以用ado去连接excel.然后操作相当于操作数据库一样.
Private Sub Form_Load()
Show
Dim str As String
str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=e:\book1.xls;Extended Properties='Excel 8.0;HDR=Yes'"

Dim con As New ADODB.Connection
con.Open str

Dim rs As New Recordset
rs.Open "select * from [sheet1$]", con, adOpenKeyset, adLockPessimistic, adCmdText

Dim i As Integer
For i = 0 To rs.RecordCount - 1
Print rs.Fields(1)
rs.MoveNext
Next

rs.Close
End Sub

这是示例代码.你可以研究一下.

这个应该是 vlookup的吧!查找目标文件就可以了!

也可以直接用excel对象做呀

嘿嘿，我正在学呢，就是没有入门。但是.....
不过就是不给钱给别人做，我要别人给钱给我做。

是的，在excel里面用vlookup很容易搞定。但我想在vb里面实现，做成一个界面。各位大侠帮我看一看我用下面的代码运行但没有打开excel表，谢谢！

Dim xlApp As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet

Private Sub Label1_Change()
Set xlApp = CreateObject("Excel.Application")
xlApp.Visible = True
Set xlBook = xlApp.Workbooks.Open("D:\1.xls")
Set xlSheet = xlBook.Worksheets(1)
xlSheet.Activate
End Sub