首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
标准模块和窗体模块的功能是计算和打印两个复数之和,在横线上填上适当内容。标准模块 Type comp re As Single im As Single End Type
标准模块和窗体模块的功能是计算和打印两个复数之和,在横线上填上适当内容。标准模块 Type comp re As Single im As Single End Type
admin
2009-02-13
60
问题
标准模块和窗体模块的功能是计算和打印两个复数之和,在横线上填上适当内容。标准模块
Type comp
re As Single
im As Single
End Type
Public c As comp
窗体模块
Private Sub Command1_Click( )
Dim a As comp,b As compA0re=InputBox(“输入a的实部”)A.im=InputBox(“输入a的虚部”)B.re=tnputBox(“输入b的实部”)B.im=lnputBox(“输入b的虚部”)
【 】
Print“c=”;C.re;“+”;c.im;"i"
End Sub
Private Sub s(【 】)
C.re=r1.re+rre
c.im=r1.im+rim
End Sub
选项
答案
Call s(a,b)或 s a,b , rl As comp,r2 As comp或ByRef rl As comp,ByRef r2 As comp或By Val Ascomp,ByVal r2 As comp
解析
根据题意,要计算两个复数之和。通过Type语句定义一个comp数据类型。 comp的两个元素re、im分别表示复数的实部与虚部。由于求两个复数之和要分别相加各自的实部和虚部,故在建立s过程时,根据已给等式,可以知道SUB过程需要两个参数,分别为r1、r2。由于只调用一次,故可以使用ByRef、ByVal两种方式传送数据。建立好Sub过程,在[6]处调用该过程,可以使用Call语句:Call s(a,b),也可直接调用:s a,b。
转载请注明原文地址:https://kaotiyun.com/show/E72p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列哪个命令是在当前主机的指定端口上启动远程对象注册服务程序?
下列哪个选项不是InputStream类中的方法?
在下列程序的划线处应填入的语句是 classPemon{ pnvateinta; } publicclassManextendsPerson{ publicintb; publicstaticvoidmain(St
下列哪个选项是short型数据的取值范围?
int型public成员变量MAX_LENGTH,该值保持为常数100,则定义这个变量的语句是
下面不属于软件工程3个要素的是
设x,y均为已定义的类名,下列声明对象x1的语句中正确的是()。
下列关系运算中,能使经运算后得到的新关系中属性个数多于原来关系中属性个数的是
下列Java常见事件类中哪个是鼠标事件类?()
在程序中,使用适当的布局管理器,在Frame框的North位置添加一句提示信息,在South位置添加一个单行文本框,在这个文本框中输入的内容将会显示在Center位置。运行结果如下图所示。注意:请勿修改main()主方法和其他已有语句内容,仅在横线
随机试题
《中华人民共和国宪法》(1982年)实施以来,先后五次以修正案的形式进行了修改。下列宪法条款与宪法修正案对应正确的是:
早期提示左心功能不全失代偿的体征是()。
某男性铅作业工人,除尿铅增高外,具有神经衰弱症状,口内有金属味.尿AIA升高,可诊断为
20×2年6月30日,远方公司有关账户期末余额及相关经济业务如下:“库存现金”账户借方余额2000元,“银行存款”账户借方余额350000元,“其他货币资金”账户借方余额500000元。远方公司20×2年6月30日资产负债表中“货币资金”项目“期末余额”栏
根据《银团贷款业务指引》的规定,()负责银团贷款市场秩序的自律工作,协调银团贷款与交易中发生的问题。
以下是针对《陶瓷艺术》一课拟定的三种不同的教学设计思路,请参照第一种思路的分析方法分别对第二种、第三种思路的优缺点进行简短分析。例子:第一种思路:具有“课堂化"特色的思路。在教室里进行欣赏、评述、交流、讨论。教师最好能准备有特色的陶瓷器皿和其他用品,既
有a、b、c三个数,已知a×b=24,a×c=36,b×c=54,求a+b+c=
C++中的模板包括()。
通常所说的"宏病毒"感染的文件类型是()。
JamesJoyce’sDublinersis
最新回复
(
0
)