| |
|
|
| | Все категорически приветствую!
Проблема, видимо от "большого" ума...
Есть форма и в форме есть поле для изображения. Если, скажем, номер детали совпадает с именем картинки на диске, то картинка отображается в поле. Картинку поднимаю и показываю - здесь проблем нет. Но, если, картинки нет, то в поле все равно остается старое изображение.
В MSA 2000 это делалось легко и просто через
if .Execute>0 Then
...
Else
...
End If
А как это сделать в MSA 2010 ?
Спасибо всем! | |
| |
| |
| |
|
|
| | А чем вас Dir() не устраивает? | |
| |
| |
| |
|
|
| | гхм... а что мешает вначале задать Картинка.Путь = Nothing а затем через on error resume next задать путь возможной картинки? Если есть- подгрузится. Нет- так нам и надо пустое поле.
Не? 
При чем, как по мне, так я б вынес все это в отдельную процедуру, и вызывал б ее при необходимости смены картинки. А уж тело процедуры само буит обнулять и может задавать новую.. Что-то вроде этого:
Private Sub SetPict(Optional ByVal PathToPicture As String = "")
On Error Resume Next
Set Me.Picture1.Picture = Nothing
Set Me.Picture1.Picture = LoadPicture(PathToPicture)
End Sub
|
 | |
| |
| |
