PDA

نسخه کامل مشاهده نسخه کامل : یه سوال در مورد یه برنامه ساده در ویژوال بیسیک 6 !



3ッドマクス
10-04-2009, 13:41
سلام کمک کنید امتحان دارم :31: من میخوام بدونم چطوری میشه برنامه ای نوشت که فاصله های خالی بین حروف رو بشماره و تو یه کادر بنویسه ! مثلا تو یه جمله 5 تا جا خالی هست وقتی روی ok کلیک میکنیم میخوام این تعداد رو تو یه کادر بنویسه ! اگر دوستان بلد هستند لطفا کمک کنند خیلی برام مهمه :11:

3ッドマクス
10-04-2009, 14:39
امتحان دارم به دادم برسید ! نوش دارو پس از مرگ صحراب نشه ...

M.K_Soft
10-04-2009, 14:52
فکر کنم باید از تابع trim استفاده کنی. زیاد یادم نیست ولی فکر کنم برای حروف سمت راست از rtrim و چپ از ltrim استفاده کنی.
میتونی خروجی تابع رو تو یه متغیر بریزی و بعد کاراکترهاشو بشمری.
مطمئن نیستم ولی تا همین حد یادم بود. امیدوارم به کارت بیاد.

3ッドマクス
10-04-2009, 14:57
ممنون تا این حد رو خودم بلدم اما نمیتونم بنویسم بازم ...
کد برنامش رو اگر کسی بزاره عالیه .

samiblog
10-04-2009, 17:17
این کد فاصله خالی رو برات می شماره

Private Sub Command1_Click()
Dim s As Integer
i = Len(Text1.Text)
For k = 1 To i
j = Mid(Text1.Text, k, 1)
If j = " " Then
s = s + 1
Label1.Caption = s
End If
Next k
End Sub
----------------------------------------------
موفق باشی

roya_borhany
10-04-2009, 22:41
سلام. 2 تا textbox با نام های textbox1,2 بذارید و یک command1

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

aslan_irani
10-04-2009, 23:17
سلام
يک textbox و يک command و يک ليبل روي فرم بذار و اين کد رابنويس :

Private Sub Command1_Click()
Dim xx() As String
xx = Split(Trim(Text1.Text), " ")
Label1.Caption = UBound(xx)
End Sub

3ッドマクス
11-04-2009, 16:01
خیلی خیلی خیلی خیلی خیلی خیلی ممنون واقعا نیاز داشتم بهش حالا باید برم روش فکر کنم ببینم چطوری نوشته شده :d
چندتا سوال دیگه ام هم دارم میتونم از طریق پیغام خصوصی بپرسم ؟