谁能把JAVA代码转换一下VB代码

图片说明

            请大佬帮忙

这个代码就是读取文本文件并且显示

 dim s as string
Open "d:\debug\aa\111.txt" For input As #1
s = Input(LOF(1), 1)
close #1
MsgBox s