帮忙看看这段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啊?

///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. 几个好习惯:变量名要有意义,变量类型避免用变体。