请问计算机代码大神 Private Sub Form_Click()？

Question

2．Private Sub Form_Click()
Dim a As Integer
Dim b As Integer
Dim n As Integer
Forn=10 T0 99
a=n\10
b=n Mod 10
If b*b + a =n Then
Print n
End If
Next
End Sub
此程序代码运行后的输出是        。

3．Function mn(m As Integer,n As Integer) As Integer
If m Mod n=0 Then
mn=n
Else
mn=mn(n,m Mod n)
End If
End Function
Print mn(27,18)
此程序代码运行后的输出是        。

Answer 1

请问计算机代码大神 Private Sub Form_Click()？
2．PrivateSubForm_Click()DimaAsIntegerDimbAsIntegerDimnAsIntegerForn=10T099a=n\10b=nMod10Ifb*b+a=nThenPrintnEndIfNextEndSub此程序代码运行后的输出是。3．Functionmn(mAsInteger,nAsInteger)AsIntegerIfmModn=0Thenmn=nElsemn=mn(n,mModn)EndIfEndFunctionPrintmn(27,18)此程序代码运行后的输出是。

Answer 2

这个问题还确实是比较专业性的，只有计算机代码大神才能够帮你回答，像我们这一般普通老百姓还真是只能看看热闹

Answer 3

这个我朋友是做这个计算机代码的，我问一下他帮你发到你电子邮箱里。

Answer 4

晚来天欲雪，能饮一杯无

Answer 5

分辨率是图像单位英寸中包含的像素数