Question

vb系统中的用户登录系统如何制作，求编程源代码和设计界面

还有怎样结合vb6.0和access 2003的数据制作成一个客户信息浏览编辑器，同样是编程源代码！请各位大虾救救小猫我，急用！

Answer 1

Private Sub Command1_Click()
Dim xlApp As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
Dim I,J AS Integer
Set xlApp = CreateObject("Excel.Application")
Dim ss As String

CommonDialog1.ShowOpen
Ain = CommonDialog1.filename
If Ain = "" Then Exit Sub
Set xlBook = xlApp.Application.Workbooks.Open(Ain) '("d:\40.xls")
Set xlSheet = xlBook.Worksheets(2)
For I = 25 To 28
For J = 3 To 5
MSFlexGrid1.TextMatrix(I - 25, J - 3) = xlSheet.Cells(I, J)
Next J
Next I
xlBook.Close
xlApp.Quit
end sub
希望对您有所启迪