【VB开源代码栏目提醒】:本文主要为网学会员提供8.4.1.frm,希望对需要8.4.1.frm网友有所帮助,学习一下!
VERSION 5.00
Begin VB.Form Form5
Caption = "Form5"
ClientHeight = 3195
ClientLeft = 60
ClientTop = 345
ClientWidth = 4680
LinkTopic = "Form5"
ScaleHeight = 3195
ScaleWidth = 4680
StartUpPosition = 3 '窗口缺省
Begin VB.OptionButton Option2
Caption = "女"
Height = 375
Left = 1440
TabIndex = 1
Top = 1680
Width = 1335
End
Begin VB.OptionButton Option1
Caption = "男"
Height = 375
Left = 1440
TabIndex = 0
Top = 840
Width = 1335
End
End
Attribute VB_Name = "Form5"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub Option1_Click()
If Option1.Value = True Then
Print "您选择的是:男"
End If
End Sub
Private Sub Option2_Click()
If Option2.Value = True Then
Print "您选择的是:女"
End If
End Sub
上一篇:
8.3.2.frm
下一篇:
“政治先于社会”:认同政治学的政治与社会概念