Sortear um numero

USUÁRIO: SENHA:

SALVAR LOGIN ?


	Fórum
	Visual Basic

Responder

Voltar

Autor

Assunto: Sortear um numero

Edson479

SÃO PAULO
SP - BRASIL

Postada em 09/02/2006 09:27 hs

olá,

Alguem por acaso sabe como posso sorteie algum numero eu estou fazendo assim

Private Sub Form_Load()

Arquivo = Int((7 * Rnd) + 1)

    Select Case Arquivo
        Case "1"
            Skn.LoadSkin (App.Path & "-Studio.skn")
            Skn.ApplySkin Me.hwnd
        Case "2"
            Skn.LoadSkin (App.Path & "chizh.skn")
            Skn.ApplySkin Me.hwnd

........
End Select

End Sub

so que ele sempre sortea o mesmo numero

Daniel

SÃO PAULO
SP - BRASIL

Postada em 09/02/2006 09:35 hs

Antes dessa linha:

Arquivo = Int((7 * Rnd) + 1)

Acrescente :

Randomize

Isso fará com que o numero inicial seja sempre diferente, não esqueça rnd é uma função que tras um numero de uma sequencia pré estabelecida, e a função Randomize modifica o ponteiro inicial dessa sequencia

dsmn

Edson479

SÃO PAULO
SP - BRASIL

Postada em 09/02/2006 10:14 hs

valeu...
agora toda vez que iniciar o meu programinha vai trazer um form deferente.
obrigado.

Página(s): 1/1

Seu Nome:
Seu eMail:		ALTERAR PARA MODO HTML
Mensagem: [:)] = [:P] = [:(] = [;)] = HTML DESLIGADO

VOLTAR


		CyberWEB Network Ltda. © Copyright 2000-2025 - Todos os direitos reservados. Powered by HostingZone - A melhor hospedagem para seu site