VB小程序实例

jiejie33 · 发表于 2013-1-28 13:12:36

下面的代码是做一个两位数的换位的.
比较简单.适合高中生.

Private Sub Command1_Click()
  x = Val(Text1)
  X1 = x Mod 10
  X2 = (x Mod 100) \ 10
Label1 = X1 * 10 + X2

End Sub

creater · 发表于 2013-2-2 22:16:21

虽然对VB不是很懂但是很愿意在未来学习一下

春风风风 · 发表于 2013-2-3 10:31:17

丽科吉，真是国药准字号吗？www.hnlikeji.com/ 丽科吉hnlikeji.com.jpg

账号		自动登录	找回密码
密码			开放注册