vb中可以使用dim语句来修饰一个函数的返回值类型么？

vb中可以使用dim语句来修饰一个函数的返回值类型么？怎么让mid函数返回一个integer类型或者single类型呢？

dim returnval as 类型 = ...

return returnval

首先function 函数名() as 类型

函数名=返回值
function a() as integer
a = 1
end function
这个就是个例子
这个函数a的返回值是1