选项按钮组CLICK 事件下代码:
do case
case this.value=1
thisform.pageframe1.page1.label1.fontname="黑体"
case this.value=2
thisform.pageframe1.page1.label1.fontname="隶体"
endcase
4,VF中的选项按钮代码
就在这个控件的chick事件中加入下面的代码do case case this.value=1 zc="教授" case this.value=2 zc="副教授" case this.value=3 zc="讲师" case this.value=4 zc="助教"endcase个人以为:1,外观的区别2、选项按钮组通过value值说明选中状态3、调用事件:选项按钮组一般在interactive事件中编写代码;命令按钮组用click事件
首先你的两个按钮应使用 optiongroup组合框,组成一组,然后在确定按钮的click事件中写入if thisform.optiongroup1.value=1 set sysmenu to defaultelse quitendif首先要打开控件工具栏,将图中红色框里的选项按钮控件点一下, 然后在表单上画一个矩形,这样就放置了一个选项按钮组控件.在选项按钮上点击右键, 菜单中选择生成器在生成器里设置ps.如果没有控件工具箱, 请这样打开:在vfp界面上方的工具栏空白处,右键, 出现的菜单里看表单控件前面是否打勾, 没有就打上首先你的两个按钮应使用 optiongroup组合框,组成一组,然后在确定按钮的click事件中写入if thisform.optiongroup1.value=1 set sysmenu to defaultelse quitendif