在VB中,怎么的代码设计会让我在单击一个单选按钮时,下面的TEXT出现checkbox按钮和相应的文字?

如题所述

'先双击一个checkbox 再双击一个textbox 再添加一个Optionbutton这样checkbox就在下面不显示了 如果想要显示 代码如下:

Private Sub Option1_Click()
Check1.ZOrder 0
End Sub
温馨提示:内容为网友见解,仅供参考
第1个回答  2013-11-11
在textbox 控件上画一个checkbox
然后添加如下代码:
Private Sub Form_Load()
Check1.Visible = False
End Sub

Private Sub Option1_Click()
Check1.Visible = True
End Sub

在VB中,怎么的代码设计会让我在单击一个单选按钮时,下面的TEXT出现check...
'先双击一个checkbox 再双击一个textbox 再添加一个Optionbutton这样checkbox就在下面不显示了 如果想要显示 代码如下:Private Sub Option1_Click()Check1.ZOrder 0 End Sub

我在VB里用单选框做的选择怎么选中了以后怎么取消不了?
1、点击另外一个单选钮 2、用代码来实现,如opt1.value=0

vb方面基础问题,我想设计一个按钮,按一下就加载一个check,在代码上要...
Dim xI As Integer Private Sub Command1_Click()xI = xI + 1 Set Object = Form1.Controls.Add("VB.Checkbox", "Check" & xI)With Object .Visible = True .Caption = "Check" & xI .Width = 1000 .Height = 500 .Top = 400 * xI .Left = Check1.Left End With End Sub Privat...

VB中的VScroll控件怎么用?
DatabaseName属性是用于确定数据控件使用的数据库的完整路径。如果链接的Access 数据库,就可单击按钮定位.mdb文件。例如,选择"C:\dbbook.mdb"文件。(3)RecordSource属性 RecordSource属性用于指定数据控件所链接的记录来源,可以是数据表名,也可以是查询名。在属性窗口中单击下拉箭头在列表中选出数据库...

VB 在checkbox勾选后(如图),text中输入的内容可以保存,并且在下次打 ...
Command1_Click()If Check1.Value = 1 Then SaveSetting App.Title, "setting", "text", Text1.Text Else SaveSetting App.Title, "setting", "text", ""End If MsgBox "ok"End Sub Private Sub Form_Load()Text1.Text = GetSetting(App.Title, "Setting", "Text", "")End Sub ...

在VB中,具有Click事件的控件有哪些?具有输入功能的控件有哪些?_百度...
2、OptionButton 控件和 CheckBox 控件功能相似,但是二者间也存在着重要差别。在选择一个 OptionButton 时,同组中的其它 OptionButton 控件自动无效。相反,可以选择任意数量的 CheckBox 控件。二、CheckBox 控件 1、CheckBox 控件可以用来检查 Checked 属性以确定其状态,并使用该值来设置选项。2、如以下代...

VB如何用复选框
Text1.FontBold = Check1.Value End Sub Private Sub Check2_Click()Text1.FontItalic = Check2.Value End Sub Private Sub Form_Load()Text1.FontSize = 30 Check1.Caption = "粗体"Check2.Caption = "斜体"End Sub 窗体上一个textbox 两个checkbox 帐号解封 庆祝一下~~~偶回来啰~~~...

在vb中如何在点击checkbox时让listview中的checkboxes全部有对勾...
Private Sub Check1_Click() If Check1.Value = vbChecked Then For i = 1 To ListView1.ListItems.Count ListView1.ListItems(i).Checked = True Next Else For i = 1 To ListView1.ListItems.Count ListView1.ListItems(i).Checked = False Next End IfEnd Su...

vb编程如何在label中显示checkbox数组中的多个选中内容
再添加一个命令按钮 Command1,下面是点击按钮后,在Label1中显示CheckBox控件数组选中的内容 Private Sub Command1_Click()Dim i As Integer Dim strText As String For i = 0 To Check1.UBound If Check1(i).Value <> 0 Then strText = strText & Check1(i).Caption & vbCrLf 'vbCrLf 是...

vb 复选框用法
CheckBox 控件 组中可以使用 CheckBox 控件显示多项选择,从而可选择其中的一项或多项。也可以通过对 Value 属性编程设置 CheckBox 的值。在一个窗体中可以同时选择任意数量的 CheckBox 控件。以下代码会告诉CheckBox 控件单选或多选的状态 Option ExplicitPrivate Sub Check1_Click() Debug.Print Check1....

相似回答