我的函数怎么不起作用?

来源:百度知道 编辑:UC知道 时间:2024/05/25 13:31:24
我的函数怎么不起作用。这个程序的作用是,在文本框1中输入a就在文本框中显示11,在文本框1中输入b就在文本框中显示25,在文本框1中输入c就在文本框中显示03.

private sub command1_click
dim zifu as string
zifu=text1.text
zifu=daihao(zifu)
text2.text=zifu
end sub

function daihao(word as string) as string
select case word
case "a"
word="11"
case "b"
word="25"
case "c"
word="03"
end select
end function
但是运行后文本框2显示空白

在函数的最后加一句
daihao=word
----------------
function daihao(word as string) as string
select case word
case "a"
word="11"
case "b"
word="25"
case "c"
word="03"
end select
daihao=word '加这句
end function

function daihao(word as string) as string
这里尾巴有需要家2as string?
改成function daihao(word)

话说..你这么弄,word真的返回给daihao了么?