VB 禁止指定窗口标题栏菜单
这个程序是固定的，比如cmd.exe
打开CMD后，鼠标在CMD的标题栏可以点击右键和左键，弹出相应的菜单。
我要达到的目的是：无论是左击还是右击CMD的标题栏都不能弹出菜单。
或者能出现菜单也行，但只能出现标准的菜单，比如菜单中只能出现还原 最大化 最小化 关闭等，绝对不能出现不标准的编辑 默认值 属性等。
注意：窗口右上角的最小化、最大化（还原）、关闭，这三个按钮一定要留着。
各位达人有什么办法？
最好列出VB代码，谢谢！
有个不成熟的思路，全局HOOK鼠标，然后判断当前激活的窗口是不是目标窗口，是的话再判断是否是非客户区，是的话拦截之。
剩下的似乎就只能注入了，难度高
楼上的大哥，你的办法太复杂了，不过非常感谢你！
比如我在VB中是这样调用的：
i = WinExec(App.Path & "\cmd.exe", 9)
调出来的窗口不能有标题栏菜单。
楼主能讲下为什么吗？或许有别的方法
回复：patrickkong
是这样的：
因为我需要调用另一个工具，而这个工具是别人写的，很好用，我将这个工具放在我的程序里，这样好用又方便，但是这个小程序在标题栏上可以弹出菜单，里面可以修改一些这个程序的配置，因为我配置好了，不想给人修改里面的配置，不然会导致程序运行不正常。
有什么好方法吗？
很急啊!!!
没好办法，也谈谈您的想法，您的思路。
标准的Windows窗体可以用下面的方法：
VB code:
Option Explicit
Private Declare Function GetWindowLon
相关问答：
在vb中如何读取Word内容(包含表格，图片，等）
竟然不是zero。
不知道怎么实现的不要说话
这个只能读文本,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......
我想把word另存为xml之后，用vb读取这个xml的内容，请问如何实现？
dim f as integer
dim b() as byte
dim s as string
dim L as long
f=freefile()
open "abc.xml" for binary access read as #f
......
怎么把已知的数据保存成xml文件，现在已知的数据是
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xmlns:o=& ......
挺繁琐，之前发的帖子，分值太低现在重发一个。欢迎各位大侠~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[] ......
小弟用VB调EXCEL作图
objExlApp.Workbooks.Add
objExlApp.Charts.Add
objExlApp.ActiveChart.ChartType = xlLine
objExlApp.ActiveChart.HasLegend = True
objExlApp. ......
