[填空題] 標準模塊和窗體模塊的功能是計算和打印兩個復(fù)數(shù)之和，在橫線上填上適當內(nèi)容。標準模塊 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.imEnd 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。