# Convertir Código visual a PHP

La funcion original esta en Fox, La misma fue convertida a Visual , y Ahora se necesita converir la misma a PHP

Public Function digverif(ByVal cadena As String) As String

' muni zapala codigo original que mando esta hecho en FOX retorna 2 digitos

' LPARAMETERS [url removed, login to view]

' [url removed, login to view] = 0

' secuencia = 3

' [url removed, login to view] = SUBSTR([url removed, login to view], 1, 1)

' [url removed, login to view] = Val([url removed, login to view]) * 1

' [url removed, login to view] = [url removed, login to view] + ([url removed, login to view])

' For [url removed, login to view] = 2 To Len([url removed, login to view]) Step 1

' [url removed, login to view] = SUBSTR([url removed, login to view], [url removed, login to view], 1)

' [url removed, login to view] = Val([url removed, login to view]) * secuencia

' [url removed, login to view] = [url removed, login to view] + ([url removed, login to view])

' secuencia = secuencia + 2

' if secuencia=11

' secuencia = 3

' End If

' Next [url removed, login to view]

' [url removed, login to view] = MOD(int([url removed, login to view]), 10)

' [url removed, login to view] = mod(int((m.suma+([url removed, login to view]*secuencia))/2),10)

' [url removed, login to view] = [url removed, login to view] + alltrim(Str([url removed, login to view])) + alltrim(Str([url removed, login to view]))

' [url removed, login to view] = [url removed, login to view]

' RETURN [url removed, login to view]

' CODIGO CONVERTIDO A VISUAL BASIC

suma = 0

secuencia = 3

valorreal = Val(letra) * 1

suma = suma + (valorreal)

For co = 2 To Len(cadena) Step 1

valorreal = Val(letra) * secuencia

suma = suma + (valorreal)

secuencia = secuencia + 2

If secuencia = 11 Then

secuencia = 3

End If

Next co

checksum = Int(suma / 2) Mod 10

checksum2 = Int((suma + (checksum * secuencia)) / 2) Mod 10

digverif = Trim(Str(checksum)) + Trim(Str(checksum2))

End Function

Kemahiran: MySQL, PHP, Kejuruteraan Perisian

Tentang Majikan:
( 7 ulasan ) Charata, Argentina

ID Projek: #13457130

ddonari

Hola, mi nombre es David, mañana a la mañana charlamos y la hacemos en el día, saludos!

\$44 USD dalam sehari
(10 Ulasan)
6.0

## 9 pekerja bebas membida secara purata \$216 untuk pekerjaan ini

extreamcode

HI, I can assist you with this Project. Here is a sampling of the few of my work contained at my portfolio: https://www.freelancer.com/u/extreamcode.html This is a placehoolder bid, I would be able to quote final p Lagi

\$155 USD dalam 3 hari
(56 Ulasan)
7.3
concettolabs

“Web development Experts” Hello, we are a leading website app development company, we specialize in WordPress including theme and plugin customization. we are experienced in woo commerce too. We have studied your Lagi

\$494 USD dalam 20 hari
(52 Ulasan)
6.0
websolutions008

Hi, This is angel from [login to view URL] We could build a website as mentioned in the project description Mockup could be provided on your approval, before awarding the project. We are a company located in India. Give Lagi

\$266 USD dalam 10 hari
(72 Ulasan)
6.2
\$155 USD dalam 10 hari
(30 Ulasan)
5.5
rajneeshsaini

I have a few questions about your project. Please send me a message so that we can discuss more. Hello, I have 7+ years experince in PHP, Wordpress, Magento, Shopify , BigCommerce , Opencart, Woocommerce, Joomla Lagi

\$238 USD dalam 3 hari
(11 Ulasan)
4.2
kkokko555

Dear Hiring Manager! I have got your job posting on “Public Function digverif (ByVal String As String) As String” and I am very much interested to work in your project. I am a pro web Developer with more than 8 year Lagi

\$166 USD dalam 3 hari
(17 Ulasan)
4.4
developerroger

experienced php developer , about 10 years. please let me try without compromise.. i believe its a really easy task

\$222 USD dalam 10 hari
(6 Ulasan)
2.9
\$155 USD dalam 3 hari
(16 Ulasan)
1.8
technologicsols

Dear Prospect Hiring Manager. Thank you for giving me a chance to bid on your project. i am a serious bidder here and i have already worked on a similar project before and can deliver as u have mentioned I have Lagi

\$200 USD dalam 6 hari
(2 Ulasan)
1.8
megasoft3

Dear Client, Thanks for providing us opportunity to place bid over the project and communicate with [login to view URL] mainly deal in web development, SEO, Android App, software testing and graphic design. Our vision is to b Lagi

\$205 USD dalam 6 hari
(0 Ulasan)
0.0