Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > VB6 > VB+Access+CommandCom.Caption

Автор: Leonidas 6.5.2004, 14:32

Есть форма с 10-ю кнопками. Нужно установить значение
Caption для каждой кнопки так , чтобы оно соответствовало
значению (например поля 2-ой записи колонки "Друзья" из
базы данных АСCЕSS).Хотелось бы код хотя бы для одной кнопки

Автор: Akina 6.5.2004, 16:32

sub form.load
set rs = openrecordset
rs.movetop
rs.move 2
button1.caption=rs!Друзья
set rs=nothing
end sub

Автор: Leonidas 7.5.2004, 11:46

Private Sub form_Load()
Set rs = OpenRecordset
rs.movetop
rs.Move 5
Command1.Caption = rs!Duelle2
Set rs = Nothing
End Sub

При попытке ввести подобный код Debug показывает ошибку в строке 2.Помогите!

Автор: Akina 7.5.2004, 14:46

Вот блин! тебе дали ИДЕЮ! канву... основу... будь любезен сам разобраться как описываются рекордсеты, как они открываются, как с ними работают... или учиться тебе религия не позволяет???

Автор: cardinal 7.5.2004, 15:13

А если на форуме поискать?
http://forum.vingrad.ru/index.php?showtopic=6018&hl=openrecordset
http://forum.vingrad.ru/index.php?showtopic=20694&hl=openrecordset

Автор: Leonidas 7.5.2004, 16:39

Акина and Cardinal! Спасибо за ИДЕЮ.Уже все работает.Юмор насчет религии принят.

Автор: Гость_Leonidas 10.5.2004, 13:18

Хочу на Batton1.Caption= вывести значение
ячейки С3 а на Batton2.Caption=вывести значение ячейки H5 из таблицы "Пользователи".
Помогите с кодом.

Автор: shilnik 11.5.2004, 04:51

Это ексель что ли? Тогда:

Код

Код

Button1.Caption=CStr(Sheets("Пользователи").Cells(3,3).Value)
Button2.Caption=CStr(Sheets("Пользователи").Cells(5,8).Value)

А если не ексель, то что такое С3 и Н5

Автор: Гость_Leonidas 11.5.2004, 17:52

СПАСИБО SHILNIK !!!