为了下1个项目用的:
Form的Picture属性:图片背景
Label的alignment属性:内容居右
对布尔变量的交互使用
if Not firstflag Then
If Not res Then
dataout.Caption = "" '当点击第1个数字时
dataout.Caption = dataout.Caption & Index
Else
dataout.Caption = Index
res = False
End If
firstflag = True
Else '当点击不是第1次时
If Not res Then
'dataout.Caption = ""
dataout.Caption = dataout.Caption & Index
Else
dataout.Caption = Index
res = False
End If
End If
关于不等的利用:
If (dataout.Caption <> "") Then
End if
毛病缘由:未写endif