
Andersonjb
Veteranos-
Total de itens
580 -
Registro em
-
Última visita
Tudo que Andersonjb postou
-
Como assim o Software não acha as DLL's na pasta? De que forma você as estão procurando?
-
Bem, mas mesmo ele usando somente um caracter, funcionou em outra parte do programa. Bem, lá vai o código da função: Public Function contaletras(ByVal texto As String) Dim script As String = texto Dim linhas() As String = script.Split(vbCrLf) Dim ul As Integer = linhas.IndexOf(linhas, vbCrLf) + 1 Dim tl As Integer If ul = 0 And linhas.Length > 1 Then tl = 0 Else tl = linhas.Length + 1 End If Dim tcnr As Integer Dim tcom As Integer Dim cc As Integer Dim legal As String Dim bufferom As String Dim buffernr As String For k As Integer = 0 To script.Length If k < script.Length Then legal = (script.Substring(k, 1)) End If If k < (script.Length - 3) Then buffernr = script.Substring(k, 2) bufferom = script.Substring(k, 4) If buffernr = "[$" Then tcnr = tcnr + 4 End If If bufferom = "[OM]" Then tcom = tcom + 4 End If End If Next Dim total As Integer = texto.Length total = total - tcnr - tcom - tl - cc Return total End Function Fiz meleca ou está tudo certo?
-
Opa, Gray, foi util sim, mas resolveu somente parte do meu problema. Bem, dá so uma olhada: O método Split separa as strings pelo caracter passado pelo parametro, certo? Então, quer dizer que se o caracter passado pelo parametro for o vbCrlf, toda vez que eu pular linha no arquivo, uma string vai ser separada. Então digamos que eu tenha a seguinte string: Bem, eu pulei de linha duas vezes, isso representra 3 strings, e na matriz, ficaria assim: Bem, mas acontece que a matriz não fica assim, fica assim: Simplesmente, o arquivo não está dividindo. Bem, ai eu pensei, vou fazer o teste em separado. Fiz a mesma coisa e deu certo, então eu pensei: será que não é "aonde" eu estou declarando esse código? Bem, no teste eu declarei em um simples botão, e no original, eu estou declarando em uma função dentro de um módulo. Isso pode interferir nesse código?
-
Bem, e tem como burlar isso, por exemplo: se na string não tiver o caracter vbCrlf, ele não retornar nada?
-
Bem, mais se eu aumentar as letras, não vai ficar meio... desproporcional? E como assim muita sombra no Menu? E me desculpem, mais é que eu sou amador em desenvolvimento de design.
-
Bem, pessoal, gostaria que vocês dessem uma olhada no meu site e dessem suas opniões, criticas e sugestões. La vái o link: Anderson Torres valeu!
-
E ai pessoal, beleza? Bem, eu queria tirar uma duvida quanto ao método Split. Bem, o meu objetivo é encontrar o total de linhas de um arquivo. Ai eu uso o seguinte código: Dim script As String = texto Dim linhas() As String = script.Split(vbCrLf) Dim tl As Integer = linhas.Length Bem, acontece o seguinte: se eu tenho somente uma linha, sem o vbCrlf, ele indica que eu tenho uma linha. Mas como ele pode indicar isso se o arquivo não tem nenhum caracter vbCrlf, ou seja, eu não pulei linha?
-
É, ele tem um projeto para isso, mas sinceramente, nunca consegui mecher. Agora sobre funcionar sem instalador eu sei que funciona, só que eu queria deixar uma coisa mais bonitinha, entende?
-
Bem, pessoal, eu dei uma procurada por ai e não achei, e gostaria de saber se existe algum programa que crie um "Instalador" para as minhas aplicações, vocês conhecem algum? valeu!
-
Opa, agora deu certo Gray, mais la vai uma pergunta: a primeira coisa que eu suspeitei foi isso. E eu usei o Método Read() do BaseStream, mas simplesmente dava erro, e agora, com a sua ajuda, alcancei o meu objetivo com o Método ReadByte(). Bem, qual é a diferença entre o Método Read() e o Método ReadByte()?
-
Olha só, amigo, os links não estão pegando! Arruma ai pra gente tentar te ajudar. Se bem que, já antecipando minha opnião, linguagem de programação é praticamente a mesma coisa, só muda a sintaxe ou o modo de trabalhar com alguns algoritmos, classes, etc. Vai no que você gosta, independentemente da linguagem, se você for bom, vai alcançar o mesmo resultado.
-
De novo, problemas com arquivos binários, hehe. Bem pessoal, vamos ver se vocês me ajudam (principalmente o Gray, hehe). Bom, eu estou "girando" um arquivo bináriamente, contando posição por posição, e quando chega em uma posição determinada pelo usuário, ele pega esse dado e imprime em uma RichTextBox. Bem, como os dados são aleatórios, e podem ser vários, eu tenho que redirecionar o arquivo toda vez que retiro um dado, com este código: arquivojogo.BaseStream.Seek(k, IO.SeekOrigin.Begin) Bem, essa linha leva o arquivo a posição que eu quero, de acordo com a váriavel "k". Ai, eu pego o dado corrente da seguinte maneira: Dim a As String = arquivojogo.Read Bem, mas acontece é que quando eu "pulo" uma grande distância no arquivo, ao invés de os dados serem pegos a partir da posição que determinei, eles são pegos continuamente. Por exemplo: Determino para pegar os dados da posição 100 até a posição 103, e apos a 103, pegar os dados da posição 150 até 151. Ao invés do dado ficar assim: Ele fica assim: Entenderam? Bem, o arquivo está redirecionando certo, pois eu eu acompanho a posição pelo Debug e ele redireciona a posição, mas o erro está nessa linha: Dim a As String = arquivojogo.Read Pois, mesmo redirecionado, ele continua pegando dados sequenciamente do arquivo ao invés da posição que eu determinei, mesmo reposicionando o arquivo antes. Estou pegando esses dados de maneira correta?
-
Ah, agora deu certo, :D . Mas o problema e que isso fica totalmente visivel ao usuário, né? Não tem um jeito de fazer isso via código?
-
Pessoal, alguém sabe qual é a estrutura de um BITMAP? Como o arquivo é formado e etc?
-
Opa, valeu galera! Eu queria que vocês me respondessem duas perguntas bestas ai, é que e o mal da informática: eu sou um bom programador, mas falo em outra area, eu so rabisco, uhauha. Bem, la vão: O protocolo TCP/IP e usado em conexões de alta velocidade? Se sim, é somente ele ou podem ser utilizados outros protocolos? E outra, vejam este endereço? www.ajato.com.br Qual poderia ser considerado o correto de uma exemplificação do dominio: Desse Jeito: www.ajato.com.br Ou desse: ajato.com.br
-
Certeza, Gray? Você fala na propriedade Text da LinkLabel ou via código? Porque coloquei dessa maneira na mesma propriedade... "mailto:"table_pro@ig.com.br ... e não funcionou. Fiz coisa errada?
-
Pessoal, surgiu uma duvida aqui: se eu usar duas maquinas com o mesmo IP dentro de uma mesma rede, o que acontece, da Conflito ou funciona normalmente?
-
Bem, mas isso não funciona no caso pra mim abrir uma caixa para mandar um email. Como eu posso fazer isso, Gray? E outra: não é meio estranho esse tipo de coisa estar no NameSpace "Diagnostics"?
-
E o que eu coloco nesse evento? :blink:
-
Desktop, no VB.NET.
-
E ai pessoal, beleza? Bem, eu queria fazer uma coisa simples: Se uma condição for verdadeira, o Formulário é redimensionado, e se falsa, é mantido o tamanho original. Mas, eu não consegui redimensionar o formulário via código. Eu estou fazendo o seguinte para redimensionar: Me.Size.Width = 700 Eu estou errando na sintaxe ou na declaração dos objetos?
-
Putz, nem lembrava desse controle, Andréia, valeu! Mas olha só, so digitar o texto não basta, não é? Em qual propriedade eu defino o endereço que ele tem que apontar? Eu simplesmente coloquei o endereço na Label e ela não redirecionou.
-
Pessoal, me desculpa a pergunta besta, mas é que eu não achei no Forum e nenhuma propriedade. Vocês podem me dizer como eu posso ativar um Link em um Label?
-
Ai Gray, verifiquei bem e vi que só a restrição dos dois bytes funcionou, eheh! Valeeeeeeeew!!!
-
Tenho, eu edito o arquivo normalmente, inclusive o mesmo byte em um Editor Hexadecimal e o arquivo continua normal. Não entendi, o que é checksum?