در خواست راهنمایی در مورد یک برنامه

[skiboys]

Dim Inputstring As String * 12
Do
Akey = Waitkey()

If Akey = 13 Then Goto Thanks

Inputstring = Inputstring + Chr(akey)

Loop

Thanks:

Print "Thank you " ; Inputstring ; " !"
-------------------------------------------------------------------
String * 12 یعنی چی ؟ :eek: :eek: oo:
If Akey = 13 چرا 13 ؟ :eek: :eek: :question:

[Navid_Micro]

پاسخ : در خواست راهنمایی در مورد یک برنامه

String *12 یعنی : تعریف کردن رشته به طول 12 کاراکتر
چون 13 Carriage Return هست که معنای enter رو میده ، شما میتونی هر کاراکتری که دلت خواست به جای 13 استفاده کنی