[Resolvido]Icone do Aplicativos

gostaria de colocar o icones no meu banco de dados atraves de vba... algum pode me dizer como fazer???

é assim quero criar uma tabela deixando no campo caminho o caminho da imagem que quero colocar como icones, e quero um formulario para criar um botão para escolher este caminho...


tem como fazer????

Faça uma pesquisa no fórum. Temos diversos tópicos sobre o assunto.

estou tentando, mas ainda nao encontrei nada...

Talvez esse exemplo possa ajudar.

não deu certo porque eu quero o icone do formulario...

Mas as imagens estão no formulário. O princípio é o mesmo. É só adaptar.

o que eu quero é o seguinte

quero mudar o icone do aplicativos (uso o access 2007), ir no botão office - opções do access - banco de dados atual - e mudar escolher o icone...

quero mudar o icone só que usando um modulo.

tem como

retirado do help do proprio access, basta pressionar a tecla F1 e toda a ajuda fica disponivel.

Private Sub teubotao_Click()
    Dim intX As Integer
    Const DB_Text As Long = 10
    intX = AddAppProperty("AppTitle", DB_Text, "Nome para o teu banco")
    intX = AddAppProperty("AppIcon", DB_Text, CurrentProject.Path & "\teuIcon.bmp")
    CurrentDb.Properties("UseAppIconForFrmRpt") = 1
    Application.RefreshTitleBar
End Sub



Function AddAppProperty(strName As String, _
        varType As Variant, varValue As Variant) As Integer
    Dim dbs As Object, prp As Variant
    Const conPropNotFoundError = 3270

    Set dbs = CurrentDb
    On Error GoTo AddProp_Err
    dbs.Properties(strName) = varValue
    AddAppProperty = True

AddProp_Bye:
    Exit Function

AddProp_Err:
    If Err = conPropNotFoundError Then
        Set prp = dbs.CreateProperty(strName, varType, varValue)
        dbs.Properties.Append prp
        Resume
    Else
        AddAppProperty = False
        Resume AddProp_Bye
    End If
End Function

Veja esse exemplo

agora é assim...

eu quero criar um formulario onde tem um campo NomeDoBancoDeDados e IconeDoBancoDeDados, quero um modulo que coloque como titulo do banco de dados o nome que estiver no campo NomeDoBancoDeDados e coloque como icones do banco de dados o caminho especificado no campo IconDoBancoDeDados, e se possivel coloca-se no formulario um botão para procurar essa imagem do icones para preencher o campo do icone...

alguem sabe como fazer???

É só alterar o módulo colocando o nome do campo no lugar do caminho e do título que lá estão. Você precisará de uma tabela para armazenar esses dados, sendo aonde as informações serão buscadas. No exemplo que passei anteriormente, do relógio com imagens, está dessa maneira.

valeu obrigado... deu super certo...