PDA

View Full Version : سوال: سوالی دربار ه ی الگوریتم



sadeghmosavi539
سه شنبه 12 آذر 1392, 16:46 عصر
با سلام
یه سوال داشتم
الگوریتمی بنویسید تعداد اعداد ورودی را تشخیص دهد چند رقمی است
لطفا سریع پاسخ دهید
با تشکر

habibb
سه شنبه 12 آذر 1392, 21:49 عصر


PMTornado
سه شنبه 12 آذر 1392, 22:52 عصر
سلام .
__________________________________________________ __


شروع
عدد را بگير
تعداد ارقام آنرا چاپ كن
پايان
.:لبخند:

__________________________________________________ __
تو VB6 :
دو تا TextBox بيار رو فرم




Private Sub Text1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 8, 48 To 57
KeyAscii = KeyAscii
Case Else
KeyAscii = 0
End Select
End Sub
Private Sub Text1_Change()
Dim i As Integer
For i = 0 To Len(Text1)
Text2 = i
Next
End Sub