vb 函数

private sub form_click

a=text1.text

b=text2.text

c=IIf(a>b,a,b)

masgbox c

end sub

问题：

添加以下格式正确与否？

a=val(text1.text)

str（c）

a=text1.text    a获取的是text1.text的字符串的值

b=text2.text    b获取的是text2.text的字符串的值

c=IIf(a>b,a,b)    对字符串a和b进行比较，这较大者赋值给c，c为字符串

如果改为：

a=val(text1.text)    a获取的是转化为数值后的字符串的值

b=val(text2.text)    b获取的是转化为数字后的字符串的值

c=IIf(a>b,a,b)    对a和b两个数值进行比较，较大者赋值给c，c为数值

所以说你所添加的格式是正确的，但在你添加的格式中少了一句：b=val(text2.text)

所以会出现类型不匹配的错误，因为字符串型的数据与数值型的数据是没办法直接比较的

另外输出信息是msgbox，而不是masgbox

正确。val转数字。

不知道你那个 llf 函数是干嘛的

放那2句代码没问题  还要加个  b=val(text2.text)