بررسی شماره کارت اکسل , شماره شبا در اکسل , بررسی شماره شبا در اکسل , توابع کد VBA برای بررسی شماره کارت , توابع کد VBA برای بررسی شماره شبا , تست شماره کارت در اکسل , تست شماره شبا در اکسل ,

vba
Function ValidateCreditCard(cardNumber As String) As Boolean
Dim sum As Integer
Dim i As Integer
Dim digit As Integer
Dim temp As Integer
Dim len As Integer
sum = 0
len = Len(cardNumber)
For i = len To 1 Step -1
digit = CInt(Mid(cardNumber, i, 1))
If (len - i) Mod 2 = 1 Then
digit = digit * 2
If digit > 9 Then digit = digit - 9
End If
sum = sum + digit
Next i
ValidateCreditCard = (sum Mod 10 = 0)
End Function منبع : https://magicfile.ir
لیست نام کشورها , لیست شهر ها در فایل اکسل , نام لیست شهر ها در فایل اکسل , لیست نام کشورها به همراه لیست شهر ها , دیتابیس , دیتابیس نام کشورها ,

منبع : https://magicfile.ir
تشخیص وصل شدن و جدا شدن کارت حافظه , کد تشخیص وصل شدن و جدا شدن کارت حافظه , سورس کد VB.NET تشخیص وصل شدن مموری کارت , مموری کارت VB.NET , کار با فلش کارت با VB.NET ,

vb.net
Dim drives As DriveInfo() = DriveInfo.GetDrives()
For Each drive As DriveInfo In drives
If drive.DriveType = DriveType.Removable Then
' اینجا میتوان وضعیت درایو را بررسی کرد
End If
Next vb.net
If drive.IsReady Then
' کارت حافظه متصل است
Else
' کارت حافظه جدا شده است
End If منبع : https://magicfile.ir
فلش کارت 504 واژه انگلیسی , برنامه فلش کارت 504 واژه انگلیسی , اکسل فلش کارت , ایجاد فلش کارت با اکسل , ساخت فلش کارت با اکسل , 504 واژه انگلیسی , دیتابیس 504 واژه انگلیسی ,

منبع : https://magicfile.ir
سوالات امتحانی درس تفکر و سواد رسانه ای , نمونه سوال تفکر و سواد رسانه ای , سوالات تفکر و سواد رسانه ای , نمونه سوال درس تفکر و سواد رسانه ای ,

منبع : https://magicfile.ir