Graymalkin

Aqui tem uma lista dos valores: http://msdn.microsoft.com/library/en-us/wm...erplaystate.asp Abraços, Graymalkin

Quais os campos de cada tabela e de quais você precisa no resultado final? Posta aí que fica melhor de montar a SQL pra ti. Abraços, Graymalkin

Ah sim, perdão. Não tinha entendido o que você queria. Mas, então, é só fazer: Dim dados() quantidade = 0 With rsDesconectado .MoveFirst Do While Not .EOF ReDim v(.Fields.Count - 1) qt = 0 For Each f In .Fields v(qt) = f.Value qt = qt + 1 Next f ReDim Preserve dados(quantidade) dados(quantidade) = v quantidade = quantidade + 1 .MoveNext Loop End With No lugar de "Set MSHFlexGrid1.DataSource = rsDesconectado" e você terá a matriz dados preenchida (igual ao segundo exemplo do meu outro post). Abraços, Graymalkin

Dê uma olhada neste post: http://scriptbrasil.com.br/forum/index.php...977&hl=playlist Sempre faça uma busca antes de postar, ok? Abraços, Graymalkin

Utilizando o MySQL Connector/Net consegui fazer a conexão da seguinte maneira (e ainda abrir uma tabela para preencher um DataSet): Dim cn As New MySqlConnection("server=127.0.0.1;uid=root;pwd=1234;database=teste") Dim ds As New DataSet() Try cn.Open() Catch erro As MySqlException MsgBox(erro.ToString()) Exit Sub End Try Dim da As New MySqlDataAdapter("SELECT * FROM cadastro", cn) da.Fill(ds) Note que a partir daí é só você trabalhar com o DataSet (ds) normalmente (como faria com qualquer outro banco). Ah, e lembre-se de importar o namespace MySql.Data.MySqlClient. Certo? Abraços, Graymalkin

Você pode utilizar uma Query para realizar essa consulta e jogar o resultado na grade. Não? Abraços, Graymalkin

Os componentes que devem estar marcados ficam definidos no arquivo de projeto (o arquivo .vbp). Naquela janela inicial do VB, na qual ele te pede para escolher o tipo de projeto (Standard EXE, ActiveX DLL, ActiveX EXE, etc.), você pode adicionar um projeto próprio seu ali. Nesse projeto você já deixaria marcados todos os componentes que deseja e sempre poderia se basear a partir dele. Para tal, crie um projeto vazio (Standard EXE), adicione as referências e componentes desejados, depois salve-o na pasta: Arquivos de programas\Microsoft Visual Studio\VB98\Template\Projects. Ao fechar e abrir o VB você verá que o seu "modelo" de projeto estará agora figurando na lista de opções disponíveis. Abraços, Graymalkin

Troque o 3.51 por 4.0 na string de conexão e veja se dá certo. Abraços, Graymalkin

Existem diversas maneiras de se comportar os dados apresentados em um vetor ou em uma matriz. Seguem duas maneiras, sendo a primeira utilizando um tipo definido pelo usuário (Registro) e um vetor; a segunda já cria um vetor de vetores (o que pode ser considerada uma matriz): 'No General Declarations do Form (ou em um módulo, trocando o "Private" por "Public") Private Type Registro Time As String Pontos As Integer SaldoGols As Integer End Type 'Criando o vetor e preenchendo-o Dim dados(3) As Registro dados(0).Time = "Grêmio" dados(0).Pontos = 3 dados(0).SaldoGols = 1 dados(1).Time = "Santástico Futebol Show" dados(1).Pontos = 9 dados(1).SaldoGols = 13 dados(2).Time = "Juventude" dados(2).Pontos = 4 dados(2).SaldoGols = -3 dados(3).Time = "Caxias" dados(3).Pontos = 4 dados(3).SaldoGols = 1 dados = Array(Array("Grêmio", 3, 1), _ Array("Santástico Futebol Show", 9, 13), _ Array("Juventude", 4, -3), _ Array("Caxias", 4, 1)) Certo? Graymalkin

Nunca usei o Kylix, mas não seria do mesmo jeito que no Delphi? Abraços, Graymalkin

Format é que recebe o parâmetro "DD/MM/YYYY" e não Date(). Mesmo assim, não sei se isso é realmente necessário (não estou com o VB aqui para testar). Abraços, Graymalkin

Experimente fechar o(s) socket(s) aberto(s) com o método Close no evento Unload do form e fechar o programa com "Unload Me" (no form principal) e não "End". Abraços, Graymalkin

Eis minha contribuição: Gerando assemblies em run-time Abraços, Graymalkin

No sentido estrito da palavra, sim tem. Dê uma olhada neste tutorial: http://www.desenvolvedores.net/modules.php...=article&sid=27. Só que talvez este não seja necessariamente o "upload" que você está querendo. Abraços, Graymalkin

Verifique se o mecanismo fornece alguma função que faça essa conversão (como é o caso da função Str() no Jet). Abraços, Graymalkin

Você tem certeza que o seu conio.h tem a definição do clrscr()? Testei aqui com o BCC e funcionou certinho, já com o MingW deu a mesma coisa que o seu. Abraços, Graymalkin

Faça uma busca por "transp" aqui no fórum e você encontrará possíveis soluções. Abraços, Graymalkin

Seria melhor se você postasse a linha em que este erro ocorre (ou a rotina toda). Abraços, Graymalkin

Para somente escolher um diretório o ideal é utilizar a janela BrowseForFolders (via API ou pelo componente Microsoft Shell Controls and Automation). Abraços, Graymalkin

Se o seu form *já* foi carregado anteriormente (e não esteja mais visível), você pode fazer o seguinte: For Each f In Forms If f.Name = nome Then f.Show End If Next f Onde "nome" é uma variável string contendo o nome do form a ser aberto. Abraços, Graymalkin

Bom, acho que a .NET Framework é bastante completa e vai atender as suas necessidades, sem que você tenha de "apelar" para outras linguagens. E se você já conhece VB então não vai demorar muito para se acostumar com o VB.NET (logo, como o ASP.NET pode ter o VB.NET como linguagem, você também não vai ter problemas com este). Abraços, Graymalkin

Mude a propriedade DrawMode da ListBox para OwnerDrawVariable, depois coloque o seguinte código no evento DrawItem da mesma: Dim texto As String = ListBox1.Items(e.Index) Dim cortexto As Brush If texto = "teste2" Then e = New DrawItemEventArgs(e.Graphics, Me.Font, e.Bounds, e.Index, e.State, Color.White, Color.Red) cortexto = Brushes.White Else cortexto = Brushes.Black End If e.DrawBackground() e.DrawFocusRectangle() e.Graphics.DrawString(texto, Me.Font, cortexto, e.Bounds.Left, e.Bounds.Top) Note que o código acima só vai trocar a cor do item cujo texto for exatamente "teste2". Isso é só um exemplo para quee a partir daí você posse começar a explorar novas possibilidades. Abraços, Graymalkin

Creio que você esteja se referindo a quebrar um loop, certo? Então, você deve utilizar Exit For ou Exit Do, dependendo do loop em questão. Abraços, Graymalkin

Sim, no site da Microsoft você acha o arquivo de SDK da Framework. Abraços, Graymalkin

Qual a sua dúvida, exatamente? Abraços, Graymalkin