Gracias, pero podrías indicarme (para buscar info) con que API y que función _katze_?

No tiene ningún misterio,

MySettings.Save()

Fín.

-.-

* Y así guardas todos los cambios de los valores de todas tus settings.

* Y puedes activar la opción de salvar automáticamente las settings al cerrar la APP.

    Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
        MsgBox("Test:" & My.Settings.Folder)
    End Sub

Pues te aseguro que tál y como lo tienes funciona, no he tocaod nada, y muestra el valor "Aquí debería salir el Folder".

Prueba a limpiar el proyecto y vuelve a recounstruirlo.  (Clean, rebuild solution)

Una pregunta... tú estás usando settings para recordar la última ruta, cuando cierras y vuelves a abrir la aplicación? o lo estás usando como alternativa a usar variabls?

Porque en segundo caso, deberías intentarlo con variables como dice $Edu$, es que si no puedes con una maldita variable... no vas a poder hacer por tí mismo xD.

Saludos!

Pienso lo mismo, unos comentarios atrás en este post puedes ver como le modifiqué el form con los cambios que le has comentado tú $Edu$, pero ni así...
si sé le da mal las variables creo que mejor con settings xD...


A mi me funciona bien, me sale un msgbox con el valor de la setting: "Aquí debería salir el Folder"

reinicia el VS a ver a veces hace cosas raras xD

Si la propiedad tiene un valor de tipo string, entonces ese msgbox debería funcionar,
a menos que hayas eliminado el valor de la propiedad en alguna parte dle código . . . y si no muestra nada, entonces es que la propiedad no tiene ningún valor, está vacía.

Sincéramente no se te puede ayudar si no aportas datos, ¿como esperas que te digamos cual es el problema en esa línea de código si no muestras más información?

1. la excepción que te marca la IDE, eso haznos el favor a todos de ponerlo siempre cuando postees un problema, xq yo por ejemplo me canso de postear para pedirte más información siempre...
2. Una imagen de tus "settings"
3. el código del sub donde intentas usar la variable

eso estaría bien...

Saludos

Como se podría optimizar el código para crear una función de esto?

Por ejemplo:

    Private Sub Form1_Load()
        Dim File_Extensions() As String = {"*.txt", "*.ini", "*.exe", "*.pdf"}
        Dim Files() = Get_Files_By_FileExtensions("C:\", File_Extensions)
    End Sub

Y entonces aquí se debería agregar automáticamente un "orelse s.EndsWith(siguiente extensión)" por cada extensión de la colección:

    Public Function Get_Files_By_FileExtensions(ByVal Directory As String, ByVal Extensions() As String) As System.IO.FileInfo()
        Return IO.Directory.GetFiles(Directory, "*").Where(Function(s) s.EndsWith(Extensions(0)) _
        OrElse s.EndsWith(Extensions(1)) _
        OrElse s.EndsWith(Extensions(2)) _
        OrElse s.EndsWith(Extensions(3)))
    End Function

¿Es posible hacerlo?


EDITO: Yo ya tengo funciones para listar archivos, pero preciso hacerlo con ese código que menciono (me resulta más limpio porque sólo hace una búsqueda)

No todo es necesario codearlo, dispones de un menú en la IDE para crear las APP/USER settings:

Project > windowsapplication properties > settings

o dale doble click en "my project" en el "solution explorer"

Y listo, ya habrás creado tu setting/propiedad

saludos

En serio, no sé como se te puede dar tán dificil una variable.

Te vuelvo a repetir lo de antes:

1. Estás declarando la variable en el form, fuera de los subs.
2. No le das ningun valor a la variable.
3. En el form load intentas usar la variable, que no contiene ningún valor, y eso son dos errores, porque no sé que pinta ahí lo que haces en el form load, cuando debería estar todo en el sub del botón.

Repito las cosas y no haces caso.

Public Class Form2
 
    Dim Listita As New ListBox
 
    Private Sub Form2_Load(ByVal sender As Object, ByVal e As EventArgs) Handles MyBase.Load
        Listita.BackColor = Color.White
        Listita.ForeColor = Color.Black
        Listita.Size = New Point(340, 251)
        Listita.Location = New Point(12, 25)
        AddHandler Listita.SelectedIndexChanged, AddressOf Listita_SelectedIndexChanged
        Me.Controls.Add(Listita)
    End Sub
 
    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Me.Close()
    End Sub
 
    Private Sub Listita_SelectedIndexChanged(ByVal sender As Object, ByVal e As EventArgs)
        Dim Item As String = Listita.SelectedItem
    End Sub
 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim FBD As New FolderBrowserDialog
        FBD.Description = " Seleccionar una carpeta "
        FBD.SelectedPath = Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments)
        FBD.ShowNewFolderButton = True
        Dim Resultado As DialogResult = FBD.ShowDialog
        If Resultado = Windows.Forms.DialogResult.OK Then
        Try
                Dim Folder As String = FBD.SelectedPath
                Dim Files As Array = IO.Directory.GetFiles(Folder, "*", IO.SearchOption.TopDirectoryOnly)
                Dim TotalRoms As Int32 = Files.Length
                Listita.Items.Clear()
                For Each File In Files
                    Dim File_Info As New IO.FileInfo(File)
                    Listita.Items.Add(File_Info.Name)
                Next
                Label1.Text = "Roms encontrados (" & TotalRoms & ")"
            Catch ex As Exception
                MsgBox(ex.Message)
            End Try
        End If
        FBD.Dispose()
    End Sub
 
End Class

Saludos

Es que no has creado ninguna setting.

Google + vbnet how create my.settings

saludos.