▶ 뭉충닷컴
 
mungchung.com login
Site Search
My Space
주절주절...
공부방
쥔장소개
Board
자유게시판
유용한 정보
자료실
Programming
강좌 & Articles
Spring 3.0
프로그래밍 Tip
   -ASP
   -PHP
   -JavaScript
   -HTML
   -Java/JSP
   -Database
   -Crystal Report
   -Visual Basic
   -이클립스
   -리눅스
   -기타
Windows API (VB)
Spread Sheet 7.0
컴퓨터활용 Tip
Other things
StarCraft 전략
StarCraft 문서
김용(金庸)
Son Q & Dieda

폼 안의 컨트롤들 개수와 접근하기

VB 조회 수 7329 추천 수 0 2006.09.25 02:05:18
Dim obj As Object
For Each obj In Form1.Controls
    If TypeOf obj Is TextBox Then

        
        MsgBox obj.Name
        
    End If
Next








Dim arrObj() As Object
Dim i, j, k As Integer
Dim nTmp As Object
Dim nTmp_i As Object
Dim nTmp_j As Object
Dim obj_cnt As Integer
    
    
obj_cnt = Form1.Controls.Count
ReDim Preserve arrObj(obj_cnt)

' TextBox 컨트롤만 배열에 넣는다.
For i = 0 To obj_cnt - 1
    Set nTmp = Form1.Controls.Item(i)
    If TypeOf nTmp Is TextBox Then
        Set arrObj(k) = nTmp
        k = k + 1
    End If
Next



2가지 방법있다..귀찮아서 코드 정리 안함
문서 첨부 제한 : 0Byte/ 2.00MB
파일 크기 제한 : 2.00MB (허용 확장자 : *.*)
List of Articles
번호 제목 글쓴이 날짜 조회 수