PedroBarreto
Membros-
Total de itens
216 -
Registro em
-
Última visita
Tudo que PedroBarreto postou
-
ou da uma aulinha de esse negosio de ajustar o lugar onde vai fika exemplo esse Image1.Top = Picture1.Top + Picture1.Height Image1.Left = Picture1.Left + Picture1.Width - Image1.Width da uma aulinha plisss
-
Como Mudar A Cor De Fundo Dos Forms?
pergunta respondeu ao Señor Smoke de PedroBarreto em Visual Basic
é backcolor mesmo mais se voce quiser que a pessoa muda a cor do fundo voce abre o componente common dialog 6.0 troca o nome por "com" e fais assim: com.showcolor form1.backcolor = com.color -
e tenho outra pergunta qual é o comando de altura e largura?
-
eu sei mais eu não sei calcular da uma dica niso por favor
-
olha pessoal eu quuero que cuando clique no botao a image6 fica em baixo no lado diteito fa picture1 tipo assim ____________________ | | | | | | | | | picture1 | | | | | | | |___________________ | ______ | | |image6| |_____ |
-
cara é so pensar porque se o codigo for Private Sub Command1_Click() If Text1.Text = "oi" Then MsgBox "oi tudo bem?" Else MsgBox "Digite oi" End If End Sub se o cara colocar oi aprece a mensagem "oi tudo bem?" masi se não for oi aparece "Digite oi" agora é so pensa valeu
-
velho não consegui nenhuma das duas coisa nem muda a cor e nem salvar, nma verdade salvar eu consegui mais ele não salva o texto em cima da imagem ajuda eu aew plisssssssss passa os codigos
-
manu o negosio de salvar não da scerto olha: Private Sub Image4_Click() Com.FileName = "" 'Definir o filtro de tipos de arquivos Com.Filter = "Arquivo BMP |*.bmp" 'Definir o diretório inicial Com.InitDir = "C:\Windows" Com.ShowSave If Com.FileName = "" Then MsgBox "Nenhum Arquivo Exportado!" Else MsgBox "O Arquivo Exportado é : " & Com.FileName 'Salva arquivo com nome que você criou na COM SavePicture Picture1.Image, (Com.FileName) End If End Sub e pra eu fasse para que o texto inserido na imagem seja da cor escolhida na palheta. oke tem de errado? Private Sub Image3_Click() Com.ShowColor Picture1.Print "teste" Picture1.Print Color = (Com.FileName) End Sub
-
ae cara valeu mais ele não salva o bmp com o texto ve oque há de errado Private Sub Image4_Click() Com.FileName = "" 'Definir o filtro de tipos de arquivos Com.Filter = "Arquivo BMP |*.bmp" 'Definir o diretório inicial Com.InitDir = "C:\Windows" Com.ShowSave If Com.FileName = "" Then MsgBox "Nenhum Arquivo Exportado!" Else MsgBox "O Arquivo Exportado é : " & Com.FileName 'Salva arquivo com nome que você criou na COM SavePicture Picture1.Image, Com.FileName End If End Sub e eu tambem quero sabe como fais para abrir a palheta de cor pelo common dialog
-
como eu faço para que as pessoas possão escrever algo dentro da picture1 e quando salvar a imagem é salva com aquele texto em cima plisss me ajudem valeww
-
Galera Komo Eu Fasso Para Que A Picture1 Teja ...
pergunta respondeu ao PedroBarreto de PedroBarreto em Visual Basic
e aquele negosio do defaltext eu acabei de coloca *.si mais ainda da erro ele fala que salva mais não salva ajuda eu ae por favor tem que se logo -
Galera Komo Eu Fasso Para Que A Picture1 Teja ...
pergunta respondeu ao PedroBarreto de PedroBarreto em Visual Basic
cara valeu mesmo mais eu ainda não consegui faze o negosso de ele fica no meio eu tentei mais não deu olha oque eu tentei Picture1.Top = Form1.Top + "1680" cara não precisa responde mais da uma dica pra en entende mais tem que se ate as 6:00 por favor valeu mesmo -
Galera Komo Eu Fasso Para Que A Picture1 Teja ...
pergunta respondeu ao PedroBarreto de PedroBarreto em Visual Basic
aew galera eu estou kom mais uma duvida... eu quero ke o programa abre um arquivo de imagem kualke mais salva komo .si oke tme de errado ? Private Sub Image1_Click() 'Definir o filtro de tipos de arquivos Com.Filter = "Pictures (*.bmp;*.ico)|*.bmp;*.ico|Todos (*.*)|*.*" 'Definir o diretório inicial Com.InitDir = "C:\Windows" Com.ShowOpen If Com.FileName = "" Then MsgBox "Nenhum Arquivo Selecionado !" Else MsgBox "O Arquivo Selecionado é : " & Com.FileName End If Picture1.Picture = LoadPicture(Com.FileName) End Sub Private Sub Image2_Click() 'Definir o filtro de tipos de arquivos Com.Filter = "*.si" 'Definir o diretório inicial Com.InitDir = "C:\Windows" Com.ShowSave If Com.FileName = "" Then MsgBox "Nenhum Arquivo Salvo !" Else MsgBox "O Salvo é : " & Com.FileName End If End Sub valeu galera presiso de respostas rapidas -
komo eu faço pra que o picture1 tenha o mesmo tamanho da imagem aberta no showopen? e eu tambem quero saber como que fais para que o picture sempre fique no centro da tela independente o tamanho do form galera responde ate hj plissss
-
aew agalera passa o kodigo plisss
-
aew galera como eu faço pra que fike uma picture aberta no form a pessoa vai na lista a aperta na pasta dai a kada veis ke ela aperta avançar vai aparecenu as imagem no picturo uma a uma tem geito´ plis ´´e urgenteeee