VB入门技巧N例

410023425 · 发表于 2007-1-3 07:53:07

如果还有资料我会继续的!~

wazfy521 · 发表于 2007-1-6 08:54:20

我来拉,我下

zagiya · 发表于 2007-1-6 16:24:13

帮助挺大的`` 我下了 3Q

tianmaxing · 发表于 2007-1-6 23:16:06

强！顶！

夜行风 · 发表于 2007-1-7 23:00:29

顶~

显示全部楼层 · 发表于 2007-1-8 20:01:48

提示: 作者被禁止或删除内容自动屏蔽

DavidGood · 发表于 2007-1-18 18:29:58

Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y _
As Single)
If Button = 2 Then
   Text1.Enabled = False
   Text1.Enabled = True
   PopupMenu mymenu
End If
End Sub
这个不行啊！这是怎么回事啊？

410023425 · 发表于 2007-1-18 20:29:42

原帖由 DavidGood 于 2007-1-18 18:29 发表
Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y _
As Single)
If Button = 2 Then
   Text1.Enabled = False
   Text1.Enabled = True
   PopupMenu mymenu
...

我想因为你没有设置菜单

410023425 · 发表于 2007-1-18 20:31:15

给你个实例

DavidGood · 发表于 2007-1-19 10:45:25

哦!是这样的哦!

		自动登录	找回密码
密码			立即注册

++++++ 该用户已被删除	发表于 2007-1-8 20:01:48 \| 显示全部楼层提示: 作者被禁止或删除内容自动屏蔽
++++++ 该用户已被删除
	回复支持反对使用道具举报

VBGood网站全文搜索

[分享] VB入门技巧N例