Question

50分 麻烦vfp高手帮我看看这两个题目的代码怎么写啊，拜托了，不胜感激！！

关于表单设计器的，题目要求：
在组合框combo1里可供选择的字体为：黑体、宋体、楷体_GB2312。
List1中可供选择的字号为10-30，每种字号相差2。
（1）在组合框Combo1中选择某种字体后，Label1的字体相应发生变化。
（2）在列表框list1中选择任意数字，Label1的字号相应发生变化。
编写程序实现上述功能。

Answer 1

表单放上上述控件，表单的init事件，向LIST1和COMBO1添加字体、字号：
THISFORM.Combo1.ADDITEM('黑体')
THISFORM.Combo1.ADDITEM('宋体')
THISFORM.Combo1.ADDITEM('楷体_GB2312')
FOR I=10 TO 30 STEP 2
S=STR(I,2)
THISFORM.LIST1.ADDITEM(S)
NEXT
COMBO1的INTERACTIVECHANGE事件：
THISFORM.LABEL1.FONTNAME=ALLT(THIS.VALUE)

LIST1的CLICK事件：
THISFORM.LABEL1.FONTSIZE=VAL(THIS.VALUE)

Answer 2

thisform.label1.FontName=thisform.list1.Value thisform.label1.FontSize=VAL(thisform.combo2.Value)