Graymalkin

Ao invés de... lstEscolha.Caption = lstListaPorModelo.Text ... não seria... lstEscolha.AddItem ListaPorModelo.List(Item) ...? Abraços, Graymalkin

Crie o objeto como um membro público da classe, ou seja: Public Class Main Public escrever As Escrever Public Sub New() escrever = New Escrever() End Sub Public Sub Imprimir() Console.WriteLine(Me.escrever.texto) End Sub End Class Daí você pode fazer: Dim x as New Main() x.escrever.texto = "teste" x.Imprimir() Certo? ;) Graymalkin

Veja um exemplo com uma fila: Dim máximo As Integer = 10 Dim fila As New Queue(Of Integer)(máximo) Dim retirado As Integer For i As Integer = 1 To 15 If fila.Count = máximo Then retirado = fila.Dequeue() Debug.Print("Retirado: " & retirado) End If fila.Enqueue(i) Debug.Print("Incluído:" & i) Next Certo? ;) Graymalkin

Como assim? Você pode dar um exemplo? Abraços, Graymalkin

No Explorer vá no menu Ferramentas -> Opções de pasta... -> Modo de exibição -> Pastas e arquivos ocultos -> Mostrar pastas e arquivos ocultos. Abraços, Graymalkin

É, tentei aqui também e o comportamento é estranho. O PageUnit Display, pela descrição, seria a mesma coisa que o Pixel, tanto que ambos até retornam o mesmo tamanho. Porém, quando não se especifica o tamanho da imagem a ser desenhada ela fica três vezes menor (pelo menos no teste que fiz aqui). Já quando ela é desenhada no tamanho original aí sim o YPos fica na posição certa. Ou seja, se você fizer... Dim PUWidth As Integer = _Image.Width Dim PUHeight As Integer = _Image.Height e.Graphics.DrawImage(_Image, XPos, YPos, PUWidth, PUHeight) YPos += PUHeight ... o YPos será posicionado corretamente. Porém, a imagem será desenhada em seu tamanho original. Abraços, Graymalkin

É, porém em alguns casos a dinamicidade proporcionada compensa isso. Se existir bastante código comum entre as duas classes (ou seja, métodos em que não exista diferença no código de uma classe para outra), então prefira a primeira opção. Já se este não for o caso (ou seja, se as classes são completamente diferentes) então você pode usar uma interface. A interface é como um "esqueleto" da classe, nela você define quais métodos e propriedades a sua classe deverá implementar. Exemplo: Public Interface IConexão Function Abrir() As Boolean Function AbrirTabela() As DataTable Sub Fechar() End Interface Daí ao fazer... Public Class MySql Implements IConexão ... já serão gerados os métodos a serem implementados. Certo? ;) Graymalkin

Se a intenção é mostrar a quantidade de registros você pode fazer diretamente um SELECT COUNT. Abraços, Graymalkin

A RichTextBox em si não tem mistério nenhum, é como uma caixa de texto normal. Agora sobre o formato RTF (que é o que permite a formatação) você pode procurar no Google (foi onde eu procurei quando estava fazendo experiências para formatar códigos). Abraços, Graymalkin

Dê uma olhada no método TransferSpreadsheet do objeto DoCmd. Abraços, Graymalkin

Isso é em ASP.NET? De qualquer maneira, não bastaria passar o DataSet para o local desejado? Abraços, Graymalkin

Acho que o que você quer pode ser obtido através do método Copy do objeto Array: Dim a() As Integer = {1, 2, 3} Array.Copy(a, 1, a, 0, a.Length - 1) a(2) = 4 Mas, não seria melhor usar uma fila (queue)? Abraços, Graymalkin

Sim, tá meio grande mesmo. Veja uma forma mais simples e clara: Dim pastaOrigem As String = "c:\temp" Dim pastaDestino As String = "d:\temp" Dim origem, destino As String Dim arquivos() As String arquivos = IO.Directory.GetFiles(pastaOrigem) For Each origem In arquivos destino = IO.Path.Combine(pastaDestino, IO.Path.GetFileName(origem)) IO.File.Copy(origem, destino, True) Next Só não coloquei um tratamento de erro, mas bastaria um Try... Catch na penúltima linha. Abraços, Graymalkin

Use IO.Directory.GetFiles() para obter todos os arquivos de um diretório e depois é só usar a lógica que você já tem. Abraços, Graymalkin

Você quer dizer algo assim... Dim vetor() As String vetor = Split("A;M;A;R;E;L;O", ";") For Each caracter In vetor MsgBox caracter Next ...? Abraços, Graymalkin

Sim, isso é só mesmo para ASP.NET. Para Windows Forms é diferente. É do mesmo jeito. A propriedade padrão Item do objeto Request pega tanto um (campos do form) quanto outro (quey-string). Abraços, Graymalkin

Use o objeto Request: valor = Request("variável") Abraços, Graymalkin

Basicamente é fazer... rs.Requery set DataGrid1.DataSource = rs DataGrid1.Refresh ... após atualizar um registro. Onde "rs" é o ADODB.Recordset. Abraços, Graymalkin

Quando você faz um backup pelo PgAdmin III ele te mostra a linha de comando utilizada, então acho que bastaria você mandar executá-la diariamente no Agendador de Tarefas do Windows. Não testei, mas deve funcionar. Abraços, Graymalkin

Mas, o normal é realmente você instalar o SQL Server a parte, já que ele é um produto independente e para o mesmo deve ser adquirido uma licença de utilização. Transportar só o banco seria fácil já que bastaria você fazer um backup dele e depois restaurar durante a instalação (não sei no SQL Server, mas no PostgreSQL existem ferramentas para isso). Agora, o servidor em si deveria ser instalado e configurado de forma independente, até porque você não pode distribuí-lo junto com o seu programa (pelo menos não a versão comercial). Abraços, Graymalkin

Mas, quantos controles existem neste form? Abraços, Graymalkin

Use Val() ao invés de CSng() já que Val("") = 0. Abraços, Graymalkin

Sim, são dois sublinhados mesmo. Agora, não estaria faltando a identação no código? Abraços, Graymalkin

Mas, aparece alguma mensagem de erro? Abraços, Graymalkin

Use o método Requery do ADODB.Recordset conectado a DataGrid. Abraços, Graymalkin