首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
注意:下面出现的“考生文件夹”均为c:\wexam\25160001。 (1)在考生文件夹下有工程文件sjt3.vbp及窗体文件sjt3.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即’号),但不能修改其他其他部分
注意:下面出现的“考生文件夹”均为c:\wexam\25160001。 (1)在考生文件夹下有工程文件sjt3.vbp及窗体文件sjt3.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即’号),但不能修改其他其他部分
admin
2009-02-25
103
问题
注意:下面出现的“考生文件夹”均为c:\wexam\25160001。
(1)在考生文件夹下有工程文件sjt3.vbp及窗体文件sjt3.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即’号),但不能修改其他其他部分。存盘时不得改变文件名和文件夹。
本题描述如下:
在窗口中有三个Labe1控件和两个名称分别为COMSTART和COMEXIT,标题分别为“开始”和“退出”的命令按钮。要求程序运行后,单击“开始”按钮后,能将下面给出的三角形写入考生文件夹下的 picture.dat文件中;执行完毕“开始”按钮,变成“完成”,且无效(变灰)。程序运行界面如图10-4所示。
A
AAA
AAAAA
AAAAAAA
BBBBBBB
BBBBB
BBB
B
(2)在考生文件夹下有工程文件sjt4.vbp及窗体文件sjt4.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即’号),但不能修改其他部分。存盘时不得改变文件名和文件夹。
本题描述如下:
在窗口中有一个名称为Command1,标题为“读取字型”的命令按钮,一个名称为Combol的下拉组合框和一个提示标签Label1。要求程序运行后,单击“读取字型”按钮读取系统的字型,在Combo1中显示。
如图10-5所示。
选项
答案
(1)在窗体上建立好控件后,先设置控件属性,再编写事件过程。 命令按钮的标题由其Caption属性设置,单击命令按钮触发其Click事件;标签的Caption属性用来显示其内容:程序用到String$函数。 String函数返回Variant(String),其中包含指定长度重复字符的字符串。 语法:String(number,character) String函数的语法有下面的命名参数: number必要参数;Long。返回的字符串长度。如果number包含Null,将返回Null。 character必要参数;Variant。为指定字符的字符码或字符串表达式,其第一个字符将用于建立返回的字符串;解题步骤: 第一步:建立界面并设置控件属性。程序用到的控件及其属性见表10-3。 [*] 第二步:编写程序代码。 程序提供的代码: Private Sub COMEXIT Click() End End Sub Private Sub COMSTART Click() Dim A(4) As String Dim B(4) As String Dim k As Integer, 1 As Integer myfilel =App. Path& "\" & "picture.dat" Open myfilel For Output As #1 For k = 1 To 4 ’A(?) = StringS(?) ’B(?) = StringS(?) Next k For k = 1 To 4 ’Print #1, ? Next k For k = 4 To 1 Step -1 ’ Print #1,? Next k Close 91 ’COMSTART.? = "完成" ’COMSTART.Enabled = ? End Sub 参考代码: Private Sub COMEXIT_Click() End End Sub Private Sub COMSTART_Click() Dim A(4) As String Dim B(4) As String Dim k As Integer, 1 As Integer myfilel =App.Path& "\" & "picture.dat" Open myfilel For Output As 91 For k = 1 To 4 A(k) = String$(k * 2 - 1, "A") B(k) = String$(k * 2 - 1, "B") Next k For k = 1 To 4 Print #1, A(k) Next k For k = 4 To 1 Step -1 Print #1, B(k) Next k Close #1 COMSTART.Caption = "完成" COMSTART.Enabled = False End Sub 第三步:调试并运行程序。 第四步:按题目要求存盘。 (2)在窗体上建立好控件后,先设置控件属性,再编写事件过程。 程序里用的Screen.Font是系统的字型(类似一个字型数组),Screen.FontCount是系统字型的个数,其下标从0开始的,所以最后一个下标是Screen.FontCount-1。解题步骤: 第一步:编写程序代码。 程序提供的代码: Private Sub Commandl Click() Dim I As Long ’ For I=0 To ? -1 ’ Comb01.Addltem? Next End Sub 参考代码: Private Sub Command1_Click() Dim I As Long For I=0 To Screen.FontCount -1 Combol.Addltem Screen.Fonts(I) Next End Sub 第二步:调试并运行程序。 第三步:按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/0h1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
Java程序中定义接口所使用的关键字是________。
Java程序中,用关键字________修饰的常量对象创建后,就不能修改了。
对于下面语句的说法,不正确的是ThreadthrObj=newThread();
执行下面程序后输出的正确结果是publicclassTest{publicstoicvoidmain(Stringargs[]){bytex=3,y=4;longr=80L;Sys
程序设计方法要求在程序设计过程中
下面说法不正确的是()
下面ChangeTitle()中对b1和b2按钮构造监听器,实现当单击b1按钮时标题变为students,当单击b2按钮时标题变为teachers。请将程序补充完整。publicChangeTitle(){super("Title
在数据库逻辑结构的设计中,将E-R模型转换为关系模型应遵循相关原则。对于3个不同实体集和它们之间的多对多联系m:n:p,最少可转换为【】个关系模式。
随机试题
Washingtonrealizedthathissoldiers,shiveringinrags.Neededbettertrainingifthereweretobeanyhopeofwinningagainst
法院对于诉讼中有关情况的处理,下列哪一做法是正确的?()
某水泵站电气安装工程平面图如图6.Ⅲ所示。问题计算分部分项工程量。依据《全国统一安装工程预算工程量计算规则》计算工程量,并将工程量及计算过程填入参考答案中表6.Ⅲ.1中未列出的分部分项工程项目的相应栏目中。(注:不考虑电缆敷设弛度、波形弯度
某工程施工过程中,因总承包单位未按照分包合同的约定支付安全文明施工措施费用,导致分包单位现场安全防护措施不完善发生安全事故,则应由()负主要责任。
请谈谈你学的专业对现在所从事的工作有什么帮助?
一、注意事项申论考试与传统的作文考试不同,是分析驾驭材料的能力与表达能力并重的考试。二、给定资料1.2009年7月22日,国务院常务会议讨论并原则通过了《文化产业振兴规划》,《规划》除指出了近两三年内中国文化产业发展的方向,还明确提出,要
试述第一次国共合作的经验教训。
Farmersdonotlikecrows(乌鸦)becausethesebirdseatnewly-plantedseeds(种子).Theyareafraidthattheywillnothaveanythin
OnFeb.2,2007,theUnitedNationsscientificpanelstudyingclimatechangedeclaredthattheevidenceofawanningtrendis
A、Heplanstogoabroad.B、Heplanstostarthisownbusiness.C、Heplanstoworkinanotherbank.D、HeplanstoventurewithDa
最新回复
(
0
)