Ir para o conteúdo
cagueca

conversor ??

Mensagens Recomendadas

cagueca    0
cagueca

lool

Nao , nao e trabalho de casa .. simplesmente estou a aprender nos meus tempos livres .. e como comecei a dois meses a programar nem sei por onde comecar ... tipo so preciso de exemplos para perceber e depois aplico nas minhas cenas .. que neste caso nao e para calculadora ..

Abraco

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
cagueca    0
cagueca

boas :

Tenho o seguinte codigo para converter para hexadecimal mas nao esta a converter bem alguem pode ajudar ??


Public Class Form1

    Dim numeros As String

    Private Sub Botaogerar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Botaogerar.Click

        numeros = InputBox(" Intruduza o numero: " & Chr(13) & " Exemplo 2633 7520 ")

        If numeros = "" Then
            Me.Close()
        Else

            numeros = Hex$(numeros)
            Label1.Text = numeros

        End If

        Botaogerar.Enabled = False



    End Sub
End Class

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
ribeiro55    44
ribeiro55

Eu fazia à pata. Desconhecia a classe Conversion da framework.

É mesmo linda esta sacana da framework...

Exprimenta trocar onde tens o Hex$ para:

numeros = Conversion.Hex(CInt(numeros))

Aqui fungas.

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
cagueca    0
cagueca

Boas :

Obrigado por responderes , mas ainda nao funciona dava o mesmo valor como eu tinha ..

Tipo se puderes o numero 26337520 para converter para hexadecimal deveria dar 59bf50 e nao e esse o valor que esta a dar ...

Eu posso fazer conversao directa ou tenho que passar primeiro para binario ??

Eu fiz a mao passar primeiro para binario e depois para hexadecimal e funcionou ..

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
cagueca    0
cagueca

a mao .. 26337520 > binario > 010110011011111101010000 > hex > 59bf50

calculadora do windows 26337520 octal 59bf50 hexa ...

se calhar expliquei me mal .. o 26337520 e octal ..

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
ribeiro55    44
ribeiro55

Não é o explicar mal... não disseste de todo :)

Só precisas de indicar que se trata de um octal.

        Dim oct As String = "&O26337520"

        MsgBox(Conversion.Hex(oct))

Estando a chave no "&O" antes do número para indicar que se trata de um octal.

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora


×

Aviso Sobre Cookies

Ao usar este site você aceita os nossos Termos de Uso e Política de Privacidade