跪求解释啊~~vb编的计算器小程序中这段代码是什么意思啊?求详细解释

Private Sub cmd0_Click() If flag = 0 Then If Val(lblCalc.Caption) <> 0 Or InStr(1, lblCalc.Caption, ".") > 0 Then lblCalc.Caption = lblCalc.Caption + Me.cmd0.Caption Else lblCalc.Caption = Me.cmd0.Caption End If Else If flag = 1 Then lblCalc.Caption = Me.cmd0.Caption flag = 0 End If End If End Sub
最新回答
活给自己看

2024-04-29 00:44:48

Private
Sub
cmd0_Click()
If
flag
=
0
Then
如果flag值为0时,执行以下代码,否跳过
If
Val(lblCalc.Caption)
<>
0
Or
InStr(1,
lblCalc.Caption,
".")
>
0
Then
如果lblcalc标提个数不等于0
或者lblCalc.Caption里查找
"."从第1个开始找如果>0也就是找到了.执行以下代码
lblCalc.Caption
=
lblCalc.Caption
+
Me.cmd0.Caption
如果以上条件成立那么就lblCalc.Caption等于lblCalc.Caption加上
Me.cmd0.Caption
标提
Else
如果以上条件不成立
lblCalc.Caption
=
Me.cmd0.Caption
lblCalc.Caption
标提等于
Me.cmd0.Caption
End
If
Else
If
flag
=
1
Then
如果flag=1执行下面代码
lblCalc.Caption
=
Me.cmd0.Caption
lblCalc.Caption
标提等于
Me.cmd0.Caption
flag
=
0
flag=0那这里的意思是说只要满足了flag就让他去Me.cmd0.Caption
里面执行
End
If
End
If
End
Sub
其实这段代码写的不怎么好,但我是以前写VB的,现在写C#.net
不知道有没有记错
这代码主要意思就是去Me.cmd0.Caption
里面找"."lblCalc.Caption只是起着保存数据,如有何提请追问