Como utilizar o WhatsApp para fins educativos

Este ano, a partir de 13 de Fevereiro, na África do Sul, houve uma agitação de professores da TVET que durou três semanas. Neste sector, se se pode perder um dia, surgem muitos problemas. O programa de estudos não estará terminado. Vi passar a primeira semana e nenhum sinal de greve a chegar ao fim, depois pensei num plano. Propus a utilização do WhatsApp aos meus 150 alunos de programação, e eles concordaram. Usei-o da seguinte forma: Vou explicar os conceitos de programação, Convertê-lo para áudio usando Balbolka, texto para software de áudio, Dar um exercício e depois criar uma solução e zipá-la, depois enviá-la aos meus alunos. Além disso, criei uma atmosfera onde os alunos discutem a aula em seus diferentes grupos de bate-papo. Descobri que os alunos entendem a lição muito rápido. Quando a atmosfera estava calma, fiz um teste formal aos meus alunos, que também foi proposto através do WhatsApp, o resultado foi fantástico. O único desafio, porém, foi que poucos alunos não têm smartphones. But to date, I have taught a lot of lessons with that technology, I am no longer waiting for formal classes. The following is an example:

[3:14 PM, 2/19/2019] David: The following is today 's lesson: Today ‘s lesson is about decision structures:

There are two types: IF STATEMENT AND SELECT CASE STATEMENT

IF consist of three sub-division, which are :

(1) For testing two conditions

If True Then

Else

End If

(2) For testing many conditions

If True Then

ElseIf False Then

Else

End If

(3) For testing only one condition

If True Then

End If

[3:15 PM, 2/19/2019] David: I am going to give an example of each

[3:23 PM, 2/19/2019] David: Example 1: Public Class Form1

Private Sub btnMessage_Click(sender As System.Object, e As System.EventArgs) Handles btnMessage.Click

Dim age As Integer

age = txtMessage.Text

If age >= 18 Then

MessageBox.Show("You are fit to vote")

Else

MessageBox.Show("You are not fit to vote")

End If

End Sub

End Class

[3:24 PM, 2/19/2019] +27 65 339 6676: Makes sense

[3:29 PM, 2/19/2019] David: Example 2:

Public Class Form1

Private Sub btnMessage_Click(sender As System.Object, e As System.EventArgs) Handles btnSymbol.Click

Dim mark As Integer

mark = txtSymbol.Text

If mark > 79 Then

MessageBox.Show("A")

ElseIf mark > 69 Then

MessageBox.Show("B")

ElseIf mark > 59 Then

MessageBox.Show("C")

ElseIf mark > 49 Then

MessageBox.Show("D")

ElseIf mark > 39 Then

MessageBox.Show("E")

Else

MessageBox.Show("F")

End If

End Sub

End Class

[3:29 PM, 2/19/2019] David: NB The last test must be Else

[3:30 PM, 2/19/2019] David: Any question?

[3:34 PM, 2/19/2019] David: In the absence of any question let me give you an example of only one condition:

[3:34 PM, 2/19/2019] David: Public Class Form1

Private Sub btnMessage_Click(sender As System.Object, e As System.EventArgs) Handles btnSymbol.Click

Dim mark As Integer

mark = txtSymbol.Text

If mark > 50 Then

MessageBox.Show("Passed")

End If

End Sub

End Class

[3:42 PM, 2/19/2019] David: Any questions?

[3:43 PM, 2/19/2019] +27 78 008 0778: Public class form1

Dim i As Integer = 2

Private sub Button1_click(Byval sender As System.object, Byval e As System.EventArgs) Handles Button1.click

Do Until i > 24

ListBox1.Items.Add(i & "x" & i & i * i)

i = i + 1

Loop

End sub

End class

This answer is for question 1

[3:43 PM, 2/19/2019] David: I'll check them later

[3:47 PM, 2/19/2019] David: The last decision statement is to SELECT CASE STATEMENT. This statement is a simple statement that replaces nested if statement that we did as example 2. So in the example that I am giving you, I have commented out example 2 so that you can see how it relates to Select Case statement

[3:48 PM, 2/19/2019] David: Public Class Form1

Private Sub btnMessage_Click(sender As System.Object, e As System.EventArgs) Handles btnSymbol.Click

Dim mark As Integer

mark = txtSymbol.Text

'If mark > 79 Then

' MessageBox.Show("A")

'ElseIf mark > 69 Then

' MessageBox.Show("B")

'ElseIf mark > 59 Then

' MessageBox.Show("C")

'ElseIf mark > 49 Then

' MessageBox.Show("D")

'ElseIf mark > 39 Then

' MessageBox.Show("E")

'Else

' MessageBox.Show("")

'End If

Select Case mark

Case 80 To 100

MessageBox.Show("A")

Case 70 To 79

MessageBox.Show("B")

Case 60 To 69

MessageBox.Show("C")

Case 50 To 59

MessageBox.Show("D")

Case 40 To 49

MessageBox.Show("E")

Case Else

MessageBox.Show("F")

End Select

End Sub

End Class

[3:48 PM, 2/19/2019] David: The last test must just be Case else

[3:49 PM, 2/19/2019] David: Does it make sense?