Как сделать сайт:
  HTML
  JavaScript
  PHP
  CMS
Microsoft Office:
  Word
  Excel
  VBA
Просто о сложном
Список форумов on-line-teaching.com on-line-teaching.com
Онлайн курсы MS Office: Word, Excell. Как сделать сайт: HTML, JS, PHP
 
 FAQFAQ   ПоискПоиск   ПользователиПользователи   ГруппыГруппы   РегистрацияРегистрация 
 ПрофильПрофиль   Войти и проверить личные сообщенияВойти и проверить личные сообщения   ВходВход 

VBA

 
Начать новую тему   Ответить на тему    Список форумов on-line-teaching.com -> Excel: общие вопросы
Предыдущая тема :: Следующая тема  
Автор Сообщение
SlimMeR
Prizivnik - draftee
Prizivnik - draftee


Зарегистрирован: 13.06.2008
Сообщения: 1

СообщениеДобавлено: Пт Июн 13, 2008 9:44 pm    Заголовок сообщения: VBA Ответить с цитатой

воперых на сайте есть таблица истинности для логического оператора EQV и там все значения True.
Вот а теперь вся соль.
Код:

Dim blnA, blnB, blnC As Boolean
Private Sub CmdAnd_Click()
blnA = TxtA.Text
blnB = TxtB.Text
blnC = blnA And blnB
TxtC.Text = blnC
End Sub
Private Sub CmdOr_Click()
blnA = TxtA.Text
blnB = TxtB.Text
blnC = blnA Or blnB
TxtC.Text = blnC
End Sub
Private Sub CmdXor_Click()
blnA = TxtA.Text
blnB = TxtB.Text
blnC = blnA Xor blnB
TxtC.Text = blnC
End Sub
Private Sub CmdImp_Click()
blnA = TxtA.Text
blnB = TxtB.Text
blnC = blnA Imp blnB
TxtC.Text = blnC
End Sub
Private Sub CmdEqv_Click()
blnA = TxtA.Text
blnB = TxtB.Text
blnC = blnA Eqv blnB
TxtC.Text = blnC
End Sub

для операторов IMP и EQV в любом значении переменных blnA и blnB выводится результат True.
В чем может быть проблема?
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
AsIs
captain
captain


Зарегистрирован: 27.01.2006
Сообщения: 250
Откуда: СПб

СообщениеДобавлено: Пт Окт 10, 2008 6:22 pm    Заголовок сообщения: Ответить с цитатой

Эээ, я тоже не понимаю, в чем проблема. Smile
По справке сразу выдает таблицу истинности для этих двух операторов. Там вовсе не все значения TRUE. И простой код это подтверждает:

Код:
Sub aaa()
 Dim a As Boolean, b As Boolean, r As Boolean
 
 a = True
 b = False
 r = a Eqv b
 MsgBox r
End Sub


Кстати, если Ваш код, Вы пишите на VBA, то обратите внимание, что только последняя переменная будет типа Boolean. А первые две - Variant.

ЗЫ: а это вопрос дейтсвительно по теме раздела? Smile
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail Посетить сайт автора
Показать сообщения:   
Начать новую тему   Ответить на тему    Список форумов on-line-teaching.com -> Excel: общие вопросы Часовой пояс: GMT + 2
Страница 1 из 1

 
Перейти:  
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах


Powered by phpBB © 2001, 2005 phpBB Group
Русская поддержка phpBB