Graymalkin

Bom, pra começar você precisa saber como ler a informação do banco e também do arquivo XML. Para ambas as coisas, vale a pena dar uma procurada aqui no fórum mesmo. Abraços, Graymalkin

Se a informação for numérica bastaria percorrer as caixas de texto, acumulando seus valores em um objeto qualquer (List, ArrayList, etc.) e no caso de uma caixa vazia (cx.Text.Length=0) definir o valor 0 para tal acumulação. Abraços, Graymalkin

Use o método IndexOf da string para procurar por uma substring específica, ou seja, a linha... If line.Substring(0) = busca1 Then ... iria ser: If line.IndexOf(busca1)>=0 Then Certo? ;) Abraços, Graymalkin

Bom, não uso ASP.NET, por isso posso até estar falando besteira, mas está certo ter... Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click ... e também... <asp:Button id="Button2" onclick="Button1_Click" runat="server" Width="550px" Text="Cadastrar Imovel"></asp:Button> ...? No caso, ambos os códigos fazem chamar a sub, então talvez ela esteja sendo executada duas vezes... então, já experimentou retirar um deles? (no caso do primeiro seria só retirar o Handles Button2.Click - para fins de teste seria o mais aconselhável). Abraços, Graymalkin

Sim, você poderia usar essa sub perfeitamente. Abraços, Graymalkin

O tipo do campo é realmente data? Abraços, Graymalkin

Eu costumo fazer isso com objetos. No caso, crio uma classe como essa abaixo: Public Class ItemPedido Private _código As Integer Private _preço As Decimal Private _quantidade As Integer Public Property Código() As Integer Get Return _código End Get Set(ByVal value As Integer) _código = value End Set End Property Public Property Preço() As Decimal Get Return _preço End Get Set(ByVal value As Decimal) _preço = value End Set End Property Public Property Quantidade() As Integer Get Return _quantidade End Get Set(ByVal value As Integer) _quantidade = value End Set End Property Public ReadOnly Property Total() As Decimal Get Return Me.Preço * Me.Quantidade End Get End Property End Class Daí, podemos preencher a grade assim: Dim lista As New List(Of ItemPedido)() For i As Integer = 1 To 5 lista.Add(New ItemPedido()) Next Grade.DataSource = lista Além disso, no evento CellEndEdit da DataGridView, que é executado ao finalizar a edição de uma célula, colocamos o seguinte: Dim propriedade As String = Grade.Columns(e.ColumnIndex).DataPropertyName If propriedade = "Quantidade" OrElse propriedade = "Preço" Then Grade.Refresh() End If O código acima faz com a grade seja atualizada ao terminarmos de editar um valor das colunas Quantidade e Preço. Certo? ;) Graymalkin

É, só que você não pode fazer assim, pelo menos não do jeito que você está criando a janela. Veja que ao fazer... Dim frm As New Form2 frm.MdiParent = Me frm.Show() ... você está criando uma nova instância da classe Form2. Essa nova instância está sendo referenciada através do nome "frm", referência esta que por estar dentro de uma sub só vai existir ali dentro. Ou seja, se você fizesse... frm.Label1.Text = "texto" ... você teria o efeito desejado, porém não vai funcionar porque o "frm" é variável local da rotina. Então, algumas possíveis soluções são: 1) usar as instâncias padrões dos forms, sem criar novas; 2) passar a referência de uma janela para outra. A primeira solução é a mais simples, ou seja, ao invés de usar... Dim frm As New Form2 frm.MdiParent = Me frm.Show() ... você vai usar o seguinte para abrir a janela: Form2.MdiParent = Me Form2.Show() O mesmo será feito para abrir o Form3 a partir do Form2: Form3.MdiParent = Me.MdiParent Form3.Show() Depois, o código que entrará botão do Form3 para preencher a label do Form2 será apenas: Form2.Label1.Text = Me.TextBox1.Text E pronto, vai funcionar como você quer. Porém, o problema desse modo é que você não tem como abrir várias janelas do Form2 e várias do Form3, uma vez que não estará criando instâncias, e sim usando a instância padrão da classe. Já a segunda maneira permitirá isso, então a primeira coisa a se fazer é criar uma campo público na classe Form3: Public SegundoForm As Form2 Daí, o código para abrir o Form2 a partir do MDI será o mesmo do seu primeiro post. A diferença será no código que abre um Form3 a partir de um Form2: Dim j As New Form3() j.MdiParent = Me.MdiParent j.SegundoForm = Me j.Show() Note que ali preenchemos o campo público "SegundoForm" da instância. Com isso, no Form3, o botão que preencherá a label terá o seguinte: SegundoForm.Label1.Text = Me.TextBox1.Text E pronto! Agora você pode ter múltiplas instâncias de ambos os forms e ainda assim continuar preenchendo a label a partir de outra janela. Certo? ;) Abraços, Graymalkin

Os nomes dos campos estão todos certos? E em qual linha ocorre o erro? Abraços, Graymalkin

Como está o código do botão (que deveria preencher a label do form)? Abraços, Graymalkin

Na verdade ele executa na ordem. O problema é que você não deve estar dando chance para ele redesenhar a tela, ou o processo está ocorrendo muito rápido. Experimente colocar Application.DoEvents() após alterar o valor da barra de progresso e após alterar o texto da label e veja se tem o efeito desejado. Abraços, Graymalkin

Sua dúvida é de VBA (Access) ou de Visual Basic .NET? Se for de VB.NET, veja este tópico: http://scriptbrasil.com.br/forum/index.php?showtopic=116301 Se não for de VB.NET, então você postou no local errado. Abraços, Graymalkin

O básico para isso é abrir o arquivo para leitura e ler o conteúdo dele, procurando o texto desejado. Se o seu arquivo for pequeno, você pode usar o código abaixo: Dim f As New IO.StreamReader("c:\arquivo.txt") Dim conteúdo As String Dim pos As Integer conteúdo = f.ReadToEnd() f.Close() pos = conteúdo.IndexOf("O quê procurar!") If pos >= 0 Then MessageBox.Show("Texto encontrado na posição: " & pos) Else MessageBox.Show("Texto não encontrado!") End If Já se for um arquivo grande é recomendável que você não use o método ReadToEnd (que lê o arquivo todo), mas sim ir lendo linha a linha até achar o dado desejado. Para isso existe o método ReadLine(). Certo? ;) Graymalkin

Seria algo assim: Try textbox3.text = (Integer.Parse(textbox1.text) + Integer.Parse(textbox2.text)).ToString() Catch ex As Exception MessageBox.Show("Ocorreu um erro: " & ex.ToString()) End Try Isso supondo que você vá colocar inteiros nas caixas de textos. Abraços, Graymalkin

Em qual linha dá o erro? Abraços, Graymalkin

Entendi, só que programas compilados não retêm os nomes das variáveis, então no caso você teria é que alterar os dados de uma determinada posição da memória, mas não sei informar como você faria isso. Agora, se o outro programa for seu também, você pode fazer algo semelhante usando a XComm: http://www.graymalkinsoftware.net/gspaginas.php?page=XComm Abraços, Graymalkin

Não existem mais arrays de controles no VB.NET, por isso não pode existir aquele parâmetro Index. Veja estes tópicos: http://scriptbrasil.com.br/forum/index.php?showtopic=53280 http://scriptbrasil.com.br/forum/index.php?showtopic=74494 Abraços, Graymalkin

Simples, usando a Py.Sendmail: http://www.graymalkinsoftware.net/gspagina...age=Py.Sendmail Abraços, Graymalkin

Existem várias maneiras de se fazer isso. Uma delas é usando a função Split(), que divide uma string por um caracter delimitador. Uma outra maneira é procurando a posição do caracter "=" na string e depois obter uma substring (uma parte da string) até a determinada posição. Um exemplo dessa segunda maneira: s = "Maria=34" pos = InStr(1, s, "=") MsgBox Left(s, pos) Certo? ;) Graymalkin

Você precisa guardar essa informação (marcado ou não) em algum lugar a fim de poder restaurar o estado da checkbox futuramente. Existem várias maneiras de se guardar isso, como usando um banco de dados, um arquivo texto ou o Registro do Windows. Acho que esse último é o mais simples e rápido se essa informação não for tão importante, portanto recomendo a você dar uma olhada na rotina SaveSetting e na função GetSetting() (acho que aqui no fórum mesmo você encontrará exemplos). Abraços, Graymalkin

Bom, eu tenho um aqui que está em Arquivos de programas\Microsoft Visual Studio 8\você\PlatformSDK\Include. Você pode baixá-lo aqui: http://www.graymalkinsoftware.net/stuff/mmsystem.rar Veja se te ajuda. Abraços, Graymalkin

Qual é o banco? Geralmente datas são passadas entre jogo da velha (#) ou como strings ('entre aspas simples'). Abraços, Graymalkin

O quê, exatamente, você quer fazer? Dê mais detalhes. Abraços, Graymalkin

Não saco de javascript, mas creio que você vá ter aí nesse objeto document um método chamado getElementsByTagName que te retornará todos os elementos da página a partir de uma tag específica que você informará (no caso, input). De posse dessa coleção creio que baste você percorrer fazendo um procedimento semelhante ao do seu exemplo. Abraços, Graymalkin

Que eu saiba não tem como fazer isso assim não. Para tal eu percorro os itens da combo procurando pelo valor desejado. O problema no caso é que colocamos objetos dentro da combo e não valores simples, portanto ficaria difícil determinar como a combo buscaria esse tipo de objeto dentro dos itens. Abraços, Graymalkin