Estou com dificuldade em extrair os 2 algarismos da esquerda do valor ccdympr=4468 para colocar em Rectangle2.Width =
Como posso fazer isso?
Valores do sensor selecionado
dim ccdy as integer = val(c(3))
dim ccdx as integer = val(c(4))
dim um as integer = val(c(1))
// Tamanho do sensor em milimetros
dim ccdyr as integer = um * ccdy
dim ccdxr as integer = um * ccdx
//Converte os milimetros em pixeis
dim ccdympr as integer = ccdyr / 3.77
dim ccdxmpr as integer = ccdxr / 3.77
//???
Rectangle2.Width = ccdympr
Rectangle2.Height = ccdxmpr