UC知道有关VB的程序题
来源：百度知道 编辑：UC知道 时间：2024/09/23 20:33:58
从键盘输入一个数为：234，请写出运行结果
Private Sub Command4_Click()
Dim N As Integer
N = InputBox("输入一个三位数：")
Print N \ 100 + N Mod 10
End Sub
1下面程序执行的结果是
Private Sub Form_Click()
A = "123": B = "456"
C = Val(A) + Val(B)
Print C \ 100
End Sub
2下面程序执行的结果是
Private Sub Form_Click()
A = "123": B = "456"
C = Val(A+B) PS：这步什么意思 ？？
Print C \ 100
End Sub
最后答案是5 ，不明白。
3从键盘输入两个数为：7和9，请写出运行结果
A = InputBox
B = InputBox
If A<B Then
M = A MOD B Else
M = B MOD A
End if
Print M
要写出为什么 ,答案我是有的。可是就不明白为什么是这个答案
Private Sub Command4_Click()
Dim N As Integer
N = InputBox("输入一个三位数：")
Print N \ 100 + N Mod 10
End Sub
1下面程序执行的结果是
Private Sub Form_Click()
A = "123": B = "456"
C = Val(A) + Val(B)
Print C \ 100
End Sub
2下面程序执行的结果是
Private Sub Form_Click()
A = "123": B = "456"
C = Val(A+B) PS：这步什么意思 ？？
Print C \ 100
End Sub
最后答案是5 ，不明白。
3从键盘输入两个数为：7和9，请写出运行结果
A = InputBox
B = InputBox
If A<B Then
M = A MOD B Else
M = B MOD A
End if
Print M
要写出为什么 ,答案我是有的。可是就不明白为什么是这个答案
Private Sub Form_Click()
A = "123"
B = "456"
C = Val(A + B)
Print C \ 100
End Sub
这题答案是1234 不是5 因为 A,B变量均为字符型 val(a+b)中的加号是字符连接符不是运算符~就变成val(123456) val是返回包含于字符串内的数字
A = InputBox
B = InputBox
If A<B Then
M = A MOD B Else
M = B MOD A
End if
Print M
mod 是求余函数 这个题很明显了。~
Private Sub Command4_Click()
Dim N As Integer
N = InputBox("输入一个三位数：")
Print N \ 100 + N Mod 10
End Sub
运行结果:6
Private Sub Form_Click()
A = "123": B = "456"
C = Val(A) + Val(B)
Print C \ 100
End Sub
运行结果:5
N \ 100 是N整除100，235整除100结果是2.N mod 10是N初以 10的余数，结果是4，所以Print N \ 100 + N Mod 10 结果是6.
补充问题2：A和B都是字符串类型的变量，字符串之间用"+"是连接两个字符串所以A+B="123456",val()是一个将字符串类型的变量转化为数字类型的函数。所以C=1234656,结果就出来了。补充问题1也一样。补充问题3的目的是求两个数中较小的数除以较大的数的余数。
Private Sub Com