Graymalkin

Para quê serve o SSPanel? Você não pode substituí-lo por um componente nativo? Abraços, Graymalkin

De fato, você não pode alterar (no sentido de remover ou incluir) uma coleção enquanto esta sendo percorrida, isso porque os índices são alterados. Neste caso, é mais apropriado usar um Do While. Abraços, Graymalkin

Veja um exemplo simples: Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing If MessageBox.Show("Deseja realmente sair?", Application.ProductName, MessageBoxButtons.YesNo, MessageBoxIcon.Question) = Windows.Forms.DialogResult.No Then e.Cancel = True End If End Sub Certo? ;) Graymalkin

Sim, você pode usar uma Label para mostrar o valor: Label1.Caption = "0" E pode somar +1 a este valor (no click do botão): Label1.Caption = Str(Val(Label1.Caption) + 1) E para salvar em um arquivo texto você pode usar a instrução Open: n = FreeFile() 'Obtém um número de arquivo livre Open "c:\arquivo.txt" For Output As #n 'Abre o arquivo para saída/gravação (output) com o número #n ? #, Label1.Caption 'Grava o valor no arquivo Close #n 'Fecha o arquivo Certo? ;) Graymalkin

Você pode tentar então o sucesso do Clipper, a xHarbour: http://www.xharbour.org/. Você poderá compilar tanto para Windows quanto para Linux. Outra ótima alternativa também, talvez até melhor que a primeira, é a linguagem Python: http://www.python.org/ Abraços, Graymalkin

Ao que parece o problema não está na string de conexão e sim em uma instrução SQL que está sendo executada. Qual é ela? Abraços, Graymalkin

Eu nunca fiz o teste, mas se você fizer... n = Freefile() Open "\\terminal1\epson" For Output As #n ? #n, "Linha1" ? #n, Chr(12) Close #n ... funciona? Se funcionar, você pode simplesmente abrir a janela de impressão para obter a impressora e depois só usar a porta ou o caminho dela. Abraços, Graymalkin

Ops... é FormClosing, e ele está nos eventos do form. Abraços, Graymalkin

Ao invés de Val() use CDbl() e veja se dá certo. Abraços, Graymalkin

Use Split() para dividir o texto para um vetor: v = Split(Text1.Text, vbCrLf) msgbox v(0) 'Primeira linha msgbox v(1) 'Segunda linha Abraços, Graymalkin

É só tirar o valor (deixar vazio) da propriedade Index do objeto. Abraços, Graymalkin

Mas "Windows Forms" é realmente .NET. Para um projeto Win32 você vai usar ATL ou MFC. Abraços, Graymalkin

Já tentou o evento Closing? Abraços, Graymalkin

A função Left(string, n) te retorna n caracteres a partir do lado esquerdo da string, exemplo: Msgbox Left("teste", 3) 'Vai mostrar "tes" A função CDbl() converte um valor qualquer (que geralmente é uma string) em um Double: n = CDbl("3,141516") Msgbox n+1 Quanto ao erro 13, provavelmente o problema é a comparação ou atribuição entre tipos diferentes. Verifique separadamente os valores de cada elemento da expressão. Abraços, Graymalkin

Não é só fazer uma consulta do tipo... SELECT * FROM equipamentos WHERE códcliente=1 ...? Onde, obviamente, no lugar do 1 vai entrar o código do cliente selecionado. Abraços, Graymalkin

Por que você não fecha simplesmente com... f.Close() ...? Sendo que "f" precisa estar declarado em um escopo visível aos dois procedimentos (de abrir e fechar). Abraços, Graymalkin

Já existem tópicos sobre isso. Utilize a busca do fórum. Abraços, Graymalkin

A *primeira* coisa que você deve saber é como se descobre se um número é primo ou não. Depois disso você vai se preocupar em *como* fazer. Uma forma simples de se fazer é testar a divisão do número por todos os primos anteriores menores que a raíz quadrada do número. Se ele não for divisível por nenhum deles, então ele é primo. Obviamente isso não vale para o 2, que é o primeiro primo (e curiosamente também é o único que é par). E também não existe primo menor que a raíz quadrada de 3 (que é o segundo primo), portanto os dois primeiros você já tem pré-fixados. Agora, alguma base para você trabalhar: * use o operador Mod para saber se o número é divisível ou não. Ele retorna o resto (Modulus) da operação, portanto se for 0 é porque é divisível; * use a função Math.Sqrt() para determinar a raíz quadrada de um valor; Qualquer dúvida, 'stamos aí. Abraços, Graymalkin

é...tem razão... mas eu consultei o valor com as msgbox igual ao seu exemplo..e retornou false... ele tem que ser verdadeiro... Isso porque deve estar faltando chamar o método Edit em algum momento antes. Você não faria nada quando fosse edição, mas sim somente quando fosse uma inserção. Seria algo assim: edição = Nome_do_Datacontrol.Recordset.EditMode Nome_do_Datacontrol.Recordset.Update 'Grava o registro (tanto em uma inserção quanto em uma edição) If Not edição Then 'Se não estava em modo de edição Nome_do_Datacontrol.Recordset.MoveLast Endif Note que o If só vai ser executado se edição for falso, ou seja, somente se o registro não estava sendo editado. Abraços, Graymalkin

Como está a declaração das classes? O construtor é um método com o mesmo nome da classe: public class PessoaFisica { public PessoaFisica() // Método construtor { } } Nele você pode, por exemplo, inicializar variáveis de instância com base em valores padrões ou por meio de parâmetros passados. Abraços, Graymalkin

A maioria dos hosts não permite conexões externas, então provavelmente não vai funcionar. Mas, você pode conversar com eles para ver se há possibilidade de liberar o acesso. Abraços, Graymalkin

Filhote, o que é o histórico e os favoritos? Não passam de listas de endereços... então, você pode usar uma combobox ou uma listbox para exibir estes endereços. E onde você vai guardar os endereços para depois resgatá-los? Leia o meu post anterior! Graymalkin

Do modo como estou fazendo, seria assim que teria que usar o EditMode?: Nome_do_Datacontrol.Recordset.EditMode ???? Não, EditMode é uma propriedade e *não* um método. Você tem que consultar o seu valor, que será True (verdadeiro) ou False (falso). Exemplo: If Nome_do_Datacontrol.Recordset.EditMode Then Msgbox "Está em edição!" Else Msgbox "Não está em edição!" Endif Certo? ;) Graymalkin

Você herdou as propriedades de uma textbox no seu controle ou você está usando uma caixa de texto contida nele? Se for o segundo caso, não sei quanto a Web Forms, mas em Windows Forms realmente acho que não funcionaria. Abraços, Graymalkin

Vou colocar na sala de Tutorias & Dicas, mas vale lembrar que a função TimeSerial() do próprio VB já faz esse trabalho. Abraços, Graymalkin