小弟用VB+sql server作了个系统,可是有错,无法运行,恳请VB高手帮着调试一下

来源:百度知道 编辑:UC知道 时间:2024/09/28 09:55:29
这个系统在我的邮箱的收件箱中,名称simplehard密码111111
因为这个系统关系到我的毕业设计,所以非常非常的希望哪为好心的大哥帮我改一下,或者告诉我错在哪,不胜感激
系统在邮箱中,可以去看一下,邮箱是simplehard@126.com密码
111111

看了你的代码

基本上有几处错误:

1。public userqx 你定义的不是字符型,而后面又赋于字符型

2。当登录到主窗口的时候
If userqx = "一般用户" Then(原来的)
上面你的有以下错误,你的数据前面赋给其的值是一般人员
If Trim(userqx) = "一般人员" Then(需要改成)

frmmain.menukj.Enabled = False
frmmain.menubb.Enabled = False
frmmain.menudbf.Enabled = False
frmmain.menuassist.Enabled = False
frmmain.menuuser.Enabled = False
frmmain.menuhistory.Enabled = False

我给你加上了frmmain属性

后面的菜单功能键,,,你这几个键在你菜单里面根本未定义名称!

你仔细查看!

什么的邮箱

是网易邮箱吗