» »

[Visual basic] Open file dialog in preklic

[Visual basic] Open file dialog in preklic

roli ::

Torej po tem vodiču se učim programiranje in sem naletel na en problem. Namreč vse OK glede prikazovanja dialoga in to problem je kaj se zgodi, ko pritisnem na cancel v dialogu.V vodiču (link zgoraj) je napisano kaj bi moral naredit vendar to nekako ne deluje. Visual basic mi v primeru, da naredim to javi tale warning:

Warning Access of shared member, constant member, enum member or nested type through an instance; qualifying expression will not be evaluated. C:\Users\Roli\Documents\Visual Studio 2005\Projects\menus\menus\Form1.vb

Napaka se nanaša na: DialogResult.Cancel


Še koda vsega skupaj:

    Private Sub OpenToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OpenToolStripMenuItem.Click

        Dim filename As String
        Dim DidWork As Integer = OpenFD.ShowDialog()

        OpenFD.InitialDirectory = "C:\"
        OpenFD.Title = "Open file"
        OpenFD.Filter = "Text Files (*.txt)|*.txt"
        filename = OpenFD.FileName

        If DidWork = DialogResult.Cancel Then
            MsgBox("Cancel Button Clicked")
        Else
            filename = OpenFD.FileName
            MsgBox(filename)
        End If

        MessageBox.Show(filename)

    End Sub
http://www.r00li.com
  • spremenil: roli ()

mHook ::

"Napako" imaš pri Dim DidWork.
Poskusi z
Dim DidWork As DialogResult

zavajon ::

Pa še bi bilo dobro, da propertije nastaviš preden kličeš ShowDialog()

roli ::

Aha!
Hvala za pomoč!
http://www.r00li.com


Vredno ogleda ...

TemaSporočilaOglediZadnje sporočilo
TemaSporočilaOglediZadnje sporočilo
»

Visual Basic

Oddelek: Programiranje
313208 (2234) cekr
»

VB.net Excel v Tif

Oddelek: Programiranje
121066 (965) saule
»

[VB2005Pro]Zapiranje in še Eno uprasanje

Oddelek: Programiranje
81080 (1013) UltraTX
»

[VB] Komunikacija s serijskimi napravami

Oddelek: Programiranje
412228 (1502) mNeRo
»

[VB] Open

Oddelek: Programiranje
71451 (1290) Monster

Več podobnih tem