(1)在名称为Form1的窗体中画一个名称为L1的标签,其标题为“0”,BorderStyle属性为1;再添加一个名称为Timer1 的计时器。请设置适当的控件属性,并编写适当的事件过程,使得在运行时,每隔一秒钟标签中的数字加1。如图1-33所示的是程序刚

admin2019-06-11  50

问题 (1)在名称为Form1的窗体中画一个名称为L1的标签,其标题为“0”,BorderStyle属性为1;再添加一个名称为Timer1 的计时器。请设置适当的控件属性,并编写适当的事件过程,使得在运行时,每隔一秒钟标签中的数字加1。如图1-33所示的是程序刚启动时的情况。程序中不得使用任何变量。

    注意:存盘时必须存放在考生文件夹下,工程文件名为sjt3.vbp,窗体文件名为sjt3.frm。
    (2)在考生文件夹下有一个工程文件sjt4.vbp,要求程序运行后,如果多次单击列表框中的项,则可同时选择这些项。而如果单击“显示”按钮,则在窗体上输出所有选中的列表项(如图1-34所示)。

    要求:修改列表框的适当属性,使得运行时可以多选,并去掉程序中的注释符,把程序中的?为正确的内容,使其实现上述功能,但不得修改程序中的其他部分。最后把修改后的程序以原来的文件名存盘。

选项

答案第1小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,按要求画出控件并设置属性。 步骤2:在代码编辑窗口编写计时器的事件过程。 参考代码: Private Sub Timer1_Timer() L1 = L1 + 1 End Sub 步骤3:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,将列表框的MultiSelect属性值设置为1-simple。 步骤2:在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: For i = 0 To l1.ListCount - 1 If l1.Selected(i) = True Then 步骤3:按要求将文件保存至考生文件夹中。

解析
转载请注明原文地址:https://kaotiyun.com/show/ojUp777K
0

最新回复(0)