(1)在名称为Forml的窗体上画一个名称为Labell、标题为“添加项目:”的标签;画一个名称为Textl的文本框,没有初始内容;画一个名称为Combol的下拉式组合框,并通过属性窗口输入若干项目(不少于三个,内容任意);再画两个命令按钮,名称分别为Co

admin2010-09-02  44

问题 (1)在名称为Forml的窗体上画一个名称为Labell、标题为“添加项目:”的标签;画一个名称为Textl的文本框,没有初始内容;画一个名称为Combol的下拉式组合框,并通过属性窗口输入若干项目(不少于三个,内容任意);再画两个命令按钮,名称分别为Commandl、Command2,标题分别为“添加”、“统计”。在运行时,向Textl中输入字符,单击“添加”按钮后,则Textl中的内容作为一个列表项被添加到组合框的列表中;单击“统计”按钮,则在窗体上显示组合框中列表项的个数,如图1-144所示。请编写两个命令按钮的Click事件过程。
注意:程序中不得使用变量,也不能使用循环。存盘时必须存放在考生文件夹下,工程文件名为sjl3.vbp,窗体文件名为sjt3.frm。

(2)在考生文件夹下有一个工程文件sjt4,vbp,其窗体如图1-145所示。该程序用来对在上面的文本框中输入的英文字母串(称为“明文”)加密,加密结果(称为“密文”)显示在下面的文本框中。加密的方法是:选中一个单选按钮,单击“加密”按钮后,根据选中的单选按钮后面的数字n,把明文中的每个字母改为它后面的第n个字母(“z”后面的字母认为是“a”,“Z”后面的字母认为是“A”),如图1-145所示。窗体中已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不能修改程序中的其他部分和控件的属性。最后把修改后的文件按原文件名存盘。

选项

答案 第l小题 【操作步骤】 步骤l:新建一个“标准EXE”工程,如表2-81在窗体中画出控件并设置其相关属性。 [*] 步骤2:打开代码编辑窗口,编写两个命令按钮的Click事件过程。 参考代码; PriVate Sub Commandl_Click() Comb01.AddItem Textl.Text End Sub PriVate Sub Command2_Click() Print Comb01.ListCount End Sub 步骤3:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤l:打开考生文件中的本题工程文件sjt4.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: n=Val(Opl(k).Caption) For k=1 To m c=Mid$(Textl.Text, k, 1) a=a+c 步骤2:按要求将文件保存至考生文件夹中。

解析  第l小题
    ①组合框(ComboBox)将文本框与列表框的特性组合在一起,既可在组合框的文本框部分输入信息,也可在列表框部分选择项目。可通过修改组合框的Style属性值来改变其显示类型,值为0-Dropdown Combo时,表示下拉式组合框,包括一个下拉式列表和一个文本框,可以从列表选择或在文本框中输入;值为1-Simple Combo时,表示简单组合框,包括一个文本框和一个不带下拉的列表,可以从列表中选择或在文本框中输入,增加其高度可显示列表的更多部分;值为2-Dropdown List时,表示下拉式列表,这种样式仅允许从下拉式列表中选择。
    ②组合框的列表项既可以在设计阶段通过其List属性设置加入(注意:每输入完一项后按键换行再输入下一项),也可在程序运行时通过Addltem方法加入,其语法为:组合框名.Addltem项目字符串[,索引值】。其中,“索引值”可以指定插入项在列表框中的位置,表中的项目从0开始计数。如果省略“索引值”,则文本被放在列表框的尾部。
    ③ListCount属性用来返回组合框中当前的列表项总数。
    本题需按要求设计程序界面,并编写“添加”和“统计”命令按钮的Click事件过程。
第2小题
   Strings(个数,字符)函数用于返回含指定个数字符的字符串。
   程序设计思路:在“加密”按钮的单击事件过程中,首先利用For循环语句逐一判断单选按钮组中各个元素是否选中,若选中则用变量n记录下该单选按钮所代表的数值;接着再次利用For循环语句和Mid函数逐一为文本框中的每一个字符“加密”,若“加密”后得到的字符在ASCII表中值大于“z”,则重新取比其小26的字符;最后将“加密”后的字符串显示在文本框Text2中。
转载请注明原文地址:https://kaotiyun.com/show/aUmp777K
0

最新回复(0)