2. 计算机
  3. (1)在考生文件夹下有一个工程文件sjt3．vbp，其窗体上有一个列表框和一个标题为“选择”的命令按钮，且列表框中已有若干列表项。程序的功能是：当单击”选择”按钮时，如果列表框中没有列表项，则程序不做任何操作。否则，判断列表框中是否有列表项被选中，如果没有

(1)在考生文件夹下有一个工程文件sjt3．vbp，其窗体上有一个列表框和一个标题为“选择”的命令按钮，且列表框中已有若干列表项。程序的功能是：当单击”选择”按钮时，如果列表框中没有列表项，则程序不做任何操作。否则，判断列表框中是否有列表项被选中，如果没有

admin2019-06-11  79
问题 (1)在考生文件夹下有一个工程文件sjt3．vbp，其窗体上有一个列表框和一个标题为“选择”的命令按钮，且列表框中已有若干列表项。程序的功能是：当单击”选择”按钮时，如果列表框中没有列表项，则程序不做任何操作。否则，判断列表框中是否有列表项被选中，如果没有，则自动选中首个列表项(呈蓝色光条显示)；如果有，且不是最后一个列表项，则自动选中后一个列表项，如果选中的是最末一项，则自动选中首个列表项。运行时窗体界面如图所示。程序已经给出，但不完整，请将其中的注释符去掉，把?改为正确的内容，以实现上述程序功能。
    注意：考生不得修改窗体文件中已经存在的控件和程序代码，最后程序按原文件名存盘。

    (2)在考生文件夹下有一个工程文件sjt4．vbp，其窗体上有4个标签、1个文本框、1个计时器和1个标题为“开始”的命令按钮。程序的功能是：用户在文本框中输入一个计时时间(单位：分)，并单击“开始”按钮后，系统将开始倒计时，每隔1秒显示1次剩余时间，当到达计时长度时，系统倒计时结束，并弹出信息框显示“时间到!”，程序运行界面如图所示。程序已经给出，但不完整，请将其中的注释符去掉，把?改为正确的内容，以实现上述程序功能。
    注意：考生不得修改窗体文件中已经存在的控件和程序代码，最后程序按原文件名存盘。
选项
答案(1)【操作步骤】 步骤1：打开本题项目工程。 步骤2：打开代码编辑窗口，去掉程序中的注释符“’”，将问号改为正确的内容。 参考答案 Private Sub Command1_Click() If List1．ListCOLunt＝0 Then Exit Sub End If If List1．ListIndex＝－1 Then List1．ListIndex＝0 Else If List1．List1 ndex＜List1．ListCount－Then List1．ListIndex＝List1．ListIndex＋1 Else List1．ListIndex＝0 End If End If End Sub 步骤3：调试并运行程序，关闭程序后按题目要求存盘。 (2)【操作步骤】 步骤1：打开本题项目工程。 步骤2：打开代码编辑窗口，去掉程序中的注释符“’”，将问号改为正确的内容。 参考答案 Dim t As Integer Private Sub Command1_Click() t＝60 * Val(Text1．Text) Timer1．Enabled＝True End Sub Private Sub Timer1_Timer() Dim m，s As Integer If t＜＝0 Then Timer1．Enabled＝False MsgBox"时间到!" Else t＝t－1 m＝Int(t／60) s＝t Mod 60 Labe14．Caption＝"剩余" & m & "分"& s &"秒" End If End Sub 步骤3：调试并运行程序，关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/stUp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)