2. 计算机
  3. 设窗体上有—个名称为Combo1的组合框，并有以下程序： Privale Sub Combol_ KeyPress(KeyAscii As Integer) If【 】 =13 Then 回车符的ASCII码是13 For k

设窗体上有—个名称为Combo1的组合框，并有以下程序： Privale Sub Combol_ KeyPress(KeyAscii As Integer) If【 】 =13 Then 回车符的ASCII码是13 For k

admin2009-09-28  27
问题 设窗体上有—个名称为Combo1的组合框，并有以下程序：
Privale Sub Combol_ KeyPress(KeyAscii As Integer)
   If【  】  =13 Then    回车符的ASCII码是13
       For k=0 To Combo1. ListCount-1
           If Combo1.Text=Combol. List(k)Then
               Combo1.Text=" "
               Exit For
           End If
       Next k
       If Combo1. Text＜＞" "Then
           Combo1. AddItem 【  】
       End If
    End If
End Sub
程序的功能是：在组合框的编辑区中输入文本后按回车键，则检查列表中有无与此文本相同的项目，若有，则把编辑区中的文本删除，否则把编辑区中文本添加到列表的尾部。请填空。
选项
答案KeyAscii、Combol.Text
解析 当按下键盘上的某个键时，将发生KeyPress事件。参数KeyAscii是一个预定义的变量，执行KeyPress事件过程时，KeyAscii是所按键的ASCII码。当按下回车符时，KeyAscii的值是13。本题中程序首先利用一个If语句判断所按下的是否为回车符，如果是，用一个For循环语句检查组合框列表中有无与组合框编辑区中文本相同的项目，如果有则把组合框编辑区中的文本删除。接着再用一个If语句判断组合框编辑区中的文本是否为空，如果不为空，将组合框编辑区中文本添加到组合框列表的尾部。第9个空用来判断所按下的键是否为回车符，即FIKeyAscii的值是否为13，因此第9个空中应填KeyAscii。第10个空用来将组合框编辑区中的文本添加到组合框列表的尾部，因此应填Combo1.Text。
转载请注明原文地址:https://kaotiyun.com/show/Oc1p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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