webForumDet fria alternativet

MsgBox

4 svar · 235 visningar · startad av aleborg

aleborgMedlem sedan jan. 20012 962 inlägg
#1

om man har en MsgBox som ser ut så här:

[red]MsgBox "Du har glömt nått, vill du fixa det nu?", vbYesNo, "Hallå!"[/red]

Hur gör man för att ange att subben där den här finns ska avbrytas på "Yes" och fortsätta på "No"?

ViktorMedlem sedan aug. 20021 710 inlägg
#2

Här

    tVar.iInt = MsgBox("Please select a destination directory of the imported track's." & vbLf & _
        "The track files will get the same name as the track.", vbOKCancel, TH)
    If tVar.iInt = vbCancel Then Exit Sub
    If tVar.iInt = vbOK Then

Du får bara byta ut vbOK till vbYes och vbCancel till vbNo

/Viktor

aleborgMedlem sedan jan. 20012 962 inlägg
#3

Får Object required på:

    If UserKonto.Text = "-- Välj konto... --" Then
    tVar.iInt = MsgBox("Du har glömt att ange vilket konto kunden vill ha! Vill du göra det nu?", vbYesNo, "Hallå!")
    If tVar.iInt = vbYes Then Exit Sub
    End If
ViktorMedlem sedan aug. 20021 710 inlägg
#4

Klipte bara lite från gammal kod :)
tVar är ett objekt, du ska bara skriva en integer framför,

    If UserKonto.Text = "-- Välj konto... --" Then
    dim retVal as Integer
    retVal = MsgBox("Du har glömt att ange vilket konto kunden vill ha! Vill du göra det nu?", vbYesNo, "Hallå!")
    If retVal = vbYes Then Exit Sub
    End If

/Viktor

aleborgMedlem sedan jan. 20012 962 inlägg
#5

Tack :)

Genererad på 387 ms · cache AV · v20260730165559-full.f96bc7eb