في VB، يتم تخزين الحروف في شكل ASCII، وتختلف قيم ASCII للأحرف الكبيرة والصغيرة بمقدار 32. في هذه الحالة، إذا كانت قيمة ASCII لحرف كبير زائد 32 ستصبح الحرف الصغير المقابل، وقيمة ASCII سيتم تغيير الحرف الصغير ناقص 32 إلى أحرف كبيرة. الكود المصدري لتحقيق تحويل الحالة في VB هو كما يلي:
'تحويل الحروف الكبيرة إلى أحرف صغيرة
نص فرعي خاص1_KeyPress(KeyAscii كعدد صحيح)
إذا كان KeyAscii >= 65 وKeyAscii <= 90 إذن
كيآسي = كيآسي + 32
نهاية إذا
نهاية الفرعية
'تحويل الحروف الصغيرة إلى أحرف كبيرة
نص فرعي خاص2_KeyPress(KeyAscii كعدد صحيح)
إذا كان KeyAscii >= 97 وKeyAscii <= 122 إذن
KeyAscii = KeyAscii - 32
نهاية إذا
نهاية الفرعية