(1)在考生目录下有一个工程文件sjt3.vbp,包含了所有控件和部分程序。程序运行时,在文本框中每输入一个字符,则立即判断:若是小写字母,则把它的大写形式显示在标签Labell中;若是大写字母,则把它的小写形式显示在Labell中;若是其他字符,则把该字

admin2010-09-02  21

问题 (1)在考生目录下有一个工程文件sjt3.vbp,包含了所有控件和部分程序。程序运行时,在文本框中每输入一个字符,则立即判断:若是小写字母,则把它的大写形式显示在标签Labell中;若是大写字母,则把它的小写形式显示在Labell中;若是其他字符,则把该字符直接显示在Labell中。输入的字母总数则显示在标签Label2中,如图1-18所示。
要求;去掉程序中的注释符,把程序中的?改为正确的内容。
注意;不得修改已经存在的程序,最后把修改后的文件接原文件名存盘。

(2)在考生文件夹下有一个工程文件sjt4.vbp。窗体中有一个图片框,图片框中有一个名称为Shapel的蓝色圆,如图1-19所示。程序运行时,单击“开始”按钮,圆逐渐变大(圆心位置不变),当圆充满图片框时则变为红色,并开始逐渐缩小,当缩小到初始大小时又变为蓝色,并再次逐渐变大,如此往复。单击“停止”按钮,则停止变化“文件中已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的?改为正确的内容。提示,程序中的符号常量bule_color表示蓝色的值,red_color表示红色的值。
注意:不能修改程序的其他部分和各控件的属性。最后把修改后的文件按原文件名存盘。

选项

答案 第l小题 【操作步骤】 步骤l:打开考生文件中的本题工程文件sjt3.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: ch=Right$(Textl.Text,1) Labell.Caption=ch Label22.Caption=n 步骤2:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件下的本题工程文件sjt4,vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: Timerl.Enabl.ed=True Shapel.FillColor=red_color Shapel.Left=Shapel.Left+50 Shapel.Top=Shapel.Top+50 Shapel.FillColor=blue_color 步骤2:按要求将文件保存至考生文件夹中。

解析  第l小题
①UCase()函数用于将字符串中小写字母转换为大写字母,原本大写或非字母字符保持不变。②LCase()函数用于将字符串中大写字母转换为小写字母,原本小写或非字母字符保持不变。③Fight,(字符串,个数)函数用于取出已有字符串最右边指定个数的字符串。
本题原程序在文本框中内容改变时(即Chage事件过程中),通过Right函数始终取出其刚输入的字符,若该字符位于大写字母A~Z:之间,则将其转换成小写字母后显示在标签Labell中,记录字母个数的变量n增l;反之,若该字符位于小写字母a~z之间,则将其转换成大写字母后显示在标签Labell中,记录字母个数的变量n增l;如果以上两种情况均不是,则将该字符直接显示在Labell中,最后在标签Label2中显示变量n的值。
    第2小题
形状控件(Shape)提供了显示一些规则图形的简易方法。通过设置形状控件Shape属性值,可显示6种图形:O一矩形、l一正方形、2一椭圆、3一圆、4一圆角矩形、5一圆角正方形。Width属性用于设置形状的宽度,当形状为圆时即为圆的直径。
本题在计时器的Timer事件过程中,若Shapel填充色为蓝色则需要进行放大,若放大后其Left属性值小于或等于0则Shape的填充色改为红色,并开始缩小。若缩小后其Left属性值大于等于原来的大小时再将其填充色改为蓝色,并开始放大。形状的放大缩小通过改变Left、Top、Width、Height属性来实现。
    单击“开始”,计时器启动,Shapel开始进行放大缩小活动。
转载请注明原文地址:https://jikaoti.com/ti/exg0FFFM
0

随机试题
最新回复(0)