[填空題] 標(biāo)準(zhǔn)模塊和窗體模塊的功能是計算和打印兩個復(fù)數(shù)之和，在橫線上填上適當(dāng)內(nèi)容。標(biāo)準(zhǔn)模塊

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的實部”)b．im=lnputBox(“輸入b的虛部”)

  【6】

  Print“c=”；

• c．re；“+”；c.im；"i"

  End Sub

  Private Sub s( 【7】 )

  C.re=r1.re+r2.re

  c.im=r1.im+r2.im

  End Sub

[6]Call s(a，b)或 s a，b [7] rl As comp，r2 As comp或ByRef rl As comp，ByRef r2 As comp或By Val Ascomp，ByVal r2 As comp

根據(jù)題意，要計算兩個復(fù)數(shù)之和。通過Type語句定義一個comp數(shù)據(jù)類型。 comp的兩個元素re、im分別表示復(fù)數(shù)的實部與虛部。由于求兩個復(fù)數(shù)之和要分別相加各自的實部和虛部，故在建立s過程時，根據(jù)已給等式，可以知道SUB過程需要兩個參數(shù)，分別為r1、r2。由于只調(diào)用一次，故可以使用ByRef、ByVal兩種方式傳送數(shù)據(jù)。建立好Sub 過程，在[6]處調(diào)用該過程，可以使用Call語句：Call s(a，b)，也可直接調(diào)用：s a，b。