Rambler's Top100
Форум: MS ACCESSVBVBA MS OfficeMS SQL server
Новые сообщения: 0000

Форум: MS ACCESS

Вопросы связанные с MS ACCESS

Обновить визитку
Участники «Online»
Все участники

 
 

Доброго времени суток, Посетитель!

вид форума:
Линейный форум Структурный форум

тема: Выдернуть значения
 
 автор: alexey_9   (25.02.2010 в 16:01)   личное сообщение
 
 

Поскажите, есть данные типа:

ASUS aspire ~1,3 кг
ibm leonovo rwe1 ~2,2 кг
и т.д.
нужно выдернуть вес, в примере - 1,3 и 2,2 в отдельное поле. В иделе это сделать не запросом по всем полям, а по кнопке, по необходимым...

  Ответить  
 
 автор: Lukas   (25.02.2010 в 16:22)   личное сообщение
 
 

Например:

Public Function GetWeight(str As String) As Single
    GetWeight = Split(Split(str, "~")(1), " кг")(0)
End Function

  Ответить  
 
 автор: alexey_9   (25.02.2010 в 16:33)   личное сообщение
 
 

Супер! Спасибо!
А еще один глупый вопрос: выдернуть марку, т.е. ASUS aspire и ibm leonovo rwe1 в другое поле?

  Ответить  
 
 автор: Lukas   (25.02.2010 в 16:41)   личное сообщение
 
 


Public Function GetItem(Str As String) As String
    GetItem = Split(Str, " ~")(0)
End Function

  Ответить  
HiProg.com - Технологии программирования
Rambler's Top100 TopList