Страница: 1 | 
		
		 
			   
			 
			 У меня условие If msgbox("",vbExclamation + vbYesNoCancel,"") = vbyes then Esle vbCancel Else End if В чем проглюк? 
			 
			 dim lResult as long lResult = msgbox("",vbExclamation + vbYesNoCancel,"")  If lresult= vbyes then Esleif  lresult = vbCancel Then Else End if dim lResult as long lResult = msgbox("",vbExclamation + vbYesNoCancel,"")  If lresult= vbyes then Elseif  lresult = vbCancel Then Else End if А почему if, а не Select Case? Select Case MsgBox("press", vbYesNoCancel) Страница: 1 | 
 
			
 
  
		
     
  
    
Вопрос: Трехзадачный IF
     
    
Добавлено: 02.01.04 20:51
     
      
  
				
			  
					 
			
				 
    
		
       
    
Автор вопроса:  
    
 el Di@mond | Web-сайт: www.artofcode.by.ru | ICQ: 313950105 
      
       
  
 
    
				
		
		
					 
			
				 
  
		
     
  
    
Ответы
     
    
Всего ответов: 3
     
      
  
		
	  
			 
	
		 
    
       
    
Номер ответа: 1 
      
Автор ответа:
 AASoft
![]()
![]()
![]()
![]()
![]()
![]()
![]()
![]()
![]()
Вопросов: 86
Ответов: 920
      
 Профиль |  | #1
       
Добавлено:  02.01.04 21:17
       
    
       
  
 
    
		
	  
			 
	
		 
    
       
    
Номер ответа: 2 
      
Автор ответа:
 AASoft
![]()
![]()
![]()
![]()
![]()
![]()
![]()
![]()
![]()
Вопросов: 86
Ответов: 920
      
 Профиль |  | #2
       
Добавлено:  02.01.04 21:17
       
    
       
  
 
    
		
	  
			 
	
		 
    
       
    
Номер ответа: 3 
      
Автор ответа:
 boevik
![]()
![]()
![]()
![]()
![]()
![]()
Хранитель чата
ICQ: 137392264 
Вопросов: 8
Ответов: 557
      
 Web-сайт:  
 Профиль |  | #3
      
Добавлено:  04.01.04 09:49
       
    
       
  
 
    
    Case vbYes:
        Debug.Print "Yes"
    Case vbNo:
        Debug.Print "No"
    Case Else
        Debug.Print "Else"
End Select