vb 2008 抽奖程序 word文档

自己编的一个小程序~~部分代码如下: '若用户选择读取文件,则从我的电脑中打开一个文本文档 Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click ' Displays an OpenFileDialog so the user can select a word. Dim openFileDialog1 As New OpenFileDialog() openFileDialog1.Fi