Stejna promena

Stejna promena zodpovězená otázka

7. 3. 2009 14:05

0 2

Mam tento sub v časovači ale potřebuji udělat kdyz je promena stat uz podruhe za sebou stejna tak aby to okno nezobrazilo.

Je mi jasne ze tak to fungovat nebude (ok = stat) :

Public Sub Posta()

Dim uziv As String = Form1.code.Text

Dim stat = proxy.posta(uziv)

Dim ok

If (stat = "") Then

ElseIf (stat = ok) Then

Else

MsgBox(stat, MsgBoxStyle.MsgBoxRtlReading, "Ofidia: Air Battles")

ok = stat

End If

End Sub

nahlásit spam

odpovědět

7. 3. 2009 15:16

Petr Mánek

104 175

Zkuste toto:

Dim puvodni As String = ""

Public Sub Posta()
    Dim uziv As String = Form1.code.Text
    Dim stat = proxy.posta(uziv)

    If puvodni = stat Then MsgBox(stat, MsgBoxStyle.MsgBoxRtlReading, "Ofidia: Air Battles")
    puvodni = stat
End Sub

nahlásit spam

odpovědět

otázka připomínka kladné hodnocení záporné hodnocení

Nadpis:

Antispam:

Komu se občas házejí perly?

Příspěvek bude publikován pod identitou anonym.

Administrátoři si vyhrazují právo komentáře upravovat či mazat bez udání důvodu.
Mazány budou zejména komentáře obsahující vulgarity nebo porušující pravidla publikování.

Pokud nejste zaregistrováni, Vaše IP adresa bude zveřejněna. Pokud s tímto nesouhlasíte, příspěvek neodesílejte.

dotNETportal.cz

Stejna promena zodpovězená otázka

Stejna promena

Nahlásit spam

Chyba

dotNETportal.cz

Stejna promena zodpovězená otázka

Stejna promena

přihlásit pomocí externího účtu

přihlásit pomocí jména a hesla

založit nový uživatelský účet

Nahlásit spam

Chyba