Legenda do Formulário Propriedade Text

Question

Gostaria de substituir a legenda de um formulário por uma informação carregada direto do meu banco de dados por exemplo: Licenciado para: "resultado da consulta"

Answer 1

Olá Inquiridor.

Você poderia carregar essa informação no evento Load o formulário.

private void Form1_Load(object sender, EventArgs e)
        {
            // Aqui ficará o seu código para carregar a informação que você quer
        }

---

Klayton Gomes MCP /MCTS/ MCAD / MCPD / MCSD Software Architecture / System Analyst

Answer 2

Esse é o problema Klayton, necessito de um código que faça isso, meu projeto é em Visual Basic.

Answer 3

Resolvi da seguinte forma:

Dim con As New OleDb.OleDbConnection
        Dim cmd As New OleDbCommand
        Dim da As New OleDb.OleDbDataAdapter
        Dim Dt As New DataTable

        con.ConnectionString = "minha conexão"
        con.Open()

        Try
            With cmd
                .CommandType = CommandType.Text
                .CommandText = "SELECT * from Empresa"
                .Connection = con
            End With

            With da
                .SelectCommand = cmd
                Dt = New DataTable
                .Fill(Dt)
                Me.Text = "Licenciado para: - " & Dt.Rows(0).Item("RazãoSocial")
  
            End With

        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
        con.Close()