请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个水平滚动条,其名称为HScrolll,然后通过属性窗口设置窗体和滚动条的属性,实现如下功能:①窗体标题为“设置滚动条属性”;②滚动条所能表示的最小值和最大值分别为0和2001⑧程序运行后,单击滚动条两端的箭头时,滚动框移动的增量值为2;④程序运行后,单击滚动框前面或后面的部位时,滚动框移动的增量值为10;⑤滚动框的初始位置为100。程序的运行情况如图1-12l所示。要求:不要编写任何代码。注意:存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sjtl.frm。

(2)在名称为Forml的窗体上画一个文本框,其名称为Textl,如图1-122(a)所示,编写适当的事件过程。程序运行后,如果单击窗体,则可使文本框移到窗体的左上角;而如果在文本框中输入信息,则可使文本框移到窗体的右上角。程序的运行情况如图1-122(b)所示。要求:不得使用任何变量,只允许通过修改属性的方式移动文本框。注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
【正确答案】正确答案: 第1小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,在窗体Forml中画一个滚动条,并设置它的相关属性,其属性及值如表2-67所示。

【答案解析】解析: 第1小题 本题只需按要求画出控件并设置其相应属性即可。 第2小题 控件的Top和Left属性用于设置控件在窗体中的位置。 要在单击窗体时使文本框移到窗体左上角,只需在其单击事件中令Top属性和LeR属性为0;要在文本框中输入信息时令文本框移到窗体的右上角,需要在文本框的Change事件中令文本框的Top属性为0,Left属性等于窗体的宽度减去文本框的宽度。