首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮,并编写如下程序: Private Sub Command1_Click() Dim a As Integer Static b As Integer a = 20 b = 5 Call s
在窗体上画一个名称为Command1的命令按钮,并编写如下程序: Private Sub Command1_Click() Dim a As Integer Static b As Integer a = 20 b = 5 Call s
admin
2020-06-30
79
问题
在窗体上画一个名称为Command1的命令按钮,并编写如下程序:
Private Sub Command1_Click()
Dim a As Integer
Static b As Integer
a = 20
b = 5
Call sub1(a, b)
Print a; b
End Sub
Private Sub sub1(ByRef x1 As Integer, y1 As Integer)
x1 = x1 + 3
y1 = x1 + y1
End Sub
程序运行后,单击命令按钮,在窗体上显示的内容是
选项
A、23 23
B、23 28
C、20 5
D、20 25
答案
B
解析
用Call语句调用Sub过程,如果形参前面有关键字ByRef,则该参数按地址传送,本题中形参x1前有关键字ByRef,调用时以地址方式传递实参,调用sub过程,x1=x1+3=23,改变了实参a的值,a为23。如果形参前面没有关键字ByRef或ByVal,系统默认为按地址传递参数。调用sub过程中,x1=x1+3=23;y1=23+5=28。形参y1值的变化改变了实参b的值,故b=28。本题正确答案为选项B。
转载请注明原文地址:https://www.kaotiyun.com/show/2BHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生的文件夹下有一个工程文件vbsj5.vbp,相应的窗体文件为vbsj5.frm。在窗体上有两个命令按钮,其名称分别为cmdWrite和cmdRead,标题分别为“写通信录”和“读通信录”,如图1-251所示。其中“写通信录”命令按钮事件过程用来建立一
(1)在考生目录下有一个工程文件vbsj3.vbp,窗体文件中已给出所有控件和部分程序,如图1-249所示。要求:①利用属性窗口设置适当的属性,使txtInput、txtResult中数据右对齐;②请编写适当的程序完成以下功能:在txtInp
在窗体上建立三个菜单(名称分别为Read、Calc和Save,标题分别为“读入数据”、“计算并输出”和“存盘”),然后画一个文本框(名称为Text1,MultiLine属性设置为True,ScrollBars属性设置为2)(如图1-257所示)。程序运行
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm。窗体上三个命令按钮的名称分别是Command1、Command2和Command3,标题分别是“显示”、“统计”和“保存”。运行程序时,单击“显示”按钮,从文件in5.txt中
窗体上有一个名称为Cbl的组合框,程序运行后,为了输出选中的列表项,应使用的语句是()。
以下说法中正确的是
为了清除列表框中指定的项目,应使用的方法是()。
在面向对象方法中,不属于“对象”基本特点的是
在面向对象的程序设计中,可被对象识别的动作称为
在面向对象的程序设计中,可被对象识别的动作称为
随机试题
按原始凭证填制手续的不同分类,限额领料单属于()
SomepeoplewhouseawebbrowserjustenterakeywordwheretheURLisnormallyen-treed.Sometimesthisleadstogoodresults.
公孙加内关治疗胃心胸疾病中脘、建里、脾俞、脊中治疗胃脘痛
对有营业收入的非经营性项目进行财务分析时,应以营业收入抵补下列支出;①生产经营耗费②偿还借款利息③缴纳流转税④计提折旧和偿还借款本金
证券监管部门主要从()几个方面建立诚信问责制度。
在单个客户授信限额管理中,商业银行对客户进行信用评级后,首要工作是确定客户的()。
目前我国金融业发展的状况是()。
物流系统中存在的制约关系有()。
一种学习中学习的一般原理、方法、策略和态度等迁移到另一中学习中去是()。
以下程序的输出结果是【】。#defineMAX(x,y)(x)>(y)?(x):(y)main(){inta=5,b=2,c=3,d=3,t;t=MAX(a+b,e+d)*10;
最新回复
(
0
)