|
|
|
Invalid outside procedure.
|
|||
|---|---|---|---|
|
#18+
Господа, бесцельно бьюсь над непонятной ошибкой: ________________________________________________________ Dim SQLBookSearchFull As String SQLBookSearchFull = "Test" Private Sub cmdlFrmBookSearch_Research_Click() MsgBox (SQLBookSearchFull) End Sub ________________________________________________________ такой вот текст вызывает при нажатии кнопки на форме ошибку: Invalid outside procedure. В чем тут может быть дело? PS: Access 2000 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 31.03.2004, 02:26 |
|
||
|
Invalid outside procedure.
|
|||
|---|---|---|---|
|
#18+
Вместо Dim SQLBookSearchFull As String SQLBookSearchFull = "Test" напиши Const SQLBookSearchFull = "Test" и не надо присваивать значение переменным в области описаний модуля ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 31.03.2004, 02:48 |
|
||
|
Invalid outside procedure.
|
|||
|---|---|---|---|
|
#18+
Да, спасибо, так все получается. Непонятно, правда, почему так? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 31.03.2004, 02:58 |
|
||
|
Invalid outside procedure.
|
|||
|---|---|---|---|
|
#18+
В области описаний можно объявить переменную, но не присваивать значение.Значения присваиваются в процедурах Так Dim SQLBookSearchFull As String Private Sub cmdlFrmBookSearch_Research_Click() SQLBookSearchFull = "Test" MsgBox (SQLBookSearchFull) End Sub ============== или так Dim SQLBookSearchFull As String Private Sub cmdlFrmBookSearch_Research_Click() mySub MsgBox (SQLBookSearchFull) End Sub Private Sub mySub() SQLBookSearchFull = "Test" End Sub ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 31.03.2004, 03:06 |
|
||
|
|
start [/forum/topic.php?fid=45&msg=32463012&tid=1675695]: |
0ms |
get settings: |
6ms |
get forum list: |
15ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
57ms |
get topic data: |
6ms |
get forum data: |
2ms |
get page messages: |
36ms |
get tp. blocked users: |
1ms |
| others: | 234ms |
| total: | 361ms |
| 0 / 0 |
