Archief - [PROG]VB.NET Simpel vraagske

Het archief is een bevroren moment uit een vorige versie van dit forum, met andere regels en andere bazen. Deze posts weerspiegelen op geen enkele manier onze huidige ideeën, waarden of wereldbeelden en zijn op sommige plaatsen gecensureerd wegens ontoelaatbaar. Veel zijn in een andere tijdsgeest gemaakt, al dan niet ironisch - zoals in het ironische subforum Off-Topic - en zouden op dit moment niet meer gepost (mogen) worden. Toch bieden we dit archief nog graag aan als informatiedatabank en naslagwerk. Lees er hier meer over of start een gesprek met anderen.
y

yannick

Legacy Member
Ik, dit is wrs heel basic en simpel, maar kvind het maar niet.

Ik zou mijn oefening zo moeten maken dat hij bij het afsluiten met het kruisje vraagt of ik echt wil aflsuiten of niet.

Nu, de code voor het aflsluiten heb ik( de vraag enzo), maar ik weet totaal niet welke event da er achter dit kruisje zit :s.

Zouden jullie mij kunnen helpen aub :)

mvg
t

tha_rippa1be

Legacy Member
in Visual Studio 6.0 is het Form_Unload, geen idee in .net, maar het is het proberen waard he.
//edit
juist gemerkt dat Form_Terminate hetzelfde doet, geen idee wat het verschil is.
y

yannick

Legacy Member
en hoe zit da dan juist...
Want wij zijn maar juist begonnen me vb.net (tis zelfstudie :))

Ik heb voor form load dit :

#Region "Form1_load"
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.clear()
Me.LblSaldo.Text = "1000"
End Sub
#End Region

Hoe moet ik dan de form_unloed invoegen ? :)

mvg
D

Duffman-

Legacy Member
Code: 
Private Sub Form1_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
        tmrOntvangen.Stop()
        tmrGebruikers.Stop()
        ocmdSend.CommandText = "Select Naam From tblGebruikers WHERE tblGebruikers.online ='Ja'"
        odrChatten = ocmdSend.ExecuteReader
        Do While odrChatten.Read
            If odrChatten.Item("Naam") = strChatter Then
                ocmdOffline.CommandText = "DELETE FROM tblGebruikers WHERE Naam = '" & strChatter & "';"
            End If
        Loop
        odrChatten.Close()
        ocmdOffline.ExecuteNonQuery()
        If txtChatters.Text.Length - strChatter.Length <= 2 Then
            ocmdClear.CommandText = "DELETE FROM tblChat;"
            ocmdClear.ExecuteNonQuery()
        End If
    End Sub
dat is bv een code bij mij. Vooral het begin is belangrijk. Als je in vb.net code invoegt, kan je bovenaan objecten kiezen (formulier, tekstvakken, ...) en daarnaast events(waaronder load, click, ...) kies nu als object je formulier en als event closing en plak daaronder je code die daar nodig is.
y

yannick

Legacy Member
Ik heb geen closing ,da ist probleem :). Load staat erbij, geen closing :(

mvg

*edit*

Heb het gevonden, bij de allerlaatse vb.net zal dit wrs anders zijn geworden:

Oplossing:
Code: 
Private Sub FrmHogerLager_Closing(ByVal sender As System.Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles MyBase.FormClosed
    Me.IfClose()
  End Sub

Dit was dus anders :
ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles MyBase.FormClosed

Bedankt voor de hulp :)

mvg
D

Duffman-

Legacy Member
Hm, ge kunt dat ook typen hoor.
Private Sub Form1_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing

Form1 dan veranderen door de naam van uw formulier. Wa is juist de bedoeling van heel het programma?
y

yannick

Legacy Member
Iets heeeeel basic.

Lucky number 7 (ge weet wel, die oef van de VB6 boek, maar dan nu in vb.net :p)

mvg
Het archief is een bevroren moment uit een vorige versie van dit forum, met andere regels en andere bazen. Deze posts weerspiegelen op geen enkele manier onze huidige ideeën, waarden of wereldbeelden en zijn op sommige plaatsen gecensureerd wegens ontoelaatbaar. Veel zijn in een andere tijdsgeest gemaakt, al dan niet ironisch - zoals in het ironische subforum Off-Topic - en zouden op dit moment niet meer gepost (mogen) worden. Toch bieden we dit archief nog graag aan als informatiedatabank en naslagwerk. Lees er hier meer over of start een gesprek met anderen.
Terug
Bovenaan