首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是: Public X As Integer Private Y As Integer 窗体文件的程序代码是: Dim a As Integer Priva
工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是: Public X As Integer Private Y As Integer 窗体文件的程序代码是: Dim a As Integer Priva
admin
2018-05-08
52
问题
工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是:
Public X As Integer
Private Y As Integer
窗体文件的程序代码是:
Dim a As Integer
Private Sub Form_Load()
Dim b As Integer
a=2:b=3:X=10:Y=20
End Sub
Private Sub Commandl_Click()
a=a+5:b=b+5:x=X+5:y=Y+5
Print a;b;X;Y
End Sub
运行程序,单击窗体上的命令按钮,则在窗体上显示的是( )。
选项
A、5 5 15 5
B、7 5 15 25
C、7 8 15 5
D、7 5 15 5
答案
D
解析
程序在模块文件中定义x为整型全局变量,在整个工程中都起作用,而y定义为整型私有变量,只能在本模块文件中起作用。在窗体文件中变量a在本窗体文本中起作用,窗体加载事件中定义的变量b和没有声明的变量y,只在本事件过程起作用。程序窗体加载时,对后边有影响的变量值为a为2,x为10,没有指定初值的变量值默认为0,因此单击命令按钮后,a=a+5=7,b=b+5=5,x=x+5=15。y=y+5=5,结果输出7 5 15 5。
转载请注明原文地址:https://kaotiyun.com/show/IcGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序段的执行结果为______。Forx=5To1Step-1ForY=1To6-xPrintTab(Y+5);"*";NextYPrintNextx
有如下程序:OptionBase1PrivateSubForm_Click()Dimarr,SumSum=0arr=Array(1,3,5,7,9,11,13,15,
语句PopupMenuPMENU,4Or2,,,PMENU3K中:其中PMeNU表示【】
下面不属于软件工程过程的4种基本活动
对长度为n的线性表作快速排序,在最坏情况下,比较次数为
数据库设计的根本目标是要解决
(1)请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Forml的窗体上画一个名称为Picturel的图片框(PictureBox),高、宽均为1000。在图片框内再画一个有边框的名称为Imagel的图像框(Imag
设a=5,b=6,c=7,d=8,执行下列语句后,x的值为()。x=IIf((a>b)And(c>d),10,20)
下列关于控件数组的叙述中,正确的是
以下不可以作为“容器”的控件是
随机试题
以农业产业为主导,工业基础薄弱的城镇化被称为()
A.心内膜纤维化B.心室内附壁血栓C.两者均有D.两者均无心肌梗死
对精母细胞性精原细胞瘤的描述错误的是
A.二度Ⅰ型房室传导阻滞B.二度Ⅱ型房室传导阻滞C.三度房室传导阻滞D.二度Ⅰ型窦房阻滞E.二度Ⅱ型窦房阻滞P波及QRS波均规则出现,但P波与QRS波之间无关,P波频率大于QRS波的频率
患者女,44岁。患心肌梗死住院治疗。首次静脉泵入硝酸甘油时,在30分钟内应特别注意的是()
骗取贷款、票据承兑、金融票证罪属于《刑法修正案(六)》新增加的罪名。()
下列消费品,属于消费税“小汽车”税目征税范围的是()。
TodayTVaudiencesallovertheworldareaccustomedtothesightofAmericanastronautsintip-topcondition,withfairhair,c
TheStemereschWaterTreatmentPlantItisthegoaloftheStemereschWaterTreatmentPlanttokeeptheStemereschRiver,thest
某投资者在5月份以30元/吨权利金卖出一张9月到期、执行价格为1200元/吨的小麦看涨期权,同时又以10元/吨权利金卖出一张9月到期执行价格为1000元/吨的小麦看跌期权。当相应的小麦期货合约价格为1120元/吨时,该投资者收益为()元/吨
最新回复
(
0
)