سوال: کد خواندن و چاپ متن TextBox [بایگانی]

capitan_nemesis

چهارشنبه 20 فروردین 1393, 13:20 عصر

سلام به همه
میخواستم ببینم این کد درست هستش یا نه
که از روی تکس باس بخونه و سپس چاپ کنه
' Gambas class file

Public Sub _new()

End

Public Sub Form_Open()

End

Public Sub Button1_Click()

Dim txt As String
txt = string_tb.Text

If txt = True Then
Message(txt)
Endif

End

AbbasVB

چهارشنبه 20 فروردین 1393, 15:41 عصر

سلام به همه
میخواستم ببینم این کد درست هستش یا نه
که از روی تکس باس بخونه و سپس چاپ کنه
' Gambas class file

Public Sub _new()

End

Public Sub Form_Open()

End

Public Sub Button1_Click()

Dim txt As String
txt = string_tb.Text

If txt = True Then
Message(txt)
Endif

End

سلام
نه خیر درست نیست
ممکنه که جواب بده ولی درست نیست
شما نباید یه مقدار رشته ای رو با یه مقدار بولین مقایسه کنید

Mori Bone

چهارشنبه 20 فروردین 1393, 16:00 عصر

If len(txt) > 0 Then Message(txt)