首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序: Dim y As Integer Private Sub Command1_Click() Dim x As Integer x=2 Te
窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序: Dim y As Integer Private Sub Command1_Click() Dim x As Integer x=2 Te
admin
2012-03-22
61
问题
窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序: Dim y As Integer Private Sub Command1_Click() Dim x As Integer x=2 Text1.Text=p2(pl(x),y) Text2.Text=pl(x) End Sub Private Function pl(x As Integer)As Integer x=x+y:y=x+y pl=x+y End Function Private Function p2(x As Integer,y As Integer)As Integer p2=2*x+y End Function 当单击1次和单击2次命令按钮后,文本框Text1和Text2内的值分别是( )。
选项
A、2 4 2 4
B、2 4 4 8
C、10 10 58 58
D、4 4
答案
C
解析
转载请注明原文地址:https://www.kaotiyun.com/show/Y1hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
用于向数据库发送查询命令,建立下列哪个对象?
设x=1,y=2和z=3,则表达式y+=z((/++x的值是
在窗体上有若干控件,其中有一个名称为Text1的文本框。影响Text1的Tab顺序的属性是
在窗体上画一个名称为CommonDialog1的通用对话框,一个名称为Command1的命令按钮。然后编写如下事件过程:PrivateSubCommand1_Click()CommonDialogl.FileName=“”
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()a$=“VisualBasic”PrintString(3,a$)EndSub程序运行后,
设有以下循环结构Do循环体LoopWhile<条件>则以下叙述中错误的是_________。
往窗体Form1上添加一个列表框控件List1,并编写如下代码:PrivateSubForm_Load()Fori=0To6List1.AddItemiNextiEndSub为了在程序运
在E盘当前目录文件夹下建立一个名为“Student.txt’’的顺序文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。PrivateSubForm_Click( )【】
下列语句正确的是
随机试题
出版物的盘存方法有()。
下述哪项不符合扩张性心肌病光镜下的改变
下列关于我国选举制度的表述正确的是_________。
某工程按最早开始时间安排的横道图计划如图1中虚线所示,虚线上方数字为该工作每月的计划投资额(单位:万元)。该工程施工合同规定工程于1月1日开工,按季度综合调价系数调价。在实施过程中,各工作的实际工程量和持续时间均与计划相同。问题:列式计算第7个月
甲公司为增值税一般纳税人,适用的增值税税率为17%,2010年3月3日,向A公司销售商品1000件。每件商品标价60元,为了鼓励对方成批购入,甲公司同意给予A公司10%的商业折扣。已开出增值税专用发票,商品已发出,货款已存入银行。该批商品的单位成本为40元
一般来说,某种商品的市场规模越大,交易者资金规模越大,则该期货合约的交易单位应设计得越小。( )
2011年12月31日,甲公司购入一台设备并投入使用,其成本为25万元,预计使用年限5年,预计净残值1.2万元,采用双倍余额递减法计提折旧。假定不考虑其他因素,2012年度该设备应计提的折旧为()万元。
下列属于辅助生产费用分配方法的是()。
质量为m的钢球自高处落下,以速率v1碰地,竖直向上弹回,碰撞时间极短,离地的速率为v2。在碰撞过程中,地面对钢球的冲量方向和大小为()。
It’sperhapstheworld’smostfamousunderwaterattraction,immortalizedinfilmandinlegend:theTitanic.Butnowexpertssay
最新回复
(
0
)