Graymalkin

Você quer que o formulário só seja utilizado por no máximo 5h durante o mês todo? Seria isso? Abraços, Graymalkin

Para adicionar: Set obj = Me.Controls.Add("VB.TextBox", "CaixaTexto") obj.Top = 50 obj.Left = 50 obj.Height = 375 obj.Visible = True E para remover: Me.Controls.Remove "CaixaTexto" Certo? ;) Graymalkin

No que a pergunta do tópico tem haver com o título do mesmo? Graymalkin

Isso ele já sabe, conforme disse no primeiro parágrafo do tópico: Abraços, Graymalkin

Veja se isso resolve: Private Sub CMD_login_Click() Dim novo As Boolean novo = False FRM_Login.Hide FRM_Principal.Show tbl.Seek "=", TXT_Login.Text If tbl.NoMatch Then tbl.AddNew tbl("usuario") = TXT_Login.Text tbl.Update novo = True End If If novo Then If Not (tbl.Eof and tbl.Bof) Then tbl.MoveLast End If End If FRM_Principal.TXT_LoginP.Text = UCase(tbl("usuario")) End Sub Abraços, Graymalkin

Qual é exatamente o erro que aparece? Abraços, Graymalkin PS: Movi seu tópico para .NET.

Por acaso "mplayer" é o Windows Media Player? Graymalkin

Já deu uma olhada na documentação da linguagem? Tem todas estas explicações lá. Abraços, Graymalkin

Você deu o exemplo de um objeto estático, mas métodos também podem ser estáticos. Desta maneira você não precisa criar um objeto de determinada classe para usar seus métodos. O método Show() da classe MessageBox é um exemplo de método estático. Em relação à métodos virtuais, você tem que conhecer classes abstratas e interfaces para entender melhor o porque deles existirem. De uma maneira simples, um método virtual é um método que você quer que exista na classe mas que a sua implementação (código) seja definida apenas em uma classe filha. Vamos supor que a classe Automóvel tenha um método virtual chamado MudarMarcha. Você pode então, herdando desta, criar uma classe Chevette cujo método MudarMarcha aceite até a 4ª marcha e uma classe Vectra, cujo mesmo método aceite até a 5ª marcha. Certo? ;) Graymalkin

Mas, qual é o problema? Ele não acha o registro? Se for, pode ser porque você não está usando o curinga (%) para procurar strings contidas em outras: Rs.Open "SELECT * FROM cliente WHERE cliente_nome LIKE '%" & var & "%'", Co, adOpenStatic, adLockOptimistic Tente com a linha acima e veja se dá certo. Abraços, Graymalkin

No 23, a leitura dentro do loop deveria estar no final do mesmo, já que do contrário o primeiro valor lido (aquele fora do loop) não será usado. E, no 28 você não está usando o vetor criado. Você o declarou corretamente... v : vetor[100] de real ... mas não o utilizou no código. Se o problema for que você não sabe lidar com vetores, veja como seria o 28 e você entenderá como fazer os demais: algoritmo "Conj de 100 numeros" var v: vetor[100] de real media : real i, somatorio : inteiro qt30, qtmenormedia, qtigualmedia : inteiro inicio para i de 1 até 100 faça escreva("Digite o ", i, "º valor:") leia(v[i]) somatorio <- somatorio + v[i] fimpara media = somatorio/100 para i de 1 até 100 faça se v[i]<media então qtmenormedia <- qtmenormedia + 1 senão se v[i]=media então qtigualmedia <- qtigualmedia + 1 senão se v[i]=30 então qt30 <- qt30 + 1 fimse fimpara escreva("Quantidade de valores iguais a 30 == ", qt30) escreva("Quantidade de valoers menores que a media == ", qtmenormedia) escreva("Quantidade de valores iguais a media == ", qtigualmedia) fimalgoritmo Certo? ;) Graymalkin

Nenhuma, é a mesma coisa. Você pode colocar a notação de vetor ([]) tanto no tipo quanto no nome do objeto. Abraços, Graymalkin

Já experimentou acrescentar um chr(0) no final da string enviada pelo VB. Não sei se é exatamente isto que falta, mas não custa tentar. Abraços, Graymalkin

É só criar um vetor cujos índices são os meses e cujos valores são as quantidades de dias do mês. E, em relação a ser bissexto ou não, basta verificar se é exata a divisão do ano por 4 (neste caso somaria-se 1 ao mês de fevereiro). Abraços, Graymalkin

"Autoclick"? :huh: O que exatamente você precisa fazer? Graymalkin

Clique com o botão direito sobre o banco de dados e escolha a opção Backup. Abraços, Graymalkin

Mas... você nem ao menos tentou? Nem ao menos sabe que "/" serve para dividir e que "%" serve para retornar o resto de uma divisão? Se você tivesse procurado a respeito destes operadores a utilização seria bastante óbvia: #include <stdlib.h> #include <stdio.h> int main() { int valor = 3025; int doisprimeiros, doisultimos; doisprimeiros = valor / 100; doisultimos = valor % 100; printf("%i\n", doisprimeiros); printf("%i\n", doisultimos); system("pause"); } Certo? ;) Graymalkin

Bom, eu nunca tinha visto este erro antes. Então, fiz uma busca no Google que me revelou os seguintes links: http://www.qksoft.com/qk-smtp-server/socket-error-10055.html http://kbase.pscs.co.uk/index.php?article=93 http://forums.globalscape.com/tm.aspx?m=3017 Dê uma lida particularmente no último, onde o caboclo achou uma solução para o problema no caso dele. Abraços, Graymalkin

Você está usando o PgAdmin III? Abraços, Graymalkin

Eu tentei antes, mas na conexão ado não tem findfirst... Ops... eu que falei errado. É Find e não FindFirst. Com este funcionou? Abraços, Graymalkin

Então você está fazendo tudo sincronamente. *Acredito* que o funcionamento do seu programa deve ficar mais leve se você fizer as coisas assincronamente. Mas, também vai exigir que você mude várias coisas aí. Sugiro a você dar uma pesquisada sobre como funcionam estes métodos assíncronos (que começam com "Begin" e "End"). Abraços, Graymalkin

Parece que não, de acordo com isso: Retirado daqui: http://msdn2.microsoft.com/en-us/library/a...509(VS.71).aspx Ah, é uma boa dar lida neste texto, já que ele ilustra algumas das vantagens do VB.NET sobre C# e outras linguagens .NET. Abraços, Graymalkin

Use o FindFirst ao invés do Seek. Eu sempre usei o primeiro e nunca tive problemas. Abraços, Graymalkin

Você usa métodos que começam com "Begin" e "End"? (Como o BeginAcceptSocket(), por exemplo). Abraços, Graymalkin

Use a função InStr(). Ela te retorna a posição de uma string em outra. Abraços, Graymalkin