Public Class Form153 Private Sub ChromeButton1_Click(sender As Object, e As EventArgs) Handles ChromeButton1.Click If FolderBrowserDialog1.ShowDialog = 1 Then End If End Sub Private Sub Form153_Load(sender As Object, e As EventArgs) Handles MyBase.Load End Sub End Class