Familiar with "TASM" .. Assembly ....

.model small
.stack 100k
.data

	USRM DB "Enter Username:$"
	PWRD DB "Enter Password:$"
	Rity DB 30h
	ULIT DB 30h
	Errr DB "USername and Password does't match!$"
	PASSACC DB "Username and Password Accepted!$"
.Code

start:
	mov ax @ DATA
	mov ds,ax

ULIT2:  Mov ax,2h
	int 10h
	mov ah,2h
	mov dx,0405h
	int 10h
	mov ah,9h
	mov dx,offset USRNM
int 21h
mov ah,1h
int 21h
cmp al,47h
jne ERR
int 21h
cmp al,61h
jne ERR
int 21h
cmp al,74h
jne ERR
int 21h
cmp al,75h
jne ERR
int 21h
cmp al,73h
jne ERR
int 21h
cmp al,1fh
jle OK
jmp ERR
ULIT1:	jmp ULIT2
ERR:	mov cx,20
	int 21h
 	cmp al,1f
	jle PASSWORD
	loop ERR
OK:	inc Rity
PASSWORD:	mov ah,2
		mov dx,605h
		int 10h
		mov ah,9h
		mov dx,offset PWRD
		int 21h
		mov ah1h
		int 21h
		cmp al,43h
jne ERR2
int 21h
cmp al,4fh
jne ERR2
int 21h
cmp al,41h
jne ERR2
int 21h
cmp al,52h
jne ERR2
int 21h
cmp al,43h
jne ERR2 
int 21h
cmp al,1fh
jle OK2
ERR2:		mov cx,20
		int 21h	
		cmp al,1f
		jle OKNBA
		Loop ERR2		
OK2:		inc Rity
OKNBA:		cmp Rity 32h
		je OKNA
		INc ULIT
		mov ah,2
mov dx,080ah
int 10h
mov ah,9h
mov dx,offset ERRR
int 21h
cmp ULIT,3
jne ULIT1 
mov ah,4ch
int 21h
ret
OKNA:		mov ah,2
mov dx,080al
int 10
mov ah ,9h
mov dx,offset PASSACC
int 21h		

		

Dim user as String, pass as String

user = "test"
pass = "test"

If Text1.Text = user And Text2.Text = pass Then

Print "A"
Print "B"

Else

Msgbox "Invalid Username and Password"
End If

by TASM you mean Turbo-ASM as in Borland's assembler?