Private Function ReadFile(ByRef a As String) As String
企业建站必须是能够以充分展现企业形象为主要目的，是企业文化与产品对外扩展宣传的重要窗口，一个合格的网站不仅仅能为公司带来巨大的互联网上的收集和信息发布平台，创新互联公司面向各种领域：成都木包装箱等成都网站设计、成都全网营销推广解决方案、网站设计等建站排名服务。
a = "bian"
End Function
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim a As String = "yuanlai"
ReadFile(a)
''想要的结果就是在这里使用a的值是"bian"
MsgBox(a)
End Sub
===================
以上就可以，不知道你“ByRef a As b”的b是什么东西
当然有啊，
引用类型的变量就是类的实例化对象
VB点虐 值类型包括14种基本数据类型(除String)、结构和枚举，其他都是引用类型
引用一个按钮对象
Dim a As Button = Button1 '假设窗体中有Button1这个按钮控件
引用一个自定义类的对象
Public Class Class1
End Class
Dim b As New Class1
上面的a和b都是引用型的变量。
字符串也是引用型的变量
它是基础数据类型中唯一的引用型数据类型。
Dim s As String = "字符串也是引用类型！"
满意请采纳，谢谢。
在form1中的变量要定义成公用变量，即Public strNum As String
在form2中引用form1的公用变量，例：str1 = form1.strNum即可。