Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
	
		
		
			Правила форума
			Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут 
закрыты.
Читайте 
требования к создаваемым темам.
		
		
 
	 
	
		
		
			
			- 
				Summer.05
			
- 
				
- Бывалый
  
- 
			 
 
-  
- Сообщения: 285
- Зарегистрирован: 28.12.2005 (Ср) 20:19
- Откуда: Москва
- 
				
			
			
			
			 Summer.05 » 04.08.2006 (Пт) 9:39
 Summer.05 » 04.08.2006 (Пт) 9:39 
			
			Есть DataGrid и есть кнопка - "Поиск"
Нужно ввести через InputBox фамилию, которая содержится в какой-то ячейке колонки Name в DataGrid. 
После нажатия кнопки осуществляется поиск и я перехожу к этой ячейке.
Есть 
Private Sub btnSearch _Click()
 Dim Name As String
    
    Name= InputBox("Ведите фамилию" + vbCrLf, "Поиск", "")
    If Name <> "" Then
И что дальше?
Прошу совета!
Спасибо!
			
		 
		
		 
	 
	
	
		
		
			
			- 
				Antonariy
			
- 
				
- Повелитель Internet Explorer
  
- 
			 
 
-  
- Сообщения: 4824
- Зарегистрирован: 28.04.2005 (Чт) 14:33
- Откуда: Мимо проходил
- 
				
			
			
			
			 Antonariy » 04.08.2006 (Пт) 9:58
 Antonariy » 04.08.2006 (Пт) 9:58 
			
			Работаешь с рекордсетом, использованном как источник для грида.
- Код: Выделить всё
- cb = rs.Bookmark
 rs.MoveFirst
 rs.Find "Name = '" & Name & "'"
 If rs.EOF Then
 If cb>0 Then rs.Bookmark = cb
 MsgBox "Нема!"
 End If
Лучший способ понять что-то самому — объяснить это другому.
		 
		
		 
	 
	
	
		
		
			
			- 
				Summer.05
			
- 
				
- Бывалый
  
- 
			 
 
-  
- Сообщения: 285
- Зарегистрирован: 28.12.2005 (Ср) 20:19
- Откуда: Москва
- 
				
			
			
			
			 Summer.05 » 04.08.2006 (Пт) 11:00
 Summer.05 » 04.08.2006 (Пт) 11:00 
			
			Antonariy
Спасибо, о Повелитель!
			
		 
		
		 
	 
	
	
	
	Вернуться в Visual Basic 1–6
	
	Кто сейчас на конференции
	Сейчас этот форум просматривают: PetalBot и гости: 5