





GSerg писал(а):А что программисты? Программисты, да...
Чтобы работала начиная с 2k? Вперёд, функция beginupdateresource и иже с ней.
Чтобы работала в 95/98? Вперёд, ручками работать с PE.



With Clipboard
.Clear 'очитстить
.GetText 'прочитать текст
.SetText 'записать текст
End With

declare function func lib "lib" (pData as any) as long
sub dfgfdg()
dim a(1 to 100) as byte
func a(1)
end sub


dim a() as byte
open "file" for input as #1
redim a(1 to lof(1))
get #1,,a
close #1
Сейчас этот форум просматривают: AhrefsBot и гости: 14