Trabalho Computacional Mecânica de Fluidos Ambiental aula 2

1. Trabalho Computacional Mecânica de Fluidos Ambiental aula 2 Guillaume Riflet • Dúvidas: guillaume.riflet@ist.utl.pt Ext:3430 • Página: https://fenix.ist.utl.pt/homepage/ist146730/mecanica-dos-fluidos-ambiental-2011-2012(workinprogress...)

2. Resumo aula 1 • subrotinas, funções, • argumentos, variáveis, tipos de variáveis, • debug. • Alcance (Public, Private) • [arrays] • [cicloswhile e for], https://fenix.ist.utl.pt/homepage/ist146730/mecanica-dos-fluidos-ambiental

3. Exercícios aula 1 • Criem a função de umargumento de tipo double que retorne 3x*x – 2. Criemumasubrotina que teste a função para x=4 e x=25, escrevendo o resultado numa folha de excel. • Concebamumciclofor numa subrotina que escreva numa folha de excel os resultados de 3x*x*x + 4 para todos os x que pertençamaointervalo [-30 , 50] comincrementos 2 em 2. • Casonãotenhamfeito, repitam o exercícioanteriorusandoumarray. • Repitam o exercícioanterior, mas destavez a função é 3x*x*x + 4 se o resultado for positivo e 0 (zero) casocontrário (usemumif). • Gravem a macro dumgráficocom os resultados do exercícioanterior (com x nasabscissas e os valores da funçãonasordenadas). Vejam o código que resultou da gravação da vossa macro.

4. Conteúdo programado aula 2 • condições (if), • Passagem de argumentosporvalor ou porreferência • Interface Excel-VBA, • Tipos • eventos, • userforms, • Gravação de macros, • Algunsobjectosnativos de VBA para excel

5. Exemplo VII - if

6. Estruturas de decisão If...Then If anyDate < Now Then anyDate = Now  If anyDate < Now Then anyDate = Now End If Select Case Select Case Index Case 0 Call Sub1 Case 1 Call Sub2 Case 2 Call Sub3 Case 3 Call Sub4 Case Else Call Sub5  End Select If...Then...Else If Index = 0 Then Call Sub1 ElseIf Index = 1 Then Call Sub2 ElseIf Index = 2 Then Call Sub3 ElseCall Sub3 End If

7. Passagem de argumentos Sub Main() Dim a As Integer a = 10 Call TestVal(a) Call TestRef(a) End Sub Sub TestVal(ByVal b As Integer) b = b + 1 End Sub b = 11 a = 10 Sub TestRef (ByRef b As Integer) b = b + 1 End Sub b = 11 a = 11

8. User defined type CPU Private Type SystemInfoCPU As VariantMemory As LongVideoColors As Integer Cost As CurrencyPurchaseDate As VariantEnd Type Dim MySystem As SystemInfo, YourSystem As SystemInfo MySystem.CPU = "486“YourSystem.PurchaseDate = #1/1/92# Memory SystemInfo VideoColors Cost PurchaseDate

9. Exemplo VIII - Type

10. Exemplo IX - Userforms

11. Exemplo IX - Userforms

12. Exemplo IX - Userforms

13. Gravação de Macros • Botão de “record”

14. Glossário II • Macro de Excel: uma série de instruções feitas pelo Excel (e não pelo utilizador) • Objectos: estructuras programáticas. Ex: os objectos de VBA para Excel (Workbooks, sheets, cells, range, charts, drawings,...). • Propriedades: são os campos que compõem os objectos. Pensem no verbo “ser”. • Métodos: são as rotinas dos objectos. Pensem no verbo “fazer”. • Funções: são as funções dos objectos. Pensem no verbo “calcular”. • Eventos: VBA é uma linguagem orientada por eventos. • Controlos: Permite pôr botões e criar eventos. • Userforms: Permite gerar formulário que os utilizadores podem usar para entrar dados dentro do programa. • IDE: Integrated Development Environment.

15. Configurações regionais • Atenção no que toca à linguagem nativa do office. SEN (português) ou SIN (inglês). • Atenção às definições de separadores de casas decimais (3.14 ou 3,14) e de formatos de data (13/05/1980 ou 1980-05-13 ou...).