If text1.text"" then...

来源:学生作业帮助网 编辑:六六作业网 时间:2024/12/18 13:36:02
Iftext1.text""then...Iftext1.text""then...Iftext1.text""then...不等于,整个意思是,如果text1不等于空窜的话````不等于!!!

If text1.text"" then...
If text1.text"" then...

If text1.text"" then...
不等于,整个意思是,如果text1不等于空窜的话````

不等于!!!

If text1.text then... If Text1.Text Then 是什么意思啊? If Text1.Text = Then s_id = % Else s_id = Text1.Text End If,中的%是什么意思? VB中Text1.text=text1.text+CStr(a(i))+ If i=4 then text1.text=text1.text+chr(13)+chr(10)VB中Text1.text=text1.text+CStr(a(i))+ If i=4 then text1.text=text1.text+chr(13)+chr(10)中1, 2,chr(13)+chr(10)是不是ASCII的代码, Private Sub Text1_Click() If Text1.Text = 请输入 Then Text1.Text = End Sub这条语句的作用是什么Private Sub Text1_Click()If Text1.Text = 请输入 Then Text1.Text = End Sub VB编程If Len(Text1.Text) = Len(Text1.Text) - 1 Then len(Text2.Text) = Len(Text2.Text) - 1 End If 缺缺标识符,不会回答别乱答.浪费时间 VB 怎样定义A&B=C D&E=CPrivate Sub Form_Load()怎样定义A&B=C D&E=CEnd SubPrivate Sub Command1_Click() If Text1.Text & Text2.Text = C Then MsgBox XXX当在Text1.Text 输入A Text2.Text 输入B时 那么MSGBOX或当在Text1.Text 输入D Text2.Te Text1.Text 里面的. VB 判断a能否被b整除,能够整除输出“能”,否则输出“不能”.dimaasintegerdimbasintegera=val(text1.text)b=val(text2.text)if a mod b = 0 then text3.text=”能” else text3.text=”不能”显示除数为零,哪里错了 VB奇数求和Private Sub Command1_Click()vl = Val(Text1.Text)vj = Val(Text2.Text)If vl < vj Then Exit SubFor i = 1 To vl Step 2sumi = sumi + iIf sumi >= vj ThenExit ForEnd IfNext iText3.Text = iText4.Text = sumiEnd SubPrivate Sub Form_Load()Me.Capti Text1.Text = Text1.Text + CStr(a(i)) + 在VB 语句中 x = Val(Text1.Text) Val Dim y As IntegerPrivate Sub Command1_Click()Text2.Text = yEnd SubPrivate Sub Text1_Change()x = Val(Text1.Text)If x < 0 Or x > 100 ThenText1.Text = Text1.SetFocusLabel1.Caption = 请重新输入ElseLabel1.Ca vb中这句话“If e = + Or - Or × Or ÷ ”为什么是错的啊?d = Len(Text1.Text) - 1e = Mid(Text1.Text,d,1)If e = + Or - Or × Or ÷ ThenText2.Text = 1ElseText2.Text = Text2.Text & 1End Ifdim d%,dim e as string a(i) = Mid(Text1.Text,i, if flag=0 then sle_1.text= flag=1 end if sle_1.text=sle_1.text+this.text 请求给出每一句的注释,谢 for k =1 to 5,怎么算的?private sub command1_click()dim k as integer ,s as single,a as single,b as singlea=val(text1(0).text)s=ab=afor k =1 to 5s=s+val(text1(k).text)if aval(text1(k).text)thenb=val(text1(k).text)end if next ks=(s-a-b)/4s=s*3*val(t 当条件为真时执行Then后面的语句或语句组,否则执行后续语句 这句话怎么理解?谢谢我是新手,拜托各位高手!Private Sub Command1_Click()If Command1.Caption = 清除 ThenStoreString = Text1.TextText1.Text = '清 VFP中if IF =ALLTRIM(thisform.text1.Value) THEN 和IF ALLTRIM(thisform.text1.Value)= THEN 这两句有什么分别呀?不知为什么我用第二句的时候它是永真,而第一句则可以正常判断?