UC知道VB checkbox 用法，忘了不少，求教
来源：百度知道 编辑：UC知道 时间：2024/06/05 22:08:29
Select Case (Check1.Value)
Case 1: leave = True
Case 0: leave = False
End Select
为什么没有check没什么反应呢
谁知道问题
给我说一下
我忘了
Private Sub Form_Load()
Dim i, money As Integer '定义整数
Dim leave As Boolean 'leave判断它是不是出城了
Show
Select Case (Check1.Value) '用你们现学的select
Case 1: leave = True '告诉你select的用法
Case 0: leave = False
End Select
End Sub
我定义过了
Case 1: leave = True
Case 0: leave = False
End Select
为什么没有check没什么反应呢
谁知道问题
给我说一下
我忘了
Private Sub Form_Load()
Dim i, money As Integer '定义整数
Dim leave As Boolean 'leave判断它是不是出城了
Show
Select Case (Check1.Value) '用你们现学的select
Case 1: leave = True '告诉你select的用法
Case 0: leave = False
End Select
End Sub
我定义过了
我不知道你要干什么是不是将leave的结果传到某个事件中去没有反应，如果是的话你将Dim leave As Boolean 'leave判断它是不是出城了放到通用里面定义，或者定义leave 为静态变量才能传到外部事件中
Select Case Check1
Case 1: leave = True
Case 0: leave = False
End Select
leave 变量没有定义