''попробуйте так
Dim a, b, c, d As String
Dim e, f, g, h As Double
Dim i, j, k, l As Integer
Dim m(0 To 3) As String
Private Sub Form_Load()
m(0) = "aa"
m(1) = "bb"
m(2) = "cc"
m(3) = "dd"
End Sub
дальше при нажатии кнопки надо штоб
строчной переменной c присвоилось
содержимое масива m
Private Sub Command2_Click()
a = "значение масива - "
c = m(0)
Label3 = a + " " + c
End Sub
как присвоить строчной переменной содержание строчного масива?
обьявляю
Private Sub Form_Load()
Dim a, b, c, d As String
Dim e, f, g, h As Double
Dim i, j, k, l As Integer
Dim m(0 To 3) As String
m(0) = "aa"
m(1) = "bb"
m(2) = "cc"
m(3) = "dd"
End Sub
дальше при нажатии кнопки надо штоб
строчной переменной c присвоилось
содержимое масива m
Private Sub Command2_Click()
a = "значение масива - "
c = m(0)
Label3 = a + " " + c
End Sub
где неисправность што выдаёт ошибку
Compile error
sub or function not defined:confused:
Private Sub Form_Load()
Dim a, b, c, d As String
Dim e, f, g, h As Double
Dim i, j, k, l As Integer
Dim m(0 To 3) As String
m(0) = "aa"
m(1) = "bb"
m(2) = "cc"
m(3) = "dd"
End Sub
дальше при нажатии кнопки надо штоб
строчной переменной c присвоилось
содержимое масива m
Private Sub Command2_Click()
a = "значение масива - "
c = m(0)
Label3 = a + " " + c
End Sub
где неисправность што выдаёт ошибку
Compile error
sub or function not defined:confused:
Код:
Dim m(3) As String 'm(0 to 3) As String
Dim a As String, b As String, c As String, d As String
Dim e As Double, f As Double, g As Double, h As Double
Dim i As Integer, j As Integer, k As Integer, l As Integer
Dim a As String, b As String, c As String, d As String
Dim e As Double, f As Double, g As Double, h As Double
Dim i As Integer, j As Integer, k As Integer, l As Integer
или
Код:
Dim Dim a$, b$, c$, d$, m$(3) 'm$(0 to 3)
Dim e#, f#, g#, h#
Dim i%, j%, k%, l%
Dim e#, f#, g#, h#
Dim i%, j%, k%, l%
Цитата: shanemac51
Код:
''попробуйте так
Dim a, b, c, d As String
Dim e, f, g, h As Double
Dim i, j, k, l As Integer
Dim m(0 To 3) As String
Private Sub Form_Load()
m(0) = "aa"
m(1) = "bb"
m(2) = "cc"
m(3) = "dd"
End Sub
дальше при нажатии кнопки надо штоб
строчной переменной c присвоилось
содержимое масива m
Private Sub Command2_Click()
a = "значение масива - "
c = m(0)
Label3 = a + " " + c
End Sub
Dim a, b, c, d As String
Dim e, f, g, h As Double
Dim i, j, k, l As Integer
Dim m(0 To 3) As String
Private Sub Form_Load()
m(0) = "aa"
m(1) = "bb"
m(2) = "cc"
m(3) = "dd"
End Sub
дальше при нажатии кнопки надо штоб
строчной переменной c присвоилось
содержимое масива m
Private Sub Command2_Click()
a = "значение масива - "
c = m(0)
Label3 = a + " " + c
End Sub
помогло, в генерал а не в форме обьявив - всё заработало.
Ясен перец!Вы про области видимости читали?
Цитата: @pixo $oft
Ясен перец!Вы про области видимости читали?
области видимости? просто в форме кода на самом верху с приправой по имени Option Explicit
