vb点击一个按钮后另一个按钮自动被点击

vb中如何让按钮点击一次后就失效,再点击另一个按钮后恢复,另一个按钮失效~

Command1.Enabled = False可以使Command1按钮失效，直接放在Command1的Click事件中就行。
那个按钮要使这个按钮启用，在那个按钮的相应事件内加入Command1.Enabled = True即可

首先要添加两个窗体，假设第一个窗体名为Form1，第二个窗体名为Form2。在Form1窗体中添加个按钮Command1。按钮单击事件的代码为：
Private Sub Command1_Click()
Form2.Show '用show方法加载并且显示名为Form2的窗体
End Sub
show 方法后面省略了两个参数即Form2.Show 0或Form2.Show 1此参数可缺省。可自行运行验证

如果是一个工程里的2个窗体，调用时需要先将第二个窗体中按钮的事件作用域private改为public
。然后在第一个窗体中的控件单击事件里调用窗体名+事件名。例如：
Form1中：
Private Sub Command1_Click()
Form2.Command1_Click
End Sub

Form2中：
Public Sub Command1_Click()
'这里是第二个窗体中按钮的单击事件’
End Sub

你要在一楼的基础上加一个call指令。也就是这样：
Private Sub Command1_Click()
Call Command2_Click
End Sub
如果是另一个窗体form2.那就是
Private Sub Command1_Click()
Call Form2.Command2_Click
End Sub

可以用一个按钮触发另外一个按钮事件的，你看看VB帮助，按钮事件触发那块。

在Form1的代码窗口中：
Private Sub Command1_Click()
Form2.Command1_Click
End Sub
在Form2的代码窗口中：
Public Sub Command1_Click()
MsgBox "这是F2的按钮"
End Sub

RaiseEvent 窗口名.控件名_Click()

---

广灵县15529409003： vb点击一个按钮后另一个按钮自动被点击 - ？
聊娴麝香： 如果是一个工程里的2个窗体,调用时需要先将第二个窗体中按钮的事件作用域private改为public .然后在第一个窗体中的控件单击事件里调用窗体名+事件名.例如:Form1中:Private Sub Command1_Click() Form2.Command1_Click End Sub Form2中:Public Sub Command1_Click() '这里是第二个窗体中按钮的单击事件' End Sub

广灵县15529409003： 如何编写VB工具栏代码使得点击一个按钮后另一个按钮变成有效 - ？
聊娴麝香： 例如我点击按扭Command1时工具栏的第一个按扭有效吧.Private Sub Command1_Click() Toolbar1.Buttons(1).Enabled = True End Sub 就是这样如果对第二个按扭刚把1改为2即可.Toolbar1.Buttons(2).Enabled = True 注意,虽然VB的数组是从0开始的,但工具栏的按扭数组是从1开始的.

广灵县15529409003： VB中如何实现单击一个按钮同时触发两个事件? - ？
聊娴麝香： 1,在第一个按钮的过程中,调用第二个按钮 Private Sub Command1_Click() Call Command2_Click()'调用command2的过程...'完成自己的事件 End Sub2,做成一个单独的外部过程 Private Sub Command1_Click() Call mySub()'调用外部过程...'完成自己的事件 End Sub Private Sub mySub()'这是外部过程 End Sub

广灵县15529409003： vb里一个窗体中的命令按钮 按下去 会执行另外一个窗体中的命令按钮的命令 要怎么做 - ？
聊娴麝香： 实现方法:1)在当前窗口按钮的Click事件中对执行窗体的按钮的Value 属性赋值True事项. Value 属性,CommandButton 控件-返回或设置指示该按钮是否可选的值;在设计时不可用. Private Sub Command1_Click()Form2.Command1....

广灵县15529409003： 单击按钮1后,按钮2出现怎么在vb中设置 - ？
聊娴麝香： 假如按钮1名为Command1,按钮2名为Command2.在按钮1的单击事件中加入:Private Sub Command1_Click() command2.visible=true end sub 使用时选将命令按钮2的visible属性设置为false.可以在vb的按钮属性框里,也可以直接在Form的load事件中:Command2.Visible=false

广灵县15529409003： VB中,怎么让按钮响应另一个按钮的单击事件 - ？
聊娴麝香： Private Sub Command1_Click() call Command2_Click End Sub Private Sub Command2_Click() ...End Sub

广灵县15529409003： VB运行自动单击另一程序的按钮 - ？
聊娴麝香： 用句柄啊,获得菜单句柄:窗口菜单用GetMenu,窗口的系统菜单用GetSystemMenu,然后用GetSubMenu获取子菜单的句柄,然后是按钮的句柄(findwindow);然后模拟点击:使用 SendMessage 给这个按钮发送 WM_LBUTTONDOWN 和 WM_LBUTTONUP 消息模拟鼠标点击.

广灵县15529409003： VB怎样设置点击一个按钮后弹出另一个窗口 - ？
聊娴麝香： 首先要添加两个窗体,假设第一个窗体名为Form1,第二个窗体名为Form2.在Form1窗体中添加个按钮Command1.按钮单击事件的代码为:Private Sub Command1_Click() Form2.Show '用show方法加载并且显示名为Form2的窗体 End Sub show 方法后面省略了两个参数即Form2.Show 0或Form2.Show 1此参数可缺省.可自行运行验证

广灵县15529409003： vb如何如何实现点击一个按钮后其他按钮才可以点击、文本框才可以填写的功能 - ？
聊娴麝香： Private Sub Command1_Click() Command2.Enabled = True Command3.Enabled = True Text1.Enabled = True End Sub Private Sub Form_Load() Command1.Caption = ＂添加命令＂ Command2.Caption = ＂添加完成＂ Command3.Caption = ＂取消添加＂ Command2.Enabled = False Command3.Enabled = False Text1.Enabled = False End Sub

广灵县15529409003： VB我想做多个按钮,可是点了其中一个按钮,原本点上状态的按钮就变为未点上的状态,应该怎解决,输入什么代码 - ？
聊娴麝香： 你是不是把按钮复制了?这样就默认你的所有按钮构成一个按钮组,解决方法:把你的按钮的名称改为各自不同的,按钮组为commandbutton1(1)、commandbutton1(2)····,可以改为commandbutton1、commandbutton2,这样就可以了