选择你的热爱:实例37
最编程
2024-07-24 08:31:14
...
- 建立一个新的EXE工程,放两个单选,两个复选框如图33。
图33
- 输入代码:
Sub Form1_Check1_BN_Clicked(hWndForm As hWnd, hWndControl As hWnd)
Text1.Text = ""
If Check1.Value Then
Text1.Text="你喜欢" & Check1.Caption
End If
If Check2.Value Then
Text1.Text= Text1.Text & "你喜欢" & Check2.Caption
End If
End Sub
Sub Form1_Check2_BN_Clicked(hWndForm As hWnd, hWndControl As hWnd)
Text1.Text = ""
If Check2.Value Then
Text1.Text="你喜欢" & Check2.Caption
End If
If Check1.Value Then
Text1.Text=Text1.Text & "你喜欢" & Check1.Caption
End If
End Sub
Sub Form1_genda1_BN_Clicked(hWndForm As hWnd, hWndControl As hWnd)
If genda1.Value Then
Text1.Text="你的性别为" & genda1.Caption
End If
End Sub
Sub Form1_genda2_BN_Clicked(hWndForm As hWnd, hWndControl As hWnd)
If genda2.Value Then
Text1.Text="你的性别为" & genda2.Caption
End If
End Sub
推荐阅读
-
如何选择合适的配色方案?满足你的需要,也能让你亲自参与设计
-
深度分析MVC和MVVM:你在选择框架的时候应该注意什么?
-
理解LAMP和LNMP架构的不同点,并知道如何选择适合你的服务器环境
-
免费下载中文版思维导图软件客户端 - 选择适合你的各个版本
-
12款超级实用的思维导图工具,让你轻松成为思维导图达人!【实例解析:如何制定个人成长计划】
-
CSS选择器 ~、+、> 的使用方法与实例解析
-
这里有148个ASP代码供你选择,一定能找到适合你的那一个!
-
想学3D建模吗?这里告诉你必备的软件,选择合适的工具至关重要!
-
五大热门React动画库,你不可错过的选择!
-
选择适合你的软件源:deb官方源和国内源的比较