二级Access考试程序设计题技巧

《二级Access考试程序设计题技巧》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、.1、给输入的内容给出判断：练习册六：在考生文件夹下打开Access数据库prog0214.mdb，在窗体FormGrade中，编写“等级”按钮的单击事件处理代码，实现如下功能：根据下表，将由文本框Text1输入成绩对应的等级显示有文本框Text2中。DimaAsIntegerDimsAsStringa=Text1Ifa>=0Anda<=100ThenIfa>=90Thens="A"ElseIfa>=75Thens="B"ElseIfa>=60Thens="C"Elses="D"EndIfText2=sEndIf练习册八：在考生文件夹下打开Access数据库prog0

2、216.mdb。在窗体FormNumber中，编写“位数”按钮的单击事件处理代码，实现如下功能：在文本框Text1中输入一个不超过4位的正整数，判断它的位数，结果显示在文本框Text2中。DimaAsInteger,bAsIntegera=Text1Ifa>0Anda<1000ThenIfa>=100Thenb=3ElseIfa>=10Thenb=2Elseb=1EndIfEndIfText2=b..例1：打开Access数据库“所用文件.mdb”。要求编写窗体djzh上“成绩等级”按钮的单击事件处理代码，实现如下功能：当成绩小于0或大于100，显示“非法数据”，否则

3、按如下规则转换：成绩≥85：优秀60≤成绩<85：合格成绩<60：不合格DimcjAsSingle,djAsStringcj=Text1.ValueSelectCasecjCase85To100dj="优秀"Case60To84dj="合格"Case0To59dj="不合格"CaseElsedj="非法数据"EndSelectText2.Value=dj例2：打开Access数据库“所用文件.mdb”。要求编写窗体leapyear上“是否闰年”按钮的单击事件处理代码，实现如下功能：输入一个日期，单击“是否闰年”按钮，根据判断结果显示“是闰年”或“不是闰年”。(参见P2

4、18字符串转换日期函数DateValue)闰年的条件是：年份能被4整除但不能被100整除，或能被400整除。DimyAsIntegery=Year(DateValue(Text1.Value))If(yMod4=0AndyMod100<>0)OryMod400=0ThenText2.Value="是闰年"ElseText2.Value="不是闰年"EndIf..例3：打开Access数据库“所用文件.mdb”。要求编写窗体FrmPrime上“判断素数”按钮的单击事件处理代码，判断文本框text1中自然数是否为素数（只能被1和本身整除的自然数），并将判断结果显示在标签L

5、abel1中。DimiAsInteger,jAsInteger,xAsInteger,pdAsStringx=Text1Fori=2Toxpd="素数"Forj=2ToSqr(i)IfiModj=0Thenpd="不是素数"EndIfNextjNextiLabel2.Caption=pd练习册三：在考生文件夹下打开Access数据库prog0226.mdb，在窗体FormNum中，编写“判断”按钮的Click事件代码，实现如下功能：根据输入的字符判断是否为数字，若是显示“Yes”，否则显示“No”。DimaAsStringa=Text1Ifa>="0"Anda<="9

6、"ThenText2="Yes"ElseText2="No"EndIf例4：打开Access数据库“所用文件.mdb”。要求编写窗体Judge上“判断”按钮的单击事件处理代码，判断文本框text1中字符是否是数字，并将判断结果显示在标签Label1中。DimCAsStringC=Text1.ValueIfC>="0"AndC<="9"ThenLabel1.Caption=C&"是数字!"ElseLabel1.Caption=C&"是其它字符!"EndIf..例5：打开Access数据库“所用文件.mdb”。要求编写窗体qsws的“求三位数字”按钮的单击事件处理代码，实

7、现如下功能：在text1输入一个三位正整数，单击“求三位数字”按钮，分别在text2、text3、text4上显示其百位数字、十位数字和个位数字；若输入的整数不足三位，则退出窗体。a=Text1.ValueIfa<100Ora>999ThenDoCmd.CloseElsegw=Int(a/1)Mod10sw=Int(a/10)Mod10bw=Int(a/100)Mod10Text2.Value=bwText3.Value=swText4.Value=gwEndIf2、对输入的两个值进行运算或判断：练习册一：在考生文件夹下打开Access数据库prog