Graymalkin

O tipo DateTime é um "tipo valor", assim como Integer, e possui um valor inicial, que é justamente esse citado, e por esta razão não aceita um valor nulo. Não sei como você está fazendo aí, mas eu faria essa verificação (se o valor equivale a 01/01/0001 00:00:00) na hora de incluir na tabela a fim de determinar se ele é nulo ou não. Abraços, Graymalkin

Ao fazer... If RS!Usuario = txt_novouser.Text Then ... você realmente só está comparando com o registro atual (que no seu caso é o primeiro). Você deveria percorrer todos os registros ou, melhor ainda, fazer um SELECT para verificar a existência do nome de usuário. Abraços, Graymalkin

Movendo para o lugar correto: .NET. Graymalkin

Você quer desenvolver a fórmula sem ter que colocá-la em uma célula a fim de depois obter o resultado, certo? Então, experimente passar esta fórmula para a função Evaluate() e veja se dá certo. Abraços, Graymalkin

Bom, eu realmente não entendi. A MsgBox serve para exibir strings e somente isso. Se você tem que fazer cálculos, fórmulas, etc., faça com variáveis e depois exiba o resultado usando a MsgBox. E, você está usando VBA? Se estiver, me fale para eu mover para a sala correta. Abraços, Graymalkin

Bom, existem várias maneiras. Uma delas seria colocando uma PictureBox no form e exibindo a imagem nesta quando o evento DoubleClick da ListView fosse invocado. Abraços, Graymalkin

É isso aí mesmo. Agora, se está aparecendo tipos incompatíveis é porque você pode estar comparando de maneira errada ou comparando tipos diferentes. Poste um exemplo real do que você precisa e de como está fazendo pra que a gente possa te ajudar melhor. Abraços, Graymalkin

Use a função Asc(). Abraços, Graymalkin

Ops, desculpa aí, não tinha percebido que ele perguntou em relação as versões Express. Pensei ter lido somente Visual Studio 2008. Abraços, Graymalkin

Isso é simples, basta colocar uma caixa de texto no form e fazer: Dim seleção As New FolderBrowserDialog() If seleção.ShowDialog() = Windows.Forms.DialogResult.OK Then txtCaminho.Text = seleção.SelectedPath End If E lembre-se de mudar a linha... Dim arqs() as String = IO.Directory.GetFiles("c:\pasta", "*.jpg") ... para: Dim arqs() as String = IO.Directory.GetFiles(txtCaminho.Text, "*.jpg") Certo? ;) Graymalkin

Bom, se entendi você quer exibir as imagens de modo semelhante a opção "Miniaturas" do Windows Explorer, certo? Então, primeiro coloque uma ListView no form e mude as suas propriedades conforme os valores abaixo: OwnerDraw = True View = Tile TileSize = 200; 200 Feito isso, vá no evento DrawItem da ListView1 e coloque o seguinte código: Dim img As Image = Image.FromFile(e.Item.Text) e.DrawBackground() e.Graphics.DrawImage(img, New Rectangle(e.Bounds.Left, e.Bounds.Top, e.Bounds.Width, e.Bounds.Height)) e.DrawText(TextFormatFlags.Bottom) e.DrawFocusRectangle() Daí então, vá no evento Load do form e coloque o seguinte: Dim arqs() as String = IO.Directory.GetFiles("c:\pasta", "*.jpg") For Each arq As String In arqs ListView1.Items.Add(arq) Next Esse código acima obtém todos os arquivos da pasta especificada e adiciona os nomes dos mesmos à ListView1. O código colocado no evento DrawItem da ListView1 é o código que efetivamente desenha a imagem no lugar do item (porque o normal seria aparecer um ícone e/ou o texto do item). O que faz com que isso aconteça é o fato de termos mudado a propriedade OwnerDraw da Listview1 para true (o que diz para ela que queremos personalizar a maneira como ela será desenhada). Bom, não sei o seu nível de conhecimento em programação, mas os passos acima são para alguém que já tenha pelo menos o mínimo de familiarização com o ambiente do Visual Studio e com a linguagem Visual Basic. Abraços, Graymalkin

E o quê, exatamente, você não conseguiu fazer? Abraços, Graymalkin

Sim, sei que o "MAILTO" chama o Outlook Express o aplicativo padrão de leitura envio de e-mails do usuário. Exemplo:mailto:contato@home.com. (esse so chama o Outlook Express). Mas qual comando chama os demais aplicativo padrão de email do usuário?, Microsoft Outlook, o Eudora, o Thunderbird, ou outro? Você não entendeu então, apesar de ter repetido o que eu disse. O aplicativo *padrão*, como o nome sugere, só pode ser um e apenas um. Assim como o Word é o aplicativo *padrão* para abrir arquivos .DOC (você nunca terá dois aplicativos padrões para uma mesma extensão - você terá o padrão e os *demais*). Por exemplo, se o caboclo usa o Thunderbird como o aplicativo *padrão* de e-mail, este será chamado. Até porque também você não tem como adivinhar o que existe na máquina do cara. Abraços, Graymalkin

O mailto vai chamar o aplicativo padrão de leitura e envio de e-mails do usuário. Na maioria das vezes é o Outlook Express, mas pode ser o Microsoft Outlook, o Eudora, o Thunderbird, ou qualquer outro. Abraços, Graymalkin

Acho que está faltando um else ali, não? public static void LimparTextBox(Control formulario) { foreach (Control controle in formulario.Controls) { if (controle.GetType().ToString() == "System.Windows.Forms.GroupBox" || controle.GetType().ToString() == "System.Windows.Forms.TabControl" || controle.GetType().ToString() == "System.Windows.Forms.Panel" || controle.GetType().ToString() == "System.Windows.Forms.TabPage" ) { LimparTextBox(controle); } else { if (controle.GetType().ToString() == "System.Windows.Forms.TextBox") { controle.Text = ""; } } } } Isso é uma rotina recursiva, que chama a si mesma. Abraços, Graymalkin

Não deveria ser... MenuForm.LimparTextBox(this); ...? Considerando-se que se está no próprio form, é claro. Abraços, Graymalkin

O que você quer fazer exatamente? Abraços, Graymalkin

strexemplo = list1.List(i) Onde "i" é o índice da linha desejada. Abraços, Graymalkin

O Arj é simplesmente um compactador, assim como o WinZip e o WinRar. Ele não vai fazer seus dados sumirem do banco de dados, nem algo do tipo. Certifique-se de você está realmente vendo a cópia preenchida do BD. Abraços, Graymalkin

Bom, uma solução seria concatenar as informações usando o próprio método ToString(), por exemplo: Return Me.Nome & " [" & Me.Login & "]" Uma outra solução é usar o evento CellFormatting da própria DataGridView para manipular o que vai aparecer: If e.ColumnIndex = 1 Then 'Se for a segunda coluna (isso é legal pra não pesar no processamento de todas as células) - lembre-se de mudar! Dim g As DataGridView = sender Dim obj As Atendente = g.Rows(e.RowIndex).DataBoundItem e.Value = obj.Nome 'Aqui você define o que vai ser mostrado e.FormattingApplied = True End If Certo? ;) Graymalkin

Sim, pelo que vi aqui, ao escolher criar um projeto para Smart Devices, você pode desenvolver para Pocket PC 2003, Windows CE e Windows Mobile 5.0. Abraços, Graymalkin

Você quer é redirecionar para uma determina página após x segundos? Se for, não basta colocar o trecho abaixo dentro da tag head? <meta http-equiv="Refresh" content="5;url=/site"> Onde 5 é a quantidade de segundos e /site é a URL de destino. Abraços, Graymalkin

Qual o erro que dá? Abraços, Graymalkin

Basta sobrescrever o método ToString() da classe Atendente, com algo como: Return Me.Nome A DataGridView sempre usa a representação String do objeto, chamando o método ToString() do mesmo. Se você não sobrescrevê-lo verá algo como Namespace.Atendente. Certo? ;) Graymalkin

No 2005 eu faço isso criando uma subclasse de ProfessionalColorTable onde sobrescrevo as propriedades com as cores desejadas para cada parte do menu (o próprio menu, opções, bordas, etc.), exemplo: Public Class CoresStrip Inherits ProfessionalColorTable Public Overrides ReadOnly Property MenuStripGradientBegin() As System.Drawing.Color Get Return Color.WhiteSmoke End Get End Property Public Overrides ReadOnly Property MenuStripGradientEnd() As System.Drawing.Color Get Return Color.DarkGray End Get End Property Public Overrides ReadOnly Property MenuBorder() As System.Drawing.Color Get Return Color.Black End Get End Property Public Overrides ReadOnly Property MenuItemSelected() As System.Drawing.Color Get Return Color.Khaki End Get End Property Public Overrides ReadOnly Property MenuItemBorder() As System.Drawing.Color Get Return Color.Firebrick End Get End Property Public Overrides ReadOnly Property MenuItemPressedGradientBegin() As System.Drawing.Color Get Return Color.White End Get End Property Public Overrides ReadOnly Property MenuItemPressedGradientMiddle() As System.Drawing.Color Get Return Color.NavajoWhite End Get End Property Public Overrides ReadOnly Property MenuItemPressedGradientEnd() As System.Drawing.Color Get Return Color.Khaki End Get End Property Public Overrides ReadOnly Property ImageMarginGradientBegin() As System.Drawing.Color Get Return Color.Gray End Get End Property Public Overrides ReadOnly Property ImageMarginGradientMiddle() As System.Drawing.Color Get Return Color.LightGray End Get End Property Public Overrides ReadOnly Property ImageMarginGradientEnd() As System.Drawing.Color Get Return Color.WhiteSmoke End Get End Property End Class Depois, basta colocar no Load do seu form: MenuStrip1.RenderMode = ToolStripRenderMode.Professional MenuStrip1.Renderer = New ToolStripProfessionalRenderer(New CoresStrip()) Onde "MenuStrip1" é o menu em questão. Lembrando que a subclasse acima também pode ser utilizada para trocar as cores dos outros controles da família Strip (ToolStrip, StatusStrip e ContextMenuStrip). Abraços, Graymalkin