looked at your db, and your example in the post. Don't see a difference between what you want and what you get.
why not put > in the field and/or control format property - will display uppercase, although the source data remains unchanged. Access is not case sensitive so will not affect how it works.
isladogs,
I used Replace function, you can see at the attaced. But it didn't work.
CJ_London,
> function is convert the smal letters to big letters, but in the table, always small letters are recording. For example, enter te "a" from Form, in this situation Form is showing this letter like "A". But table recording is again "a". I want to recording letter must be "A" too from table.
So I have to use Replace or UCase functions but their mistake is
Settings The compare argument can have the following values:
Constant Value Description
vbUseCompareOption -1 Performs a comparison using the setting of the Option Compare statement.
vbBinaryCompare 0 Performs a binary comparison.
vbTextCompare 1 Performs a textual comparison.
vbDatabaseCompare 2 Microsoft Access only. Performs a comparison based on information in your database.
Thank you. But this information is above my level. Have you got any Access sample file for this solution? I'm very basic user, so I'm searching basic solution. Why is it diffucult, I don't understand.:banghead:
"i" must be "İ"
"ı" must be "I"
"İ" must be "İ"
"I" must be "I"
the problem I (and I suspect others) are having is using your alphabet. It does not display as expected with latin characters. So we are unable to reproduce the problem.
When I open the table, I see
I open the form, I see
these characters do not appear to be the ones you mention.
"i" must be "İ"
"ı" must be "I"
"İ" must be "İ"
"I" must be "I"
when I click the button, I get a communication error which implies the form has become corrupted.
I create a new form and copy your code
Code:
Private Sub Command8_Click()
Area1 = UCase(Area1)
Area1 = Replace(Area1, "i", "Ý")
Area1 = Replace(Area1, "ý", "I")
End Sub
For me, UCase does not appear to work, so commenting it out, the replaces do work, however the two replaces both replace the first character with "Ý". Which is a mystery to me.
It is some language thing, I do not understand that either. The the first character and all other characters are actually capital Is in US regional settings.
Code:
Private Sub Command8_Click()
Dim I As Integer
For I = 1 To Len(Me.Area1)
Debug.Print Asc(Mid(Me.Area1, I, 1)) & " " & Mid(Me.Area1, I, 1)
Next I
End Sub
Try changing the keyboard setting to US. In my Windows 10 PCs, keyboard setting shows immediately to the left of the time/date display at the bottom of the screen.
Hello everybody it solved but I didn't understood this solution
Create a module;
Code:
Public Function TumuBuyuk(kelime)
kont = Len(kelime)
If kont <> 0 Then
harf = Mid(kelime, 1, 1)
If Asc(harf) = 73 Or Asc(harf) = 253 Then
TumuBuyuk = TumuBuyuk & "I"
Else If Asc(harf) = 221 Or Asc(harf) = 105 Then
TumuBuyuk = TumuBuyuk & "İ"
Else
TumuBuyuk = TumuBuyuk & UCase(harf)
End If
For i = 2 To Len(kelime)
harf = Mid(kelime, i, 1)
If eharf = "." Or eharf = " " Or eharf = "-" Or eharf = "/" Then
If Asc(harf) = 73 Or Asc(harf) = 253 Then
TumuBuyuk = TumuBuyuk & "I"
ElseIf Asc(harf) = 221 Or Asc(harf) = 105 Then
TumuBuyuk = TumuBuyuk & "İ"
Else
TumuBuyuk = TumuBuyuk & UCase(harf)
End If
Else
If Asc(harf) = 73 Or Asc(harf) = 253 Then
TumuBuyuk = TumuBuyuk & "I"
ElseIf Asc(harf) = 221 Or Asc(harf) = 105 Then
TumuBuyuk = TumuBuyuk & "İ"
Else
TumuBuyuk = TumuBuyuk & UCase(harf)
End If
End If
eharf = harf
Next i
End If
End Function
Yo, peeps. Am I missing something? How about using the StrConv function?
Specifically,
strExample = StrConv("ÿ",vbUpperCase)
...would assign "Ÿ" to strExample
This function can do a whole slew of conversions, including upper case, lower case, and proper case characters for the entire unicode sequence. Much better and more consistent than the old standards Ucase and LCase, which don't work for non-ASCII characters for the most part.
Yo, peeps. Am I missing something? How about using the StrConv function?
Specifically,
strExample = StrConv("ÿ",vbUpperCase)
...would assign "Ÿ" to strExample
This function can do a whole slew of conversions, including upper case, lower case, and proper case characters for the entire unicode sequence. Much better and more consistent than the old standards Ucase and LCase, which don't work for non-ASCII characters for the most part.
@mressan
I am not so certain it would work. Those unicode characters get converted strangely as you move from language to language. I would try it. But if you look at my post most of those characters come up with 73 or 32 when they should not.
@mressan
I am not so certain it would work. Those unicode characters get converted strangely as you move from language to language. I would try it. But if you look at my post most of those characters come up with 73 or 32 when they should not.
You are probably right. I am only used to the English alphabet, which is but a subset of the entire Latin script that comprises the characters of languages originating from Western Europe, along with the Cyrillic script of eastern Europe.A very comprehensive summary on Wikipedia for the Latin script can be found at this link: https://en.wikipedia.org/wiki/Latin_script_in_Unicode
In any case, the specific characters that the OP posted were able to be converted properly using StrConv. I think I'll create a looping program to find out what all characters convert to, either upper or lower, but I would imagine that the geniuses behind StrConv (and other language equivalents) have already done all the correlations, or at least one would think.