Script dando erro VB12

[BTK 0]

Boa noite pessoal, estou usando um script, porem está dando erro :mellow: a intenção é fazer ele selecionar a primeira opção quando for "15" na primeira linha do DataGridView1 no select Do site, alguém pode me ajudar?!

 

If Strings.Mid(ToString(DataGridView1.Rows(0).Cells(0).Value), 1, 1) = "15" Then

WebBrowser1.Document.GetElementById("Age").Children(1).SetAttribute("Value", "15")

[Xevious 1]

Ta na primeira comparação esta pegando uma variável com um caracter de tamanho

e então nunca vai ser igual a "'15"

 

Muda de 1 para 2 no parametro final

If Strings.Mid(ToString(DataGridView1.Rows(0).Cells(0).Value), 1, 2) = "15" Then

 

Obs, podia ter colocado isso numa variável

seria mais fácil olhar o conteúdo dela no debug

e teria visto isso vc mesmo

[BTK 0]

Bom dia, então amigo, eu não sei nada de vb.net, sou iniciante nesse assunto... desculpas :D mas então, eu mudei como você disse e mesmo assim está dando erro olha eu estava usando esse script pra quando os 2 primeiros numero do DataGridView1 for... exemplo: quando a primeira linha do DataGridView1 conter 1 e 5 inicial "15" ele seleciona a primeira opção do site, 29242 "29" selecionar 2 opção do site e assim por diante entendeu? olha o erro https://imgur.com/qaKEJhI

[KhaosDoctor 242]

Não acho que o mid seja a melhor opção para você neste caso. Tente algo do tipo:

If Convert.ToInt32(DataGridView1.Rows(0).Cells(0).Value.ToString().Substring(0,2)) = 15 Then

O substring seria a melhor opção:

http://www.homeandlearn.co.uk/NET/nets7p5.html

http://www.dotnetperls.com/substring-vbnet

[BTK 0]

Boa tarde! Otima tarde! rsrs, finalmente com sua ajuda deu certinho aqui... não sei como lhe agradecer, pois estava sofrendo já fazia 2 semanas e graças a você deu certinho aqui! Muito obrigado amigo, melhor detalhadamente assim, impossível! :wub: