際際滷

際際滷Share a Scribd company logo

Visual1

Download as DOC, PDF
Aldo Yanini Diaz Romero
Aldo Yanini Diaz Romero
1 of 1
Download to read offline
Private Sub cmdprom_Click() Text4 = (Val(Text1.Text) + Val(Text2.Text) + Val(Text3.Text)) / 3 If Text4 > 70 Then MsgBox "Aprobado" End If End Sub Private Sub cmdsalir_Click() End End Sub

More Related Content

Visual1

  • 1. Private Sub cmdprom_Click() Text4 = (Val(Text1.Text) + Val(Text2.Text) + Val(Text3.Text)) / 3 If Text4 > 70 Then MsgBox "Aprobado" End If End Sub Private Sub cmdsalir_Click() End End Sub