Angelo Augusto

kuroi, valeu pela ajuda!!! e desculpa ai . Mas porque vi vocês me ajudando no tópico anterior e pensei em colocar ele em primeiro novametne para vocês verem !!rsrs foi mal é isso mesmo que você disse ! a janelinha que aparece os resultados. Isso que quero que seja de acordo com o resultado obtido !!! Se puderem me ajudar !!! eu queria que a janelinha aparecesse tipo o auto size da combo , mas so que para a janelinha !! Grato desde já!

Amigos, Gostaria de saber de vocês se tem algum jeito de fazer que quando a combobox receber alguns textos ela fique do tamanho dos textos.Sem que eu tenha que colocar o tamanho dela manualmente! tipo assim, |combo aqui| --> aqui o tamanho normal da combo |texto texto texto texto texto texto texto texto texto texto texto| --> aqui o tamanho que a caixa de resultados dela deve ficar |texto texto texto texto texto| |texto texto texto texto textotexto texto texto texto texto| |texto texto texto texto texto texto texto| desde já muito obrigado!!!

Sinceramente não estou entendendo!! não deu certo agora ela da a mensagem If ESPECIFICACAOITEM = "" Then MsgBox "Não foi encontrada especificação para o item pesquisado.", vbCritical + vbOKOnly RTB_especificacao.Text = "" Exit Sub End If estranho não é Ai consegui aqui muito obrigado ! coloquei no evento click do botao que faz a pesquisa!!! muito obrigado era combo1ListIndex = 0 mesmo

Ai fiz isto mas não deu ? Dim ITEMESC As String Dim CONT41 As Integer Dim CONT42 As Integer Dim ESPECIFICACAOITEM As String Dim UNIDADE As String ESPECIFICACAOITEM = "" UNIDADE = "" ITEMESC = "" CONT41 = 0 CONT42 = 0 [b]CB_Item.ListIndex = 0[/b] ITEMESC = CB_Item.Text With Sheets("BD") For CONT41 = 3 To 20000 If .Cells(CONT41, 2).Text = ITEMESC Then ESPECIFICACAOITEM = .Cells(CONT41, 25).Value UNIDADE = .Cells(CONT41, 3).Value Exit For End If Next CONT41 If ESPECIFICACAOITEM = "" Then MsgBox "Não foi encontrada especificação para o item pesquisado.", vbCritical + vbOKOnly RTB_especificacao.Text = "" Exit Sub End If

Fera não deu . fiz aqui e o valor da combo continuou em branco !!! não tem outro jeito não !!! é que to fazndo em VBA muito obrigado

Pessoal , estou fazendo com que uma combobox receba um monte de itens , preciso que quando ela receber os itens o primeiro valor já apareça na combo. DEU PARA ENTENDER??? AQUI EM ABAIXO É A COMBO |-------------------------------------------------------------------------------------------| | AQUI TEM que APARECER O PRIMEIRO VALOR ENCONTRADO NA PESQUISA | A pequisa ta dando certo a combo recebe todos os itens pesquisado , a unica coisa e quando mostrar o primeiro valor mesmo. so pro cara saber que foi encontrado alguma coisa. Me ajudem!! Conto com todos!!! Abraços

Pode deixar isso não acontecera mais !!!

Muito obrigado mesmo por tudo !!!!! Valewwwwwwwwssssssssssssssssss!!!!!

AI PESSOAL FIZ AQUI O PROGRAMINHA !!! AGORA SO TA FALTANDO COMPILA-LO PARA SABER SE ELE ESTA CORRETO, SERA QUE alguém COMPILA ELE AI PARA MIM E ME DA UM OK... MUITO OBRIGADO #include <iostream.h> #include <conio.h> struct aluno{ char nome[10]; float prova1,prova2,prova3; }; void main() { aluno a[5]; int i,maior=0; float media; for (i=0; i<5; i++) { cout<<"Digite o nome do aluno:"; cin>>a[i].nome; cout<<"Digite a nota da primeira prova:"; cin>>a[i].prova1; cout<<"\nDigite a nota da segunda prova:"; cin>>a[i].prova2; if (a[i].prova1 > a[i].prova2) { maior = a[i].prova1; } else { maior = a[i].prova2; } if ((a[i].prova1>=3.0) && (a[i].prova2>=3.0)) { media = (a[i].prova1 + a[i].prova2) / 2; cout << "Aluno " << a[i].nome << " Aprovado com media: " << media; } else { cout<<"\nDigite a nota da terceira prova:"; cin>>a[i].prova3; media = (maior + a[i].prova3) / 2; } if ((maior >= 3.0) && (a[i].prova3>=3.0)) { cout << "Aluno " << a[i].nome << " Aprovado com media: " << media; } else { cout << "Aluno " << a[i].nome << " Reprovado com media: " << media; } } getch(); } Valewww em pessoal

kandrade, valeu pela força!! fiz o programinha aqui e acho que esta certo.... Mas o problema agora é que estou sem compilador aqui no meu serviço se puder compila-lo e depois me dizer se esta de acordo ficaria muito grato !!! OU desde já muito obrigado ! #include <iostream.h> #include <conio.h> struct aluno{ char nome[10]; float prova1,prova2,prova3; }; void main() { aluno a[5]; int i,maior=0; float media; for (i=0; i<5; i++) { cout<<"Digite o nome do aluno:"; cin>>a[i].nome; cout<<"Digite a nota da primeira prova:"; cin>>a[i].prova1; cout<<"\nDigite a nota da segunda prova:"; cin>>a[i].prova2; if (a[i].prova1 > a[i].prova2) { maior = a[i].prova1; } else { maior = a[i].prova2; } if ((a[i].prova1>=3.0) && (a[i].prova2>=3.0)) { media = (a[i].prova1 + a[i].prova2) / 2; cout << "Aluno " << a[i].nome << " Aprovado com media: " << media; } else { cout<<"\nDigite a nota da terceira prova:"; cin>>a[i].prova3; media = (maior + a[i].prova3) / 2; } if ((maior >=3.0) && (a[i].prova3>=3.0)) { cout << "Aluno " << a[i].nome << " Aprovado com media: " << media; } else { cout << "Aluno " << a[i].nome << " Reprovado com media: " << media; } } getch(); }

eu não estou conseguindo fazer este programa!!! montar a logica para ele rodar de acordo com os criterios!!! fiz assim mas não deu certo me ajudemmmm #include <iostream.h> #include <conio.h> struct aluno{ char nome[10]; float prova1,prova2,prova3; }; void main() { aluno a[5]; char nomea[10], nomeb[10]; int i,conta,contb; float soma, media; for (i=0; i<5; i++) { cout<<"Digite o nome do aluno"; cin>>a.nome; cout<<"Digite a notas da primeira prova:"; cin>>a.prova1; cout<<"Digite a notas da segunda prova:"; cin>>a.prova2; if ((a.prova1>=3.0) && (a.prova2>=3.0)) { conta ++; nomea = a.nome; } elseif((a.prova1 < 3.0) && (a.prova2 < 3.0)) { conta ++; nomeb=a.nome; } soma = a.prova1 + a.prova2; } media = soma / 2; if((media >= 5.0) && (prova1 >= 3.0) && (prova2 >= 3.0)) { for(i=0;i<conta;i++) { cont<<"O aluno Aprovado!!!";<<nomea; cout<<"a media do aluno e:";<<media; } } if((media <= 5.0) || (prova1 < 3.0) || (prova2 < 3.0)) { for(i=0;i<contb;i++) { cont<<"digite a nota da terceira prova:"; cin>>a.prova3; } } } muito obrigado !!!!

Como seria esse DoEvents dentro for ? tem como me passar um exemplo? Muito obrigado!!!

Amigo!!! Ta osso não consigo nem fu.... fazer esse ngocio .... não sei o que estou fazer do de errado !!! E o pior que esse programinha ai vale 10 pontos em estrutura de dados!!! Me ajuda por favor !!! Brigado

Caro amigo, olha so o que tentei!!! mas não ta dando certo !!! A logica esta errada me parece! se souber me ajude!!1 muito obrigado!!! #include <iostream.h> #include <conio.h> struct aluno{ char nome[10]; float prova1,prova2,prova3; }; void main() { aluno a[5]; char nomea[10], nomeb[10]; int i,conta,contb; float soma, media; for (i=0; i<5; i++) { cout<<"Digite o nome do aluno"; cin>>a.nome; cout<<"Digite a notas da primeira prova:"; cin>>a.prova1; cout<<"Digite a notas da segunda prova:"; cin>>a.prova2; if ((a.prova1>=3.0) && (a.prova2>=3.0)) { conta ++; nomea = a.nome; } elseif((a.prova1 < 3.0) && (a.prova2 < 3.0)) { conta ++; nomeb=a.nome; } soma = a.prova1 + a.prova2; } media = soma / 2; if((media >= 5.0) && (prova1 >= 3.0) && (prova2 >= 3.0)) { for(i=0;i<conta;i++) { cont<<"O aluno Aprovado!!!";<<nomea; cout<<"a media do aluno e:";<<media; } } if((media <= 5.0) || (prova1 < 3.0) || (prova2 < 3.0)) { for(i=0;i<contb;i++) { cont<<"digite a nota da terceira prova:"; cin>>a.prova3; } } }

Amigo não estou conseguindo fazer a logica .... ta muito dificil!!! Queria ver o programa como seria ?

o exercicio é o seguinte. considere uma disciplina que adota o seguinte criterio de aprovação, os alunos fazem duas provas(P1, P2)inicias, se a media nessas provas for maior ou igual a 5,0, e se nenhuma das duas notas for inferior a 3,0, o aluno passa direto. Caso contrario, o aluno faz uma terceira prova(p3)a media é calculada considerando-se essa terceira nota e a maior das notas P1 e P2. Neste caso o aluno é aprovadp se a media final for maior ou igual a 5,0. O programa devera contemplar um total de 5 alunos e devera ser usado uma estrutura heterogenea de dados (STRUCT) para a confecção do problema. O programa devera apresentar na tela a media de todos os alunos bem como se cada aluno foi reprovado ou aprovado !!! Desde já muito obrigado !!! Conto com a juda de todos vocês!

o exercicio é o seguinte. considere uma disciplina que adota o seguinte criterio de aprovação, os alunos fazem duas provas(P1, P2)inicias, se a media nessas provas for maior ou igual a 5,0, e se nenhuma das duas notas for inferior a 3,0, o aluno passa direto. Caso contrario, o aluno faz uma terceira prova(p3)a media é calculada considerando-se essa terceira nota e a maior das notas P1 e P2. Neste caso o aluno é aprovadp se a media final for maior ou igual a 5,0. O programa devera contemplar um total de 5 alunos e devera ser usado uma estrutura heterogenea de dados (STRUCT) para a confecção do problema. O programa devera apresentar na tela a media de todos os alunos bem como se cada aluno foi reprovado ou aprovado !!! Desde já muito obrigado !!! Conto com a juda de todos vocês!

Ola pessoal, bom dia ! Tenho dúvidas de como faço para poder usar a PROGRESSBAR, Abro um arquivo word muito grande com masi de 2000 pgs a minha aplicação abre este arquivo e demora um bucado. gostaria que algum me ajudasse a fazer isso ,tentei da seguinte forma. Coloquei um form com um progressbar, sendo chamada no evento click de um botão e fiz um for variando mas não deu certo.. alguém sabe como fazer isso , enquanto o arquivo do word é aberto o progress é ativado e consequentemente quando ele acbar de ser carregado o progress ser finalizado !!! Desde já muito obrigado !!!!!

meu amigo, muito obrigado pela força mas é o seguinte !!1 a combo esta recebendo valores de um banco ! e não sei qual vai ser o tamanho dos itens que ela vai receber !!! o tamanho (Width) é de 516 esse é o tamanho que ela tem que ficar no FORM mas o ListWidth tem que variar de acordo com os itens que receber!!! entendeu

AMIGO NÃO CONSEGUI ENTENDER O QUE DESEJAR , ABRAÇOS

Pessoal me ajudem por favor!!!! E fazer com que o valor da variavel fique em negrito !!1 muito obrigado!!!

Pessoal, estou exportando dados do excel para o word, e gostaria que na hora que fosse exportar estes dados a variavel fosse em negrito mas não sei a sintax do codigo ... vou colocar um pedaço do codigo aqui para vocês me ajudarem a colocar a variavel em negrito !! Set word = CreateObject("Word.Application") 'Abre o documento word.Documents.Open "C:\Modelo.doc" 'não mostra o documento para usuario word.Visible = False 'Seleciona o documento inteiro word.Documents("Modelo.doc").Select itemmaiusculo = StrConv(CB_Item.Text, vbUpperCase) Acho que aqui que teria que ficar mas não sei a sintax para fazer isso ' chama rotina para substituicao Call Substitui_Var("@item", (itemmaiusculo)) Call Substitui_Var("@especificacao", (RTB_especificacao.Value) & vbCrLf & vbCrLf & vbCrLf) Call Substitui_Var("", (Label9.Caption) & vbCrLf & vbCrLf & vbCrLf) Call Substitui_Var("", (Label10.Caption) & vbCrLf & vbCrLf & vbCrLf) ' Salva o documento com um novo nome word.ActiveDocument.SaveAs ("c:\Memorial descritivo.doc") 'fecha o word word.Quit 'Libera memoria Set word = Nothing

Amigos, Gostaria de saber de vocês se tem algum jeito de fazer que quando a combobox receber alguns textos ela fique do tamanho dos textos.Sem que eu tenha que colocar o tamanho dela manualmente! tipo assim, |combo aqui| --> aqui o tamanho normal da combo |texto texto texto texto texto texto texto texto texto texto texto| --> aqui o tamanho que ela deve ficar !! |texto texto texto texto texto| |texto texto texto texto textotexto texto texto texto texto| |texto texto texto texto texto texto texto| desde já muito obrigado!!!

Amigo Raphael, é o seguinte , nem precisa da hora simplesmente da data !! dentro de uma label !! mas se tiver a hora melhor ainda hora corrente muito obrigado!!

É meu amigo não ´pe isso não viu !!! Sera que não teria um outro evento ??? Muito obrigado