帮忙看看这段VB代码.
来源:百度知道 编辑:UC知道 时间:2024/05/17 23:42:08
Dim a, b, c, d, ab, cd, br, br2, Ms As Integer
cd = Right("您好吗?欢迎042", 3)
c = Left(cd, 2)
d = Right(cd, 1)
ab = Left("您好吗?欢迎042", c + d)
a = Left(ab, c)
b = Right(ab, d)
Ms = MsgBox(a, vbInformation + vbOKOnly, b)
我想让它提示“您好吗?”,标题是“欢迎”,
但是它的标题怎么总是42啊?
cd = Right("您好吗?欢迎042", 3)
c = Left(cd, 2)
d = Right(cd, 1)
ab = Left("您好吗?欢迎042", c + d)
a = Left(ab, c)
b = Right(ab, d)
Ms = MsgBox(a, vbInformation + vbOKOnly, b)
我想让它提示“您好吗?”,标题是“欢迎”,
但是它的标题怎么总是42啊?
///ab = Left("您好吗?欢迎042", c + d)
你没声明c和d是数字啊,虽然是变体,但因为它的数据是从字符串中截取的,所以它也就是string了
要么把c和d声明成数字,或者改写成这样
ab = Left("您好吗?欢迎042", val(c) + d)'用val变成数字再相加
VB没接触过,不过定义变量的时候Dim a, b, c, d, ab, cd, br, br2, Ms As Integer 是不是可以分2行写。
随便说说。
cd = Right("您好吗?欢迎042", 3) 改为
cd = msgbox('您好吗?',,"欢迎")
“怎么总是42啊?”?呵呵,当然是你让她写“42”的。
你的程序每一步简化了就是如下:
cd = "042"
c = "04"
d = "2"
ab = "?欢迎042"
a = "您好吗?"
b = "42"
Msgbox(a,,b)后当然标题是42。
很明显,如果希望标题是“您好吗?”的话应该把Msgbox第三参数从b改为a。
p.s. 几个好习惯:变量名要有意义,变量类型避免用变体。