Názory ke článku VB - 4. lekce – Programujte.com

Zatím stále srozumitelné a bez problémů

chtěl bych se zeptat jeslti Timer může přičítat hodnoty už v proměné-chci aby mi program zobrazil v msgboxu postupné přičítání hodnot
něco jako

Private Sub Form_Load()
dim a as string
a = 10
end sub


Private Sub Timer1_Timer()

a = a + 1
end sub


Private Sub Command1_Click()
msgbox a 'a v tomto msgboxu aby se mi zobrazilo postupné přičítání k proměné a
End Sub



jeslti mě někdo pochopil jde něco takového vytvořit??abych neviděl jak se čísla přičítají ale viděl třeba jen výsledek po 10s

nevim proc ale asi 6x uz sem tenhle clanek precetl a porad se mi nedari udelat domaci ukol ... proste to nejak nechce fungovat :(

To medy75: No mohlo by to být třeba takto... Pokud něčemu neporozumíč tak mi napiš.
Public a As Byte
Private Sub Form_Load()
Timer1.Enabled = False
Timer1.Interval = 1000
a = 10
tlacitko = MsgBox("Vypnout ručně?", vbYesNo)
If tlacitko = 6 Then
End
Else
Timer1.Enabled = True
End If
End Sub
Private Sub Timer1_Timer()
a = a - 1
Label1.Caption = "Vypínání: " & a
If a = 0 Then
MsgBox "Konec"
End
ElseIf a < 6 Then
Beep
End If
End Sub

To medy75: Jo a ještě sem zapoměl. Jelikož kód v timer1_timer se provede až po uplynutí intervalu tak za a musíš dosadit číslo o 1 menší. Takže 9(ovšem to je pro přápad, že se program vypne za 10 sekund.

To sammael: Tohle ti nebude fungovat, protože máš deklarovanou proměnou "a" pouze jako lokalní pro Form_load, takže oprava by byla takhle:
Dim a As String
Private Sub Form_Load()
Timer1.Enabled = True
Timer1.Interval = 1000 'Pro případ, že chceš aby se přičítalo po sekundě
a = 10
End Sub

Private Sub Timer1_Timer()
a = a + 1
End Sub

Private Sub Command1_Click()
MsgBox a
End Sub

chcem sa opytat ako sa daju do kalkulacky odmocniny a take veci ako je sinus, na druhu a take??

Tak na sinus a cosinus su funkcie sin() a cos() v tvare

premenna = sin(text1.text)

a ked chces na druhu tak je to trebars

Private Sub Command1_Click()
Label1.Caption = Text1.Text * Text1.Text
End Sub

kde command1 je tlacitko pre mocninu