Aktywne Wpisy
Kalosz667 +44
#nieruchomosci #demografia
Wykopki: dziś 300k to gówno nie pieniądz, bez 800k a najlepiej miliona nawet nie myśl o własnym mieszkaniu, demografia przez to upadnie
Tymczasem każde miasto 20k-100k mieszkańców w Polsce:
Wykopki: dziś 300k to gówno nie pieniądz, bez 800k a najlepiej miliona nawet nie myśl o własnym mieszkaniu, demografia przez to upadnie
Tymczasem każde miasto 20k-100k mieszkańców w Polsce:
źródło: Screenshot_20240215_122442
Pobierz
WielkiNos +364
Ze wszystkich zdjęć, które wrzucała kiedykolwiek Lewandowska i o których dyskutuje się na wykopie i twitterze to jest dla mnie najgorsze.
Lewandowska na pierwszym planie z sexi dzióbkiem, za nią stado opalonych amigos uśmiechających się sugestywnie, na samym końcu za nimi wszystkimi, w cieniu stoi jeden z największych światowych talentów piłkarskich - Robert Lewandowski.
O ile lepiej by to zdjęcie wyglądało gdyby Lewandowska stanęła obok Roberta, objęła go i pochyliła się w
Lewandowska na pierwszym planie z sexi dzióbkiem, za nią stado opalonych amigos uśmiechających się sugestywnie, na samym końcu za nimi wszystkimi, w cieniu stoi jeden z największych światowych talentów piłkarskich - Robert Lewandowski.
O ile lepiej by to zdjęcie wyglądało gdyby Lewandowska stanęła obok Roberta, objęła go i pochyliła się w
źródło: temp_file8351065228825838349
Pobierz
Dim fd As Office.FileDialog
Set fd = Application.FileDialog(msoFileDialogFilePicker) 'wybór obrazu w .bmp
With fd
.Filters.Clear
.Title = "Wybierz zdjecie"
.Filters.Add "BMP", "*.bmp", 1 'zaznaczenie .bmp
.AllowMultiSelect = False ' nie można wybrać 2
Dim sFile As String
If .Show = True Then
sFile = .SelectedItems(1)
End If
End With
If sFile <> "" Then
Image1.Picture = LoadPicture(sFile)
End If
End Sub
tylko jak teraz w Bitmapie zrobić porównanie ?
znalazłem coś takiego na necie ale to w VB jesty
ktoś coś ?
#vba #porgramowanie #exel #vb