UC知道VB flag怎么用
来源：百度知道 编辑：UC知道 时间：2024/06/09 00:46:46
想问一下FLAG怎么用
Dim flag As Integer
Private Sub cmd1_Click()
If flag = 0 Then
If Val(lblCalc.Caption) <> 0 Or InStr(1, lblCalc.Caption, ".") > 0 Then
lblCalc.Caption = lblCalc.Caption + Me.cmd1.Caption
Else
lblCalc.Caption = Me.cmd1.Caption
End If
Else
If flag = 1 Then
lblCalc.Caption = Me.cmd1.Caption
flag = 0
End If
End If
End Sub
Private Sub Form_Load()
flg = 0
End Sub
这样一个代码，fLag是什么意思？
Dim flag As Integer
Private Sub cmd1_Click()
If flag = 0 Then
If Val(lblCalc.Caption) <> 0 Or InStr(1, lblCalc.Caption, ".") > 0 Then
lblCalc.Caption = lblCalc.Caption + Me.cmd1.Caption
Else
lblCalc.Caption = Me.cmd1.Caption
End If
Else
If flag = 1 Then
lblCalc.Caption = Me.cmd1.Caption
flag = 0
End If
End If
End Sub
Private Sub Form_Load()
flg = 0
End Sub
这样一个代码，fLag是什么意思？
这里的fLag是写程序的人自己加一个变量
用来做判断代码时候继续下去的标志
这个FLAG肯定有其他地方可以修改它，让他从0变为1。
如果那个地方的代码不先执行，
那么这边If flag = 1 Then
的代码就不会执行。
用来控制流程用的。写程序很常用的手法。
一个整型变量
这个可以修改的
除了保留字以外的什么都行的