LIST VIEW
Boa Noite Galera vbMania. Estou usando um listview para listar produtos só que queria remover a barra de rolagem horizontal e deixar só com a barra vertical. alguém sabe como fazer isso estou tendo dificuldade. desde já agradeço.
Tente assim:
http://www.experts-exchange.com/Programming/Languages/Visual_Basic/Q_20297528.html
Private Declare Function ShowScrollBar Lib [Ô]user32[Ô] (ByVal hwnd As Long, ByVal wBar As Long, ByVal bShow As Long) As Long
Private Sub Command1_Click()
ShowScrollBar ListView1.hwnd, 0, False
End Sub
http://www.experts-exchange.com/Programming/Languages/Visual_Basic/Q_20297528.html
Obrigado pela resposta Jaba. Mas tentei este código não deu certo. será que é porque coloco no evento LostFocus. Meu evento funciona assim tem um text quando o usuário entra com o código de barra ele já cadastra o produto no pedido e já carrega na listview. se coloco este código que você me passou ai não funciona.
Citação:Private Declare Function ShowScrollBar Lib [Ô]user32[Ô] (ByVal hwnd As Long, ByVal wBar As Long, ByVal bShow As Long) As Long
Essa parte tem que ser colocada dentro de um módulo.
no evento lostfocus não funciona.
Você está aplicando esse código no evento LostFocus de qual controle?
Obrigado pela resposta. Estou usando em um lostfocus de text. No command funciona só q não tem como eu usar.
Talvez a ordem que você chame essa função tenha relevância. Dentro do LostFocus, experimente chamá-la no inicio e no final. Uma forma não muito agradável de fazer isso também é você chamar essa função dentro de um controle Timer configurado com 1 segundo, assim, no evento LostFocus do Text, ative o Timer e veja se funciona.
Desculpe a demora Jaba. Deu Certo. Muito obrigado pela solução e atenção.
Tópico encerrado , respostas não são mais permitidas