با سلام
بهتره یک تابع بنویسید که مقدار شما رو بگیره . اگر معادل DBNull.value بود string.empty برگردونه .

و به این صورت استفاده کنید :

Label4.Text = RNull(DR1("allfee"))


تابع هم بهتره آرگومانش رو بصورت Object بگیره و خروجی هم هر چیزی که صلاح میدونید .
شرطتون هم میتونه به این صورت باشه :

If MyObj Is DBNull Then


موفق باشید . خدانگهدار