OPenFileDialog使用 VB

OPenFileDialog使用

Private Sub Button1_Click(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles Button1.Click

Dim myStream As System.IO.Stream

openFileDialog1.InitialDirectory = "c:\"

openFileDialog1.Filter = "txt files (*.txt)|*.txt|All files (*.*)|*.*"

openFileDialog1.FilterIndex = 2

OpenFileDialog1.RestoreDirectory = True

If OpenFileDialog1.ShowDialog() = DialogResult.OK Then

MsgBox(OpenFileDialog1.FileName)

myStream = OpenFileDialog1.OpenFile()

If Not (myStream Is Nothing) Then

MessageBox.Show(myStream.Length.ToString)

myStream.Close()

End If

End If

End Sub

filename = OpenFileDialog1.FileName
PictureBox1.Image = System.Drawing.Image.FromFile(filename)

即时图片显示

有从服务器上直接把文件导出到本地路径,自然也可以从本地路径中直接读取文件。 好像只要取得远程的本地路径,然后用java类中读取文件的类读这个文件就行了。 FileInputStream ofi = new FileInputStream(文件路径+文件名); InputStreamReader in = new InputStreamReader(ofi,"GBK"); BufferedReader oBufReader = new BufferedReader(in); 然后用readLine()方法逐行读取了。 至于写入数据库,只要把读取的内容按你需要拆分开来,insert到数据库就行了。

相关文章

Format[$] ( expr [ , fmt ] ) format 返回变体型 format$ 强制返回为文本 --------------------------...
VB6或者ASP 格式化时间为 MM/dd/yyyy 格式,竟然没有好的办法, Format 或者FormatDateTime 竟然结果和...
在项目中添加如下代码:新建窗口来显示异常信息。 Namespace My ‘全局错误处理,新的解决方案直接...
转了这一篇文章,原来一直想用C#做k3的插件开发,vb没有C#用的爽呀,这篇文章写与2011年,看来我以前没...
Sub 分列() ‘以空格为分隔符,连续空格只算1个。对所选中的单元格进行处理 Dim m As Range, t...
  窗体代码 1 Private Sub Text1_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integ...