не подскажите?

flacon

Почти у всех участников, в соощениях присутствуют картинки, характеризующего каждого из них.
Владение компьютером мое не такое уж большое поэтому не знаю как это сделать а очень хотца
Только не смейтесь, наверно это просто, просто у меня не получаеться ((((
Заранее благодарен.

hans_NMG

явно вопрос не прозвучал, но видимо есть желание картинки вставлять? для этого после отправки сообщения входим в режим редактирования его (пиктограммка "листик с карандашиком" внутри сообщения). Появятся несколько полей для указания путей к граф. файлам и кнопка "добавить картинки"

Alex_F

hans_NMG я думая про аватар речь 😊

hans_NMG

а, точно! 😊

Ну это гораздо сложнее - в профайл лезть надо 😀

flacon

Я вот про какие картинки говорю, у hans NMG это котик, а у Alex F - машина
Спасибо

hans_NMG

Это т.н. аватары. Вверху-справа на странице конференции есть линк "profile" - туда надо идти. На странице с персональными данными вверху-справа линк "аватары"...

flacon

Большое спасибо!

flacon

Пробую с картинкой

flacon

а сейчас?

hans_NMG

аватарина прицеплена? попробуй много текста ввести

flacon

Знаете, у меня она висит в закладке аватары а вот в сообщениях ее нет (((((((

Сейчас что-нить попробую написать много )))


Что первое попалось
Стандартные функции VB (A-C)

Описание ф-ций, встроенных в Visual Basic 5, начинающихся с букв A до C


--------------------------------------------------------------------------------

Список функций, описанных в этом разделе:

Abs
Array
Asc
Atn
CBool, CByte, CStr, ...
Cos
Chr
Choose
Command
CreateObject
CurDir
CVErr

--------------------------------------------------------------------------------

---A---


--------------------------------------------------------------------------------

Abs (number) - возвращает модуль числа.

Пример:

Dim MyNumber
MyNumber = Abs(50.3) ' возвратит 50.3.
MyNumber = Abs(-50.3) ' возвратит 50.3.


--------------------------------------------------------------------------------


Array (arglist) - возвращает переменную типа variant содержащую массив.

Пример:

Dim MyWeek, MyDay
MyWeek = Array("Mon", "Tue", "Wed", "Thu", "Fri", "Sat", "Sun")
' Возвращает значение с нижней границей массива равной 1
MyDay = MyWeek(2) ' Теперь MyDay содержит"Tue".
MyDay = MyWeek(4) ' Теперь MyDay содержит "Thu".


--------------------------------------------------------------------------------


Asc (string) - возвращает код первого символа в строке параметре.

Пример:

Dim MyNumber
MyNumber = Asc("A") ' Возвратит 65.
MyNumber = Asc("a") ' Возвратит 97.
MyNumber = Asc("Apple") ' Возвратит 65.

Замечание:

AscB - используется со срокой, длина которой 1 байт

AscW - возвращает двухбайтовый код unicode. (В системах Unix)


--------------------------------------------------------------------------------

Atn (number) - возвращает арктангенс числа.

Пример:

Dim pi
pi = 4 * Atn(1) ' Вычисляет значение числа pi.


--------------------------------------------------------------------------------


---C---


--------------------------------------------------------------------------------

Серия ф-ций конвертирования типов:

CBool (expression) - возвразает boolean значение
CByte (expression) - возвращает значение типа Byte
CCur (expression) - возвращает значение типа Currency
CDate (expression) - возвращает значение типа Date
CDbl (expression) - возвращает значение типа Double
CDec (expression) - возвращает значение типа Decimal
CInt (expression) - возвращает значение типа Integer
CLng (expression) - возвращает значение типа Long
CSng (expression) - возвращает значение типа Single
CVar (expression) - возвращает значение типа Variant
CStr (expression) - возвращает значение типа String


Примеры всех этих ф-ций:

CBool


Dim A, B, Check
A = 5: B = 5 ' Инициализация переменных.
Check = CBool(A = B) ' Check содержит True.

A = 0 ' Инициализация переменной.
Check = CBool(A) ' Check содержит False.

CByte

Dim MyDouble, MyByte
MyDouble = 125.5678 ' MyDouble имеет тип Double.
MyByte = CByte(MyDouble) ' MyByte содержит 126.

CCur

Dim MyDouble, MyCurr
MyDouble = 543.214588 ' MyDouble имеет тип Double.
MyCurr = CCur(MyDouble * 2) ' Конвертирует результат MyDouble * 2

' Double - (1086.429176).
' Currency - (1086.4292).

CDate

Dim MyDate, MyShortDate, MyTime, MyShortTime
MyDate = "February 12, 1969" ' Запись даты в переменную MyDate.
MyShortDate = CDate(MyDate) ' Конвертирование в тип Date.

MyTime = "4:35:47 PM" ' Запись времени в переменную MyTime.
MyShortTime = CDate(MyTime) ' Конвертирование в тип Date.

CDbl

Dim MyCurr, MyDouble
MyCurr = CCur(234.456784) ' MyCurr имеет тип Currency.
MyDouble = CDbl(MyCurr * 8.2 * 0.01) 'Конвертирует результат в Double.

CInt

Dim MyDouble, MyInt
MyDouble = 2345.5678 ' MyDouble имеет тип Double.
MyInt = CInt(MyDouble) ' MyInt содержит 2346.

CLng

Dim MyVal1, MyVal2, MyLong1, MyLong2
MyVal1 = 25427.45: MyVal2 = 25427.55 'MyVal1, MyVal2 имеют тип Double.
MyLong1 = CLng(MyVal1) ' MyLong1 содержит 25427.
MyLong2 = CLng(MyVal2) ' MyLong2 содержит 25428.

CSng

Dim MyDouble1, MyDouble2, MySingle1, MySingle2
' MyDouble1, MyDouble2 имеют тип Double.
MyDouble1 = 75.3421115: MyDouble2 = 75.3421555
MySingle1 = CSng(MyDouble1) ' MySingle1 содержит 75.34211.
MySingle2 = CSng(MyDouble2) ' MySingle2 содержит 75.34216.

CStr

Dim MyDouble, MyString
MyDouble = 437.324 ' MyDouble имеет тип Double.
MyString = CStr(MyDouble) ' MyString содержит "437.324".

CVar

Dim MyInt, MyVar
MyInt = 4534 ' MyInt имеет тип Integer.
MyVar = CVar(MyInt & "000") 'MyVar содержит значение String "4534000".

--------------------------------------------------------------------------------

Cos (number) - вычисляет косинус числа.

Пример:

Dim MyAngle, MySecant
MyAngle = 1.3 ' Устанавливаем угол в радианах.
MySecant = 1 / Cos(MyAngle) ' Вычисляем секонс.


--------------------------------------------------------------------------------


Chr (charcode) - возвращает символ, соответствующий определённому коду. Эта ф-ция является обратной Asc.

Пример:

Dim MyChar
MyChar = Chr(65) ' Возвратит A.
MyChar = Chr(97) ' Возвратит a.
MyChar = Chr(62) ' Возвратит >.
MyChar = Chr(37) ' Возвратит %.


--------------------------------------------------------------------------------


Choose (index, choice-1[, choice-2, ... [, choice-n]]) - выбирает значение из списка аргументов.

Пример:

Function GetChoice(Ind As Integer)
GetChoice = Choose(Ind, "Speedy", "United", "Federal")
End Function

Замечание:

Можно ускорить код с использованием Choose:
Вы можете использовать Choose там, где можно заменить массив или построить таблицы результатов, на стадии компиляции (compile-time), вместо того, чтобы делать это на стадии выполнения (run time). Например, если Вам надо знать значения факториалов чисел от 1 до 10, попробуйте следующий пример (Choose производит выбор факториала из набора имеющихся значений всесто того, чтобы высчитывать факториал каждый раз заново):


flacon

ничего не понимаю
Почему сейчас-то ее нет?

Кречет

Не сразу появляется. Подожди немного.

Alex_F

flacon
ничего не понимаю
Почему сейчас-то ее нет?

Значит завтра появится - так бывает 😊

flacon

Спасибо, подожду до завтра!

irmilka

Переехало в предложения Админу