表单组合框!10
以下文件均保存在C:\SourceCode\3000105文件夹中
按下列要求进行操作:
1)新建表单文件F104。
在表单体中加入两个标签控件Label1和Label2，一个组合框Combo1，一个文本框Text1和一个命令按钮Command1。
Label1标签所显示的标题文字为粗体红色隶书18号字“请选择姓名:”，Label2标签所显示的标题文字为斜体蓝色黑体18号字“成绩等级为:”;组合框Combo1的选项显示为粗体14号字;文本框Text1的值显示为粗体18号字;命令按钮Command1的键面显示出粗体14号字“显示”。如图1所示。 设定组合框的RowSourceType属性值为:3-SQL语句。
2)为表单的Init事件编程，使得刚运行表单时，表单是居中显示的，且只显示出命令按钮，而见不到其它控件。图示见图2。
3)为命令按钮的Click事件编程，使得单击该命令按钮时，能显示出其它控件，同时使得组合框的选项为T104表中所有
记录
混凝土 养护记录下载土方回填监理旁站记录免费下载集备记录下载集备记录下载集备记录下载
的姓名字段值;最后使命令按钮变成不可用的。图示见图3。
4)为组合框的InteractiveChange事件编程，使得当用户在组合框中选择了某个姓名时，能根据成绩来为该生确定其成绩等级。成绩等级的评定规则为:成绩高于650分者为优秀，成绩低于或等于650分但不低于600分者为良好，成绩低于600分而高于550分者为一般，成绩不高于550分者为差。图示见图4。 T104表含有考号、身份证号、姓名、性别、考试名称、成绩等字段，(题分:20.0
0.0) 得分:
[参考
答案
八年级地理上册填图题岩土工程勘察试题省略号的作用及举例应急救援安全知识车间5s试题及答案
0]
PROCEDURE Init
This.Label1.Visible=.F.
This.Label2.Visible=.F.
This.Combo1.Visible=.F.
This.Text1.Visible=.F.
This.AutoCenter=.T.
ENDPROC
[参考答案1]
PROCEDURE InteractiveChange XM=This.Value
LOCATE FOR 姓名=XM
DO CASE
CASE 成绩>650
Thisform.Text1.Value="优秀"
CASE 成绩>=600
Thisform.Text1.Value="良好"
CASE 成绩>550
Thisform.Text1.Value="一般"
OTHERWISE
Thisform.Text1.Value="差"
ENDCASE
ENDPROC
[参考答案2]
PROCEDURE Click
Thisform.Label1.Visible=.T. Thisform.Label2.Visible=.T.
Thisform.Combo1.Visible=.T.
Thisform.Text1.Visible=.T.
CC="SELECT 姓名 FROM T104 INTO CURSOR TT"
Thisform.Combo1.RowSource=CC
This.Enabled=.F.
ENDPROC
图1
图2
图3
图4
浙公网安备 33021202002483