반응형
* VBNET Regex 를 이용한 간단한 이메일 주소 체크 예제...
- 사용한 컨트롤 : TextBox 1개, Button 1개, Label 1개
전체 소스 코드
Form1.vb
Imports System.Text.RegularExpressions
Public Class Form1
Private Sub button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button1.Click
Dim bEmail As Boolean = Regex.IsMatch(textBox1.Text, "[a-zA-Z0-9!#$%&'*+/=?^_`{|}~-]+(?:\.[a-zA-Z0-9!#$%&'*+/=?^_`{|}~-]+)*@(?:[a-zA-Z0-9](?:[a-zA-Z0-9-]*[a-zA-Z0-9])?\.)+[a-zA-Z0-9](?:[a-zA-Z0-9-]*[a-zA-Z0-9])?")
If bEmail Then
label1.Text = "이메일 주소가 맞습니다."
Else
label1.Text = "이메일 주소가 아닙니다."
End If
End Sub
End Class
* 예제 결과
반응형
'VB.NET Programming' 카테고리의 다른 글
[VBNET] EXE File iCon 가져오기 (0) | 2020.05.12 |
---|---|
[VBNET] App Configuration - Key & Value 값 읽기 (0) | 2020.05.08 |
[VBNET] String To 이진수, 이진수 To String 으로 변환 (0) | 2020.05.01 |
[VBNET] Encoding Class - 유니코드 문자열 존재 여부 (0) | 2020.04.29 |
[VBNET] [API] Form - Animate (0) | 2020.04.24 |