(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。在窗体上有一个命令按钮,其名称为Command1,标题为“添加”;有一个文本框,名称为Text1,初始内容为空白;有一个列表框,名称为List1。程序运行后,在文本框中输

admin2018-10-29  39

问题 (1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。在窗体上有一个命令按钮,其名称为Command1,标题为“添加”;有一个文本框,名称为Text1,初始内容为空白;有一个列表框,名称为List1。程序运行后,在文本框中输入一个英文句子(由多个单词组成,各单词之间用一个空格分开),然后单击“添加”按钮,程序将把该英文句子分解为单词,并把每个单词作为一个项目添加到列表框中,如图 1-3所示。该程序不完整,请补充完整。

    要求:去掉程序中的注释符,把程序中的?改为正确的内容,使其能正确运行,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
    (2)在考生文件夹下有一个工程文件 sjt4.vbp,其中的窗体中有一个组合框和一个命令按钮(如图1-4所示)。程序的功能是在运行时,如果在组合框中输入一个项目并单击“添加”按钮,则搜索组合框中的项目,如果没有此项,则把此项添加到列表中;如果有此项,则弹出提示“已有此项”,然后清除输入的内容。

    要求:去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分,也不能修改控件的属性。最后把修改后的文件以原来的文件名存盘。

选项

答案第1小题 【操作步骤】 步骤1:打开考生文件夹下的工程文件sjt3.vbp。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: S1 = Text1.Text Do While Mid(S1, I1, 1) <> " " And I1 _ <= Len(S1) List1.AddItem S2 S2 = "" 步骤 3:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件下的本题工程文件sjt4.vbp。 步骤2:打开代码编辑窗口,去掉程序中的注释符 “’”,将问号“?”改为正确的内容。 参考代码: For i = 0 To Cb1.ListCount - 1 If Cb1.List(i) = Cb1.Text Then Cb1.AddItem Cb1.Text

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

最新回复(0)