首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
注意:下面出现的“考生文件夹”均为c:\wexam\25160001。 (1)在考生文件夹下有工程文件sjt3.vbp及窗体文件sjt3.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即’号),但不能修改其他其他部分
注意:下面出现的“考生文件夹”均为c:\wexam\25160001。 (1)在考生文件夹下有工程文件sjt3.vbp及窗体文件sjt3.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即’号),但不能修改其他其他部分
admin
2009-02-25
70
问题
注意:下面出现的“考生文件夹”均为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语言中,将后缀名为_________的源代码文件编译后形成后缀名为.class的字节码文件。
对于下面语句的说法,不正确的是ThreadthrObj=newThread();
下面语句会产生编译错误的是
下面属于面向对象语言的是
有下面的Applet程序段:import,java.awt.*;import.java.applet.*;publicclassHelloextendsApplet{publicvoidpanin(Grap
下面的表达式中正确的是()
在数据库逻辑结构的设计中,将E-R模型转换为关系模型应遵循相关原则。对于3个不同实体集和它们之间的多对多联系m:n:p,最少可转换为【】个关系模式。
随机试题
既能补脾义能涩精的约物是()(1999年第14题)
当公务员不能或不依法履行其法定义务时,必须承担一定的法律后果即法律责任,但一般不包括()
A.癌前病变B.早期胃癌C.良性肿瘤D.恶性肿瘤E.肉瘤仅浸润黏膜层及黏膜下层的胃肠道癌称为
下列有关悬臂浇筑施工的表述中,正确的是()。
构成计算机系统的各种物理设备称为()。
“备案号”栏:()。“运费”栏:()。
下列关于商业银行向外报送的会计报表说法正确的有()。
在一次流感大流行中,研究人员到农场去探视,发现很多农民感染了流感。但有一家每个人都很健康,这家的女主人说在家里的每个房间放了一颗没有剥皮的洋葱。研究人员观察后在洋葱上发现了流感病毒,因此得出结论,洋葱吸收了病菌,使这家人保持了健康。但也有专家认为,虽然洋葱
某多道程序设计系统配有一台处理器和两台外设101、102,现有3个优先级由高到低的J1、J2、J3都已装入了主存,它们使用资源的先后顺序和占用时间分别是:j1:IO2(30ms),CPU(10ms);IO1(30ms),CPU(10ms);
在计算机网络中,当信息从信源向信宿流动时,可能会遇到安全攻击,在下列选,项中,属于信息可能受到安全攻击的是(36)。Ⅰ.中断 Ⅱ.修改 Ⅲ.截取 Ⅳ.捏造 Ⅴ.陷门
最新回复
(
0
)