资源描述：
《必会命令函数属性方法事件及上机分次题目》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。
1、必会函数:Int()Mod()Round()Substr()Left()Right()Len()At()AlltrimOSpace()Date()Time()Year()Val()Str()Ctod()Dtoc()Eof()bof()recno()found()&函数Iif()第一讲表单一、控件的属性一般属性：Name,caption,backcolor^forecolorjeft,top,width,height,fontname,fontsize,visible,Enabled,Alignment,tabindex特殊属性：表单au
2、tocenter,showwindow,movable,scrollbars,windowstype命令按钮设置访问键（或热键）:caption属性键字母前加入命令按钮default,cancel文本框、编辑框、组合框readonly,password,inputmask（x任意字符,9止负号和数字,#正负号数字空格）选项按钮组buttoncount编辑框scrollbars文本框Value:常用于程序设计单选按钮组value:（命令按钮组value与之相似，但没有考题）复选框value:以上两个value用于分支程序列表框Value:
3、常用于程序设计列表框listcount歹II表框columncount列表框multiselect歹U表框list(i)歹！］表框selected(i)歹U表框rowsourcetype歹U表框rowsource组合框style计时器interval(单位为毫秒，注意转换)表格columncount表格recordsourcetype,recordsource微调spinnerhighvalue,spinnerlowvalue微调increment微调value页框pagecount*表单数据环境一只要表单中涉及到表，不论题目有无数据环
4、境的要求，都要添加数据环境表.二、控件的方法：表单Release,三、控件的事件：Click表单load表单init表单destory计时器Timer文木框列表框interactivechange四、表单设计器和表单向导程序结构语句IfElseendifDocaseCaseEndcaseDowhileEnddoForEndforScanEndscan基本命令语句Setcenturyon/offlocateWaitScatterZapAppendfrom预览报表命令reportfrom...preview运行菜单命令do...withth
5、is第一次上机第3套基木操作(2)(3)第5套基本操作第53套基本操作第15套基本操作(4)第54套基本操作(1)(2)第55套基木操作第58套基本操作(1)(2)第73套基本操作*题目要求窗体高度为文本框中的值:双击“确定”按钮，在其编辑窗口输入下面的语句：thisform.height=val(thisform.text1.value)或者:this.parent.height=val(this.parent.text1.value)第23套简单应用(2)*&&如果用户输入的用户名和口令一致，则在提示信息后关闭该表单；否则重新输入用
6、户名和口令。ifthisfbrm.text1=thisform.text2wait"欢迎使用”windowtimeout1thisfomn.closeelsewait”用户名或口令不对，请重新输入……”windowtimeout1endif第一次理论课题第1套简单应用(1)和卡段套粵血陽。分)表覊迅为灰色(虽址〔1皿二1§2,192,192),1•髦立表瓷表耳件名和表轟件名均为formtest,为〃考试系统〃，表单背示为灰色(BackCole二192,192」92),(1)表单上有"娅使用考试(Label1)8个字，其了(BackCol
7、or=l92,192,192),字体为楷体.宇号为2，(ForeColor=255.128.0)；当衾单运行时，穷迦使用考侧移动，移越由许时無扌可牛id个点(提不*在Timerl控当完全移岀此按簷驕并释放.体为楷体.宇号为24.字他颜色为桔红色一…运冗时，、強n使用考7乞无〃8个宇崩,Timer1彳空制，
8、可隔(interval径件的Timer事伸中写语句THISF^M.Label1.Left=THISFORM.Label1.Left-10)狐蛊窑驚常當入°删标题为"关闭"，表单运行时单击在“表单设计器”中，建立一个计时器控件Timer
9、1,在“属性,啲Intewal处输入“200”，再双击此计时器控件，在“Timerl.TimeT编辑窗口中输入THISFORM.Label1.Left=THISFORM.Label1.Left-10IfTH
