-- 作者:jimmyhwang
-- 发布时间:2014/2/24 21:32:00
-- [求助]布尔值赋值问题
请问前辈这个代码哪里有问题啊 布尔值更改不了。。
... ...
Dim i As Boolean = CurrentTable.Current("拣货标签") If i = False Then Proc.Start() i = True Else If i = True Then Dim Result As DialogResult Result = MessageBox.Show("拣货标签已打印,是否要再次打印?", "打印提示", MessageBoxButtons.YesNo, MessageBoxIcon.Information) If Result = DialogResult.Yes Then Proc.Start() Else If Result = DialogResult.No Then Return End If End If
\'单击“打印”按钮,如果拣货标签为"未打印"则直接打印,并且改为"已打印",如果拣货标签"已打印"则提示"拣货标
\'签已打印,是否要再次打印?"
|