语句: Private Sub CommandButton1_Click() Fix32.Thisnode.DAM1.F_CV = 1 Fix32.Thisnode.DAM2.F_CV = 0 End Sub 语句: Private Sub CommandButton1_Click() WRITEVALUE "1", "Fix32.Thisnode.DAM1.F_CV", 0 WRITEVALUE "0", "FIX32.THISNODE.DAM2.F_CV", 0 End Sub 都可以实现你所说的功能,仅供参考