[Resolvido]Variavel String assumindo um valor de acordo com a letra para fazer comparação de prioridade

Bem amigos.. tenho 3 variáveis que assume o valor de uma letra C, S ou R

Dim X, X1, X3 As String
Dim VarNF1, VarNF2, VarNF2 As String

VarNF1 = Me.Me.txtCampo1.Value
VarNF2 = Me.Me.txtCampo2.Value
VarNF3 = Me.Me.txtCampo3.Value

X = Mid(VarNF1, 16, 1)

X1 = Mid(VarNF1, 16, 1)

X2 = Mid(VarNF1, 16, 1)



Preciso fazer comparação sobre a ordem das letras.. por exemplo... o R vem depois do C então o R terá prioridade para preencher um campo no form..


Como fazer isso?

Em primeiro lugar, o amigo continua a declarar as variáveis de forma não totalmente correta. Veja o certo:

Dim X As String, X1 As String, X3 As String
Dim VarNF1 As String, VarNF2 As String, VarNF3 As String

Da forma como declarou, apenas a última variável de cada linha está declarada como String. As ouras ficaram como Variant. Isso pode causar alguns problemas em determinados casos, pois a Variant não sabe bem que tipo de dado deve representar, uma vez que, como o próprio nome diz, ela é variável.

Quanto à dúvida, acredito que precisaremos de mais alguns verbos nos detalhes para entendermos melhor

Amigão resolvi assim:


Veja se entendeu o que quis fazer.. isto é para ajuda a uma pessoa...


Private Sub Comando3_Click()
Dim X1 As String
Dim X2 As String
Dim X3 As String
Dim VarNF1 As String
Dim VarNF2 As String
Dim VarNF3 As String

VarNF1 = Me.txtCampo1.Value
VarNF2 = Me.txtCampo2.Value
VarNF3 = Me.txtCampo3.Value

X1 = Mid(VarNF1, 16, 1)
MsgBox X1

X2 = Mid(VarNF2, 16, 1)
MsgBox X2

X3 = Mid(VarNF3, 16, 1)
MsgBox X3

If X1 = "C" And X2 = "S" And X3 = "R" Then
Me.txtNF_1 = "Sequencia C S R"
End If
If X1 = "R" And X2 = "C" And X3 = "S" Then
Me.txtNF_1 = "Sequencia R C S"
End If
If X1 = "S" And X2 = "C" And X3 = "R" Then
Me.txtNF_1 = "Sequencia S C R"
End If
End Sub

Podes por gentileza amigão me dar uma pequena explicação sobre os tipos de variaveis, valor e seu uso?

Fico agradecido

Não seria mais simples colocar assim?:

Me.txtNF_1 = "Sequencia " & X1 & " " & X2 & " " & X3

Dessa forma, não precisa dos IFs. Você resume nove linhas em apenas uma.

Quanto aos tipos de variáveis, faça o seguinte: abra um módulo qualquer ou pressione Ctrl+G para abrir um módulo. Pressione F1 e digite Resumo de tipo de dados na pesquisa. O primeiro resultado deve ser exatamente esse. Analise-o.

O if é necessário pois pode ser digitado valores alternados... e conforme isso preencher a caixa texto com um valor especificado...

Coloquei esta "Sequencia 000" so pra ele ter nocão

Grato