Question

vb这个绝对值和十位数怎么做呀

vb这个绝对值和十位数怎么做呀新手一脸懵逼怎么写呀

Answer 1

Private Sub Command1_Click()
  a = CInt(Text1)
  Text2 = Abs(a)
End Sub


Private Sub Command2_Click()
  a = CInt(Text1)
  Text2 = a \ 10 Mod 10
End Sub

Answer 2

。