Option Explicit Dim a As Integer Dim b As Integer Dim c As Integer Private Sub Form_Load() a = 6 b = 15 c = 23 End Sub Private Sub Command1_Click() Print Sgn(a + b Mod 6 - c \ a) & a + b '''注释'''' '第一步运算:Sgn(a + b Mod 6 - c \ a)=Sgn(6)=1,其中c\a为取整运算 '第二步运算:a + b=21 ‘由于a、b都是整形,所以此处的“+”为算术运算符 '第三步运算:1 & 21 = 121 '&为字符串运算符,由于字符串优先级小于算术运算符,所以最后进行此运算 '结果为121 End Sub '解释的应该比较清晰了,如果还有疑问,