Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Сравнение Добавлено: 17.01.11 23:09  

Автор вопроса:  VbStarter | Web-сайт: moscowdevils.ru | ICQ: 357911808 
как определить переменчив ли регистр строки (ИнНиНи или инини)? vb6
P.S.
Jabaco :)

Ответить

  Ответы Всего ответов: 9  

Номер ответа: 1
Автор ответа:
 VbStarter



ICQ: 357911808 

Вопросов: 118
Ответов: 1340
 Web-сайт: moscowdevils.ru
 Профиль | | #1
Добавлено: 17.01.11 23:48
или просто определить наличие вехнего регистра

Ответить

Номер ответа: 2
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
 Web-сайт: winandfx.narod.ru
 Профиль | | #2
Добавлено: 18.01.11 00:13
  1. Public Sub Command1_Click()
  2.    If LCase(Text1.Text) <> Text1.Text Then _
  3.       If UCase(Text1.Text) <> Text1.Text Then _
  4.          MsgBox "Регистр переменчив"
  5. End Sub

Ответить

Номер ответа: 3
Автор ответа:
 VbStarter



ICQ: 357911808 

Вопросов: 118
Ответов: 1340
 Web-сайт: moscowdevils.ru
 Профиль | | #3
Добавлено: 18.01.11 23:18
спасибо

Ответить

Номер ответа: 4
Автор ответа:
 VbStarter



ICQ: 357911808 

Вопросов: 118
Ответов: 1340
 Web-сайт: moscowdevils.ru
 Профиль | | #4
Добавлено: 19.01.11 00:00
как определить наличие неалфовитно-цифровых символов?

Ответить

Номер ответа: 5
Автор ответа:
 VbStarter



ICQ: 357911808 

Вопросов: 118
Ответов: 1340
 Web-сайт: moscowdevils.ru
 Профиль | | #5
Добавлено: 19.01.11 00:01
Winand пишет:
Public Sub Command1_Click()

   If LCase(Text1.Text) <> Text1.Text Then _

      If UCase(Text1.Text) <> Text1.Text Then _

         MsgBox "Регистр переменчив"

End Sub

на джабако не идёт
  1. Dim LC As String
  2. LC = LCase(Password1.Text)
  3. If LC = Password1.Text Then
  4.    Else
  5.    ...
  6. End If

Ответить

Номер ответа: 6
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
 Web-сайт: winandfx.narod.ru
 Профиль | | #6
Добавлено: 19.01.11 14:15
то что я написал не идет? я же в нем и писал

Ответить

Номер ответа: 7
Автор ответа:
 VbStarter



ICQ: 357911808 

Вопросов: 118
Ответов: 1340
 Web-сайт: moscowdevils.ru
 Профиль | | #7
Добавлено: 19.01.11 20:48
не идёт... :)
изза <>
я подключил все либы и рантаймы, но всёже.
пожет обновить его...
где к нему контролу подрубать?

Ответить

Номер ответа: 8
Автор ответа:
 VbStarter



ICQ: 357911808 

Вопросов: 118
Ответов: 1340
 Web-сайт: moscowdevils.ru
 Профиль | | #8
Добавлено: 19.01.11 20:48
не идёт... :)
изза <>
я подключил все либы и рантаймы, но всёже.
пожет обновить его...
где к нему контролу подрубать?

Ответить

Номер ответа: 9
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
 Web-сайт: winandfx.narod.ru
 Профиль | | #9
Добавлено: 19.01.11 23:50
а никогда не пробовал Not (X=Y) ?

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам