我是如何用EXCEL+ACCESS+WORD做出一个适合自己使用的东东的

青山依旧 · 发表于 2006-6-22 22:20

QUOTE:

以下是引用来生缘在2006-6-22 22:04:47的发言：

哈哈，可能是我曾经自学过VB的皮毛中的皮毛吧，我觉得EXCEL里的控件亲近可人呀，Access的控件看起来不顺眼。

用word 是因为，word的排版功能好，我打文书时，access和excel肯定不能达到那样的好效果的。

有同感!!!

enyyang · 发表于 2006-6-24 14:09

支持！支持！多交流哦

[em17]

青山依旧 · 发表于 2006-6-29 20:51

Private Sub ListView1_DblClick()    '返回到主窗口
    On Error Resume Next
    myID = ListView1.SelectedItem
    Unload Me
    UserForm1.Show 0
End Sub

缘哥:上面代码中的myID = ListView1.SelectedItem记录下的ID不知是什么问题,只要点击了ListView1,再点击主窗体中的首、上、下、末条就会出错。是不是删除了记录的原因呢？谢谢！！！

来生缘 · 发表于 2006-6-29 22:06

应该不是删除了记录

出错的原因可能是在myID这个变量上，或者你传个附件上来看看？

青山依旧 · 发表于 2006-6-29 22:17

缘哥:你好!附件传上你看看.谢谢!!

D0KQmGbK.rar (43.92 KB, 下载次数: 103)

来生缘 · 发表于 2006-6-29 22:59

查了半天，竟然是因为主窗体未卸载而引起的，为什么不卸载窗体会出现这个问题，暂时未知，晕

Private Sub CommandButton8_Click()‘查找
Unload Me
UserForm2.Show 0
End Sub

zbs112 · 发表于 2006-6-29 23:00

来生缘，辛苦了！

青山依旧 · 发表于 2006-6-29 23:11

QUOTE:

以下是引用来生缘在2006-6-29 22:59:58的发言：

查了半天，竟然是因为主窗体未卸载而引起的，为什么不卸载窗体会出现这个问题，暂时未知，晕

Private Sub CommandButton8_Click()‘查找
Unload Me
UserForm2.Show 0
End Sub

这下可惨了,我的listview是在主窗体中的,看来二者只能取其一了.

烟雨任平生 · 发表于 2006-6-29 23:24

用起来怎么有些地方不大对劲：

当我添加几条记录时，点击前条和后条没有反应。不知道是不是我的机器的原因。

代码有点复杂，先学习，不懂的问题我在请教楼主好了。

来生缘 · 发表于 2006-6-29 23:24

QUOTE:

以下是引用青山依旧在2006-6-29 23:11:29的发言：

这下可惨了,我的listview是在主窗体中的,看来二者只能取其一了.

不太明白，listview怎么会在主窗体中？

可能是我刚才没说清楚，在按下userform1的查找按钮后，把userform1卸载，然后显示userform2

[此贴子已经被作者于2006-6-29 23:29:10编辑过]

		自动登录	找回密码
密码			免费注册