VB 应用咨询

[旮旯风行]

Dim sum as integer
Text11.Text = Left(Hex(sum), 2)
输出Text11显示的值为0
Text11.Text=Left(Hex(65535), 2)
输出Text11显示的值为FF
print Left(Hex(sum), 2) 输出真确

[脆皮大雪糕]

从标题、内容、代码里看不出你想问什么。我们只能靠意念和未来科技感应你的大脑。 看你的标签，猜测是left函数报有什么东西没引用把 看一下工程-引用，是不是有一行或者几行被勾上的是乱码？ 你的代码应该是拷贝过来的，原来的工程引用了一个外部控件或者COM组件，这个COM组件在你的机器上没有或者没有注册。 当有引用的东西没找到的时候，VB6经常会找 left和mid函数报错

[X-i-n]

Dim sum as integer

因为你没赋值，所以 sum为0 => hex(sum)="0" => Left(Hex(sum), 2)="0"

print  Left(Hex(sum), 2)  输出真确

按你的描述来看，你可能得到了一个其它结果，应该在print之前sum被你赋过值。 学会提问题，或者端正提问题的态度，能得到更及时准确的答案

[xdz_myfunction]

赵4老师曰：

[zdingyun]

Dim sum as integer
Text11.Text = Left(Hex(sum), 2)
sum变量初始值为0
所以
debug.Print Left(Hex(sum), 2)
0

[舉杯邀明月]

难道上面的哪一句有“不正确”的吗！