Ir para conteúdo
Fórum Script Brasil

Angus Musashi

Membros
  • Total de itens

    7
  • Registro em

  • Última visita

Sobre Angus Musashi

Angus Musashi's Achievements

0

Reputação

  1. VB é uma boa, mas já estão cheios os quadros. Tente começar por VB.Net;já se for mais corajoso, tente C#.Net(pra windows, afinal você não descreveu qual SO utiliza). Vai precisar aprender um pouco de ASP.Net também, que é melhor que o asp antigão. (pra win). Depois disso , você faz um hackintosh e tudo fica liberado.
  2. Sai fora dessa. CompuClass não se aprende quase nada. Meu chefe pagou um curso pra mim de sql lá e jogou dinheiro no lixo. As aulas são muito rápidas. Não dá tempo nem de você pensar no conteúdo aprendido e já estão passando mais conteúdo. Paguei o curso na Green, aí sim aprendi o negócio. Caia fora da CompuClass, é um AVISO!
  3. Olá, Senhores(as). Peço a gentileza que me tirem uma dúvida. Estou em dúvida entre 2 cursos e não sei qual deles fazer. O 1º é Análise e Desenvolvimento de Sistemas e o 2º é Web Design. Haja vista que trabalho atualmente como "faz-tudo", ou seja, sou webmaster e programador .Net(ganhando menos que catador de latinha), estou em dúvida séria sobre qual faculdade fazer. Será que alguém pode me dar "uma luz"?
  4. Olá a todos. Por favor, tenho uma dúvida interessante. Haja vista que sempre programei somente executáveis e poucas vezes precisei fazer bancos, tenho cá minhas dúvidas sobre isto. A questão é: - Se eu fizer um programa -em casa- com banco de dados mysql/acces/outro , eu preciso instalar o mysql no computador do cliente também? Porque notei que se o cliente tem acces instalado, basta levar o arquivo .mdb e colocá-lo no diretório correspondente que funciona. Mas e no caso de o banco ser feito em mysql/MS SQL, como fazer? Tenho que instanciar o SQL primeiro, adicionar o banco e - só depois disto - instalar o programa que eu criei?
  5. Oras, muito obrigado Michele. Contudo, já consegui de outra maneira. é só colocar a palavra "VAL" antes do (txt1.text). Fica assim: textsoma.text=val(text1.text)+val(text2.text) Isto foi o que melhor se adaptou ao meu código, porém, meu muito obrigado pela atenção.
  6. Olá, senhores! Por favor, alguém, pelamor... Seguinte, tenho 2 caixas de texto (txt1 & txt2). Quando coloco o nº 4 na primeira e o nº 3 na segunda e dou no botão subtrair, o resultado é 1. Já se faço o mesmo procedimento , mas clico no botão somar, ele concatena...e o resultado fica 43. meu código tá assim: ' botão somar_click() soma = txt1.text + txt2.text msgbox soma '------------------- 'Botão subtrair_click() subtrair = txt1.text - txt2.text msgbox subtrair Pra ser sincero eu nunca tinha feito conta com VB, foi a primeira vez que peguei pra fazer um programinha assim. To olhando centenas de outros programas, mas parece que ninguém usa soma até hoje nos programas. O resto dos operadores funciona normalmente.Só dá "pau" com a soma, que está concatenando. Pode tentar aí no seu, vai ver que não estou mentindo. Já tentei formatar o textbox, tentei usar função, tentei usar classe...mas até agora, continua concatenando.
  7. Senhores, olá. Por favor, alguém poderia de dar uma luz , doar um pingo de informação, uma simples dica ou uma magia sinistra ou um esquema-ninja sobre um probleminha X. Por favor, aceito inclusive gambiarras. O probleminha é o seguinte: - Quero calcular a média de alguns números. A quantidade de números, é definida na hora da execução. Tenho então, um textbox(txtqtos.text) pro cliente entrar a quantidade de números. Feito isto, é gerado no form(em tempo de execução), um sobre o outro(partindo do ponto top 0 esquerda ,superior do form) , a quantidade de textbox pra que sejam inseridos os números para se calcular a média(numa progressão geométrica de espaços). Haja vista que sou ALTAMENTE NOOOBASSO (NOOB MESMO), implementei o seguinte código: Private Sub Command4_Click() Dim i As Integer 'Dim TextControl As TextBox ' Set TextControl = Me.Controls.Add("VB.Textbox", "TXTNovo" & i) For i = 0 To txtqtos.Text 'Print "TXTNovo" & i Me.Controls.Add "VB.TextBox", "TXTNovo" & i Me.Controls("TXTNovo" & i).Visible = True Me.Controls("TXTNovo" & i).Left = 0 Dim novo, posicaum As Variant novo = (Me.Controls("TXTNovo" & i).Top = i + 480) 'posicaum = (position.Top + 480) If Me.Controls("TXTNovo" & i).Top = 0 Then Me.Controls("TXTNovo" & i).Top = (Me.Controls("TXTNovo" & i).Top) + (Me.Controls("TXTNovo" & i).Top = 480) ' precisa incrementar este valor End If Me.Controls("TXTNovo" & i).Height = 285 Me.Controls("TXTNovo" & i).Width = 1215 Next i End Sub Ou seja, está gerando apenas a primeira textbox e para por aí, não gera outra abaixo dela. Não sei mais o que fazer. Se alguém- por favor- tiver uma solução, posso trocar por informações de outras aplicações que fiz, ou ajudar no que eu puder quando necessitar, ou até sair pra jantar(mas sem dar beijo na boca).
×
×
  • Criar Novo...