Small Basic / Programação para iniciantes (Aula 10) - Controles no Small Basic

Aprenderemos a adicionar mais controles e a diferencia-los no código de programação do Small Basic. Daremos mais botões de comando, caixa de texto e texto em janela gráfica.

Código utilizado em aula logo abaixo!



Código utilizado:


GraphicsWindow.Width=300
GraphicsWindow.Height=200
GraphicsWindow.Show()

Criarjanela()

Sub Criarjanela

  fator1= Controls.AddTextBox(10,70)
  Controls.SetSize(fator1,40,40)
  fator2= Controls.AddTextBox(100,70)
  Controls.SetSize(fator2,40,40)
  igual= Controls.AddTextBox(170,70)
  Controls.SetSize(igual,40,40)

  GraphicsWindow.FontSize=20
  GraphicsWindow.DrawBoundText(150,70,100,"=")
  Mais = Controls.AddButton("+", 70,70)
  limpar = Controls.AddButton("Limpar", 200,150)
 
EndSub

Controls.ButtonClicked=clique

Sub Clique
  total= Controls.GetTextBoxText(fator1) + Controls.GetTextBoxText(fator2)
  Ultimoclique= Controls.LastClickedButton
  If Ultimoclique=Mais Then
    Controls.SetTextBoxText(igual,total)
  Else
    Controls.SetTextBoxText(igual,"")
    Controls.SetTextBoxText(fator1,"")
    Controls.SetTextBoxText(fator2,"")
  EndIf
EndSub

Até a próxima aula!

Comentários

  1. Ola pessoal do newbie, eu queria saber como poderia
    fazer para que pudesse inseri no código as outras operações matemáticas? Parabéns pelo trabalho.

    ResponderExcluir

Postar um comentário

Postagens mais populares

Word 2016 - Instalar/Importar formatação (estilo/norma) da ABNT

Faça o Download de todas as aulas de Excel! [Atualizado]