Foxtable(狐表)用户栏目专家坐堂 → 发布后的程序系统菜单及功能还在怎么去掉?


  共有1891人关注过本帖树形打印复制链接

主题:发布后的程序系统菜单及功能还在怎么去掉?

帅哥哟,离线,有人找我吗?
cheshi
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:8 积分:117 威望:0 精华:0 注册:2017/9/18 16:03:00
发布后的程序系统菜单及功能还在怎么去掉?  发帖心情 Post By:2017/9/18 16:05:00 [显示全部帖子]

按范例设置登录窗口(模式窗口)登录后该窗口关闭,打开程序主窗口(独立模式窗口)。功能都已正常实现,发布程序后主窗口能正常显示,但主窗口后面还显示着软件的工作界面,不知道如何去掉?

 回到顶部
帅哥哟,离线,有人找我吗?
cheshi
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:8 积分:117 威望:0 精华:0 注册:2017/9/18 16:03:00
  发帖心情 Post By:2017/9/18 16:17:00 [显示全部帖子]

见下图,发布的时候,没有选择“生成系统菜单”,结果就显示下面这样了。

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20170918161519.jpg
图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
cheshi
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:8 积分:117 威望:0 精华:0 注册:2017/9/18 16:03:00
  发帖心情 Post By:2017/9/18 16:39:00 [显示全部帖子]

麻烦老师们给看一下呗。

 回到顶部
帅哥哟,离线,有人找我吗?
cheshi
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:8 积分:117 威望:0 精华:0 注册:2017/9/18 16:03:00
  发帖心情 Post By:2017/9/18 17:13:00 [显示全部帖子]

我根本就没有设计过菜单。我只想让他显示一个独立窗口,不需要其他任何界面显示出来。

 回到顶部
帅哥哟,离线,有人找我吗?
cheshi
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:8 积分:117 威望:0 精华:0 注册:2017/9/18 16:03:00
  发帖心情 Post By:2017/9/18 17:16:00 [显示全部帖子]

以下是登录窗口的代码,标红处的代码直接单独放到按钮里执行是正常的,只显示这个窗口内容,但放到登录验证后密码通过后再打开该窗口就会显示多余的菜单。


 回到顶部
帅哥哟,离线,有人找我吗?
cheshi
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:8 积分:117 威望:0 精华:0 注册:2017/9/18 16:03:00
  发帖心情 Post By:2017/9/18 17:17:00 [显示全部帖子]


If e.Form.Controls("PassWord").Value = dr("Password") Then
    _UserName = UserName
    e.Form.Close
    Forms("窗口1").open()
Else
    Messagebox.show("密码错误!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If

 回到顶部
帅哥哟,离线,有人找我吗?
cheshi
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:8 积分:117 威望:0 精华:0 注册:2017/9/18 16:03:00
  发帖心情 Post By:2017/9/18 23:24:00 [显示全部帖子]

我看了您 的代码,但我觉得关闭当前窗口,打开另一个窗口应该 是很简单的为什么 要
basemainform.close 和 e.Form.BaseForm.Opacity = 0 这个呢?

 回到顶部
帅哥哟,离线,有人找我吗?
cheshi
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:8 积分:117 威望:0 精华:0 注册:2017/9/18 16:03:00
  发帖心情 Post By:2017/9/19 15:02:00 [显示全部帖子]

明白了,问题解决。

 回到顶部