[填空题] 标准模块和窗体模块的功能是计算和打印两个复数之和，在横线上填上适当内容。标准模块 Type comp re As Single im As Single End Type Public c As comp 窗体模块 Private Sub Command1_Click( ) Dim a As comp，b As comp a．re=InputBox(“输入a的实部”) a．im=InputBox(“输入a的虚部”) b．re=tnputBox(“输入b的实部”

参考答案：

[6]Calls(a，b)或sa，b

● 参考解析

[7]rlAscomp，r2Ascomp或ByRefrlAscomp，ByRefr2Ascomp或ByValAscomp，ByValr2Ascomp根据题意，要计算两个复数之和。通过Type语句定义一个comp数据类型。comp的两个元素re、im分别表示复数的实部与虚部。由于求两个复数之和要分别相加各自的实部和虚部，故在建立s过程时，根据已给等式，可以知道SUB过程需要两个参数，分别为r1、r2。由于只调用一次，故可以使用ByRef、ByVal两种方式传送数据。建立好Sub过程，在[6]处调用该过程，可以使用Call语句：Calls(a，b)，也可直接调用：sa，b。

当前位置：IT认证＞BASIC题库

相关题目: