首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是: Public x As Integer Private y As Integer 窗体文件的程序代码是: Dim a As Integer Private Sub Form_Load()
工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是: Public x As Integer Private y As Integer 窗体文件的程序代码是: Dim a As Integer Private Sub Form_Load()
admin
2020-02-27
86
问题
工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是:
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 Command1_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/ljTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Command1的命令按钮,编写如下事件过程:PrivateSubCommand1_Click()i=0DoWhliei<6Forj=1Toin=n+1Nexti=i+1LoopPrintnEndSub
考生文件夹下有一个工程文件sjt5.vbp。运行程序后,从文件中读出数据,将其放入一个5×5的二维数组a中。请编写程序,找出数组a中每行的最大值及该值在行中的次序(列下标),并将所找到的结果分别保存到一维数组b、c中(a中第一行的最大值保存在b(1)中,最
(1)在考生文件夹下有一个工程文件sjl3.vbp。其窗体文件上有一个标题为“得分”的框架,在框架中有一个名称为Text1的文本框数组,含6个文本框控件;文本框Text2用来输入难度系数。程序运行时,在左边的6个文本框中输入6个得分,输入难度系数后,单击“
(1)在学生文件夹下有一个工程文件sjl3.vbp(相应的窗体文件名为sjt3.frm),在窗体上添加一个名称为List1的列表框和一个名称为Text1的文本框,如图1所示。编写窗体的MouseDown事件过程。程序运行后,如果用鼠标单击窗体,则从键盘上输
下列打开“代码窗口”的操作中错误的是()。
设有下面的程序段:x=InputBox("请输入一个整数")ReDima(x)Fork=xTo0Step-1a(k)=kNextk一般,在这段程序之前应先进行数组a的定义
线性表常采用的两种存储结构是()。
一棵二叉树中共有80个叶子结点与70个度为1的结点,则该二叉树中的总结点数为
在E—R图中,用来表示实体联系的图形是()。
8.6787E+8写成普通的十进制数是()。
随机试题
人事部小江需要为本次入职新员工制作一份入职培训的演示文稿,后期需要进行美化处理。请根据提供的“入职培训.pptx”文件,对制作好的文稿进行美化,具体要求如下所示:通过幻灯片母版为每张幻灯片增加利用艺术字制作的水印效果,水印文字中应包含“员工守则”字样,
A.FOSB.PDGFC.CDK4D.ERBB1E.ROS属于生长因子类的癌基因是
多寐的病位在
A.静滴B.静注C.肌内注射D.皮下注射E.一半ss是
在绩效辅导过程中,帮助员工克服障碍、提高绩效的人通常是()。
组织对监视、测量、分析和改进过程进行策划,是为了满足()。
下列歌剧中,被称为“中国歌剧探索里程碑”的是()。
汉语名量词分_______名量词和_______名量词。(上海外国语大学)
2
有以下程序:#include<iostream>usingnamespacestd;classMyClass{public:MyClass();~MyClass();staticints;
最新回复
(
0
)