> Gerekenler gsimler i Kod < Private Sub Command1_Click() Text4 = (Val(Text2) + Val(Text2) + Val(Text3)) 3 Font.Bold = True End Sub Private Sub Command2_Click() List1.AddItem Text4 End Sub Private Sub Command3_Click() List1.RemoveItem List1.ListIndex End Sub Private Sub Command4_Click() List1.Clear End Sub Private Sub Command5_Click() a = MsgBox("ggkgg yapmak istediniz.Emin misinizg", vbQuestion + vbYesNo + vbDefaultButton2, "ggkgg") If a = vbYes Then MsgBox "ggkgg Yapgyorsunuz!!" End Else a = vbNo MsgBox "ggkgg gptal Edildi!!" End If End Sub Private Sub Form_Load() MsgBox "Bu programcgk Dejavu tarafgndan yazglmggtgr!" End Sub