265433
Ano: 2010
Disciplina: TI - Desenvolvimento de Sistemas
Banca: CESGRANRIO
Orgão: BR Distribuidora
Disciplina: TI - Desenvolvimento de Sistemas
Banca: CESGRANRIO
Orgão: BR Distribuidora
Observe o código a seguir, codificado em Visual Basic 6.
|
Private Sub Command1_Click()
Dim N As Integer Dim K As Integer Dim Z As Integer List1.Clear N=Val(Text1.Text)
For K = 1 To 7 Step 1
Z = N * K List1.AddItem (Z) Next K Text1.SetFocus
End Sub |
Uma estrutura equivalente e que produz o mesmo resultado do loop For ... To ... marcado em negrito no código acima, está codificada em:
Provas
Questão presente nas seguintes provas
