❶ 求VB.NET獲取文件路徑的方法
Private Sub Browse_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Browse.Click
If (OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK) Then
FileName = OpenFileDialog1.FileName
TextBox1.Text = FileName
End If
End Sub
用來openfiledialog控制項,在你要選擇文件自的botton的click事件下面下選擇文件的代碼,把文件的路徑顯示到textbox1.text裡面
❷ VB.net窗體設計中,如何讀取.txt文件中的數據
1、新建一個標準的VB EXE工程,只有一個Form,Form上有兩個按鈕:Command1和Command2。
2、雙擊Command1添加如下代碼
Private Sub Command1_Click()
Dim strFile As String
Dim intFile As Integer
Dim strData As String
strFile = "c:\學生成績.txt"
intFile = FreeFile
Open strFile For Input As intFile
strData = StrConv(InputB(FileLen(strFile), intFile), vbUnicode)
Debug.Print strData
Close intFile
End Sub
3、按F8開始單步調試代碼,點擊Command1,進入單步調試功能,
4、多次按下F8或直接按下F5運行完成,就完成了讀取文本文件內容並輸出到立即窗口。
❸ vb.net中,如何點擊按鈕調出選擇文件窗口選中圖片並在picturebox中顯示出來
button , OpenFileDialog , PictureBox , textbox 控制項,我把圖片顯示在 picturebox 中,而路
徑存放在 textbox 中,不知道這樣行不行。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim filename As String
OpenFileDialog1.Filter = "jpg files (*.jpg)|*.jpg"
OpenFileDialog1.FilterIndex = 1
If OpenFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
filename = OpenFileDialog1.FileName
Else
End
End If
If Not (PictureBox1.Image Is Nothing) Then
PictureBox1.Image.Dispose()
PictureBox1.Image = Nothing
End If
'PictureBox1.Image = System.Drawing.Image.FromFile(filename)
去掉注釋後就顯示圖片
TextBox1.Text = filename
End Sub
picturebox中只記錄文件存放的路徑,我找了一個 ImageLocation 函數
PictureBox1.ImageLocation = filename 不過還是會顯示圖片