[administrator]

PHP كود :

Option Explicit

Private Sub Form_Load()
Call x("")
Call x("VB4ARB")
End Sub


Public Sub x(ByVal s As String)
If s = "" Then
Me.Caption = "NONE"
Else
MsgBox s
End If
End Sub