W wxcayap Unregistered / Unconfirmed GUEST, unregistred user! 2006-10-27 #1 我在做的一的小程序中有3个radiobutton按钮和一个button按钮。我想在没有选中radiobutton中的任何一个时，点击button按钮时能跳出一个提示窗口。请问高手这段代码怎么写。请高手赐教。
我在做的一的小程序中有3个radiobutton按钮和一个button按钮。我想在没有选中radiobutton中的任何一个时，点击button按钮时能跳出一个提示窗口。请问高手这段代码怎么写。请高手赐教。
S sefeng1982 Unregistered / Unconfirmed GUEST, unregistred user! 2006-10-27 #2 button1onclick begin if not (readiobutton1.checked and radiobutton2.checked and radibutton3.checked) then do else do; end;
button1onclick begin if not (readiobutton1.checked and radiobutton2.checked and radibutton3.checked) then do else do; end;
F fanybul Unregistered / Unconfirmed GUEST, unregistred user! 2006-10-27 #3 if (not RadioButton1.Checked ) and (not RadioButton2.Checked ) and (not RadioButton3.Checked ) then showmessage('请选择');
if (not RadioButton1.Checked ) and (not RadioButton2.Checked ) and (not RadioButton3.Checked ) then showmessage('请选择');
S sefeng1982 Unregistered / Unconfirmed GUEST, unregistred user! 2006-10-27 #4 不好意思写错了: button1onclick begin if not (readiobutton1.checked or radiobutton2.checked or radibutton3.checked) then do else do; end;
不好意思写错了: button1onclick begin if not (readiobutton1.checked or radiobutton2.checked or radibutton3.checked) then do else do; end;
X xinjinren Unregistered / Unconfirmed GUEST, unregistred user! 2006-10-27 #5 if (RadioButton1.Checked = false) and (RadioButton2.Checked = false) and ( RadioButton3.Checked = false) then begin Application.MessageBox('zenglin is a pig','提示',64); end;
if (RadioButton1.Checked = false) and (RadioButton2.Checked = false) and ( RadioButton3.Checked = false) then begin Application.MessageBox('zenglin is a pig','提示',64); end;
