-
Total de itens
8.257 -
Registro em
-
Última visita
Tudo que Graymalkin postou
-
Dá uma olhada nesse post: http://scriptbrasil.com.br/forum/index.php...ic=3255&hl=beos Abraços, Graymalkin
-
Segue um exemplo: Dim item As ListItem ListView1.View = lvwReport ListView1.ColumnHeaders.Add , , "Coluna1" ListView1.ColumnHeaders.Add , , "Coluna2" Set item = ListView1.ListItems.Add(, , "Carlos Moura") item.SubItems(1) = "Estudante" Set item = ListView1.ListItems.Add(, , "Einstein") item.SubItems(1) = "Professor" Abraços, Graymalkin
-
Nem todas as propriedades podem ser alteradas em tempo de execução. A propriedade ScrollBars, por exemplo, é uma delas. Se você tentar alterá-la em tempo de execução verá uma mensagem de erro informando que a mesma é Read-Only (Somente Leitura). Abraços, Graymalkin
-
Não, a ordem não está errada. Estaria errada se ela fosse contrária ao que diz o algoritmo, o que não é o caso. Mas, bem complicadinho esse seu esquema, hein? A idéia de agrupar todos eles eu até compreendo (e encorajo isso), mas já essa de definir a ordem acho meio desnecessária. Vou tentar pensar em algo para resolver isso, mas não garanto nada. Abraços, Graymalkin
-
Mas, se ela está vazia como você quer organizar? O primeiro item que aparecerá na ListBox será qualquer um deles. Após inserir as quatro posições (uma de cada) é que ela passará a ficar organizada a medida que você adiciona as demais. Abraços, Graymalkin
-
Dá uma lida aqui: http://vbworld.no-ip.com/vb/tutoriais/socks/socks.html Abraços, Graymalkin
-
Verifique se ela está vazia pela propriedade ListCount, e caso positivo faça a inserção normal, caso contrário faça a inserção pelo método acima. Abraços, Graymalkin
-
A propósito, o que você quer fazer pode ser feito da seguinte maneira: CommonDialog1.Flags = cdlCCRGBInit CommonDialog1.Color = Me.BackColor CommonDialog1.ShowColor Me.BackColor = CommonDialog1.Color Abraços, Graymalkin
-
Acredito que para isso que você quer nem seja necessário lançar mão do uso de automação com o Outlook. Dê uma olhada nos controles MAPI e veja se eles atendem a sua necessidade. Abraços, Graymalkin
-
Segue um exemplo, incompleto é claro (já que não sei os nomes dos seus optionbuttons e nem como você está formatando o nome do jogador e sua posição ao inserir). Veja (delimitei com ** os lugares onde você deve completar com seu código): Dim item As String posição = ** nessa variável deve entrar o texto da OptionButton escolhida ("Goleiro", "Atacante", "Zagueiro" ou "Meio") ** For i = 0 To List1.ListCount - 1 item = List1.List(i) pos = InStr(1, item, " ") positem = Trim(Mid(item, pos + 1, Len(item) - pos)) If positem = posição Then ultimo = i End If Next i List1.AddItem ** nome do novo jogador e sua posição **, ultimo + 1 (Repare que na explicação abaixo as variáveis estão em itálico para não ter confusão) Esse exemplo acima percorre todos os itens da listbox verificando se a posição (positem) é igual a posição escolhida (posição). Caso positivo, a variável ultimo é atualizada com a posição (linha) do item. Quando o loop tiver terminado a variável ultimo estará com a posição (linha) da listbox em que apareceu pela última vez a posição. Abraços, Graymalkin
-
Se os comentários anteriores tinham o mesmo teor deste, não sei porque se preocupar. Pois, como já disse, não vi nada demais nesse comentário. Abraços, Graymalkin
-
ficou fácil de entender cara...muito bem... Realmente... Bem limitada mesmo ! Será que ele falou em ASP ? hehehehhe Abraços, William Rodrigues Não... falei do VBScript mesmo, que é uma das linguagens que podem ser usadas em ASP. Abraços, Graymalkin
-
Tu é muito folgado mas quero ver tu dar respostas e não ficar zuando!!!!! Talvez eu esteja errado, mas considero esse "embaçado" como um sinônimo de "complicado". Portanto, trata-se apenas de um comentário simples, sem qualquer outra conotação. Abraços, Graymalkin
-
O problema é que a "função" do jogador é uma abstração que só você tem; para a listbox não importa o que está escrito em cada linha (e os elementos dela só existem em linhas e classificados por linhas). No entanto, isso não é, de fato, um problema. Você pode muito bem percorrer todos os itens da listbox procurando pela "função" e pegar a posição imediatamente posterior à última encontrada linha, cuja a "função" foi encontrada, e inserir o elemento. Em todo o caso você terá sempre que trabalhar com os índices das linhas, mesmo que queira inserir um elemento após outro baseando-se no texto (que é o mesmo que inserir um elemento na posição posterior à posição do elemento procurado). Isso é o que você deve compreender: você fala em "funções", em conteúdos das linhas, mas a listbox só entende os índices das linhas. Portanto, cabe a você criar uma maneira de "traduzir" uma coisa para a outra de forma transparente. Ou seja, tanto faz se você quer chamar a linha de "zagueiro" ou "atacante", o importante é que você se referencie a mesma de acordo com seu índice do elemento. Com tudo que já foi passado aqui é possível fazer o que você quer. Tente aí, e se não conseguir poste aqui a sua tentativa e eu tento ajudar-lhe. Abraços, Graymalkin
-
Ah, isso aí eu não sei se é possível (somente utilizando o CommonDialog). Abraços, Graymalkin
-
Bem, a parte de gravar o arquivo já foi explicada no post do amigo Promotor Advanced, então creio que só ficou a dúvida sobre como abrir o navegador com o endereço. Uma maneira de se fazer isso é utilizando a função Shell(). Exemplo: Shell "explorer http://127.0.0.1/arquivo.php" ok? Graymalkin
-
Na verdade, se fosse sem a parte visual o VBScript seria bem mais funcional do que é. O VBScript é uma versão bem limitada da linguagem (ela pode ser mais expansível, se você utilizar componentes que cria no VB ou em qualquer outra linguagem com suporte a COM). O principal intuito dessa linguagem é a utilização na programação de páginas dinâmicas. Abraços, Graymalkin
-
Porém, agora você já sabe que se precisar criar uma função e/ou rotina que deverá ser usada por vários forms (sem que fique presa a um determinado form) poderá usar um módulo. Com o tempo você verá a beleza e a funcionalidade disso. Abraços, Graymalkin
-
Como Faço Pra Utilizar O Cdonts(asp) No Vb ?
pergunta respondeu ao fernando_nagai de Graymalkin em Visual Basic
Já que se trata de um componente ActiveX, acredito que será da mesma forma. Porém, nunca tentei fazê-lo. Acredito que a única diferença é que a função CreateObject() não está no objeto Server (basta usá-la sem objeto algum, como qualquer outra função embutida). Abraços, Graymalkin -
Uahaha!! Aê, William, arrasando corações!!! Graymalkin
-
VB.net é a versão mais nova do VB (posterior a 6.0). Tem mais recursos e algumas diferenças, mas, na minha opinião, ainda não está tão popular quanto a versão 6.0. Abraços, Graymalkin
-
Nossa... você cercou os módulos de perguntas altamente filosóficas! Hehehe. Brincadeira, mas na verdade "módulos" são apenas conjuntos de códigos agrupados. Necessários realmente? Não. Todas as funções e rotinas que você pode colocar em um módulo podem ser colocadas em um form também. A diferença é que um módulo acaba se tornando um lugar mais apropriado para se criar funções e/ou rotinas que podem ser acessadas pelo programa todo. Para criar um módulo vá no menu Project e clique em Add Module. Veja que um módulo será apenas uma janela vazia (em branco) para que você escreva ali suas rotinas/funções/variáveis/etc. Abraços, Graymalkin
-
Os componentes HScrollbar e VScrollbar não são usados em conjunto com a textbox. Para ter barras de rolagem na textbox basta alterar a sua propriedade ScrollBar para um dos valores possíveis. Abraços, Graymalkin
-
Para o tamanho da TextBox dê uma olhada nas propriedades Width e Height da mesma, e no evento Resize do form. Em relação a fonte da letra, a TextBox não permite isso; a fonte escolhida vale para todo o texto. No entanto, você pode usar a RichTextBox (marque-a na opção Components do menu Project) para isso. Abraços, Graymalkin
-
Imagine que você tem 4 itens na listbox e quer inserir um novo item na terceira posição(terceira linha). Lembrando que os índices dos itens começam do 0, você faria: List1.AddItem "novo item", 2 Isso porque 2 é o terceiro item (0, 1, 2). Agora se você quer inserir um item abaixo do item que está atualmente selecionado basta saber qual é o índice do mesmo e somar +1. Podemos comprovar qual o índice do item selecionado verificando a propriedade ListIndex. Um exemplo: Msgbox List1.ListIndex Marque qualquer item e use o código acima para ver o índice do item marcado. Resumindo tudo agora, o código que você quer é: List1.AddItem "novo item", List1.Index+1 Entendido? Abraços, Graymalkin