请让我帮助在VB中编写groupbox代码。 [英] Please let me help to code for groupbox in VB.

问题描述

大家好。



我正在开展一个项目。我有一个vb表单，有三个Groupbox和三个按钮来控制每个框。我希望当我点击第一个按钮时，它会显示Groupbox1，当我点击按钮2时，它会显示groupbox2，依此类推。我正在使用的代码如下所示。但它只显示了第一个Groupbox。请帮助我任何经验人员更正此代码或任何其他最佳选择。

 公众 类 Form1 
 
 私有  Sub  Button1_Click（ ByVal  sender  As  System。对象， ByVal  e  As  System.EventArgs）句柄 Button1.Click 
 GroupBox1.Visible =（GroupBox2.Visible =  False ）
 结束  Sub  
 
 私有  Sub  Button2_Click（ ByVal 发​​件人作为系统。对象， ByVal  e < span class =code-keyword> As  System.EventArgs） Handles  Button2.Click 
 GroupBox1.Visible =（GroupBox2.Visible = < span class =code-keyword> True ）
 结束  Sub  
 
 私有  Sub  Button3_Click（ ByVal  sender  As  System。 Object ， ByVal  e  As  System.EventArgs）句柄 Button3.Click 
 GroupBox1.Visible =（组Box3.Visible =  True ）
 结束  Sub  
 结束 类 

SHOUTING删除 - OriginalGriff [/ edit]

解决方案

让我们说你想要显示/隐藏与其按钮相关的组合框，代码应如下所示：

 私有  Sub  Button1_Click（ ByVal  sender  As  System。 Object ， ByVal  e  As  System.EventArgs）< span class =code-keyword>句柄 Button1.Click 
 GroupBox1.Visible = 不 GroupBox1.Visible 
 结束  Sub  
 
 私有  Sub  Button2_Click（ ByVal  sender  As  System。 Object ， ByVal  e  As  System.EventArgs） Handles  Button2.Click 
 GroupBox2.Visible = 不 GroupBox2.Visible 
 结束  Sub  
 
 私有  Sub  Button3_Click（ ByVal  sender  As  System。 Object ， ByVal  e  As  System.EventArgs） Handles  Button3.Click 
 GroupBox3.Visib le = 不 GroupBox3.Visible 
 结束  Sub  

Hello to Everyone

i am working on a project .I have a vb form having three Groupboxes and three buttons to control each box. I want that when i click on button one,it shows the Groupbox1 and when i click on button 2 it shows groupbox2 and so on.The code for this purpose i m using is given below.But it shows only first Groupbox.Please Help me by any experience person to correct this code or any other best option.

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        GroupBox1.Visible = (GroupBox2.Visible = False)
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        GroupBox1.Visible = (GroupBox2.Visible = True)
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        GroupBox1.Visible = (GroupBox3.Visible = True)
    End Sub
End Class

[edit]SHOUTING removed - OriginalGriff[/edit]

解决方案

Let's say you want to show/hide groupbox related to its button, the code should looks like:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    GroupBox1.Visible = Not GroupBox1.Visible
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
    GroupBox2.Visible = Not GroupBox2.Visible
End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
    GroupBox3.Visible = Not GroupBox3.Visible
End Sub

这篇关于请让我帮助在VB中编写groupbox代码。的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！