VB编程If Len(Text1.Text) = Len(Text1.Text) - 1 Then len(Text2.Text) = Len(Text2.Text) - 1 End If 缺缺标识符,不会回答别乱答.浪费时间

VB编程If Len(Text1.Text) = Len(Text1.Text) - 1 Then len(Text2.Text) = Len(Text2.Text) - 1 End If 缺缺标识符,不会回答别乱答.浪费时间 VB编程 取随机数在tex中取60-100随机数 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 vb,我想要问的是我要在文本框输入一串英文句子,然后按单词分解到列表框中!该怎么办?我写了一段代码：Dim midd As StringFor i = 1 To Len(Text1.Text)If mid(Text1.Text,i,1) = ThenList1.AddItem cc = Elsec = c + 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的代码, 关于VB的编程题.如何在Text1随机产生+、-、*、/四种符号,用什么函数? 谢谢啦 If text1.text then... VB如何定义b使len(text1.text)=len(b)比如 开始定义变量 a as string*100,函数返回a=da0 1564(长度不确定100以内)如何判断出a的 真真实长度?再如何定义变量b,使b=a的有效字符?要求等同效果：text1.text=a 从 vb编程,目的是根据输入的直角三角形的直角边长计算周长及面积.想在没填数据或者填的不是数字的时候弹出一个消息框.代码是：Private Sub Command1_Click()If IsEmpty(Text1.Text) = True Or IsEmpty(Text2.Text) 英语翻译Dim a() As String,b() As String,x1() As String,y1() As StringPrivate Sub Command1_Click()If Len(Text1) = 0 Or Len(Text2) = 0 ThenMsgBox 请输入变量符号!,vbExclamationExit SubEnd IfIf Len(Text3) = 0 Or Len(Text4) = 0 ThenMsgBox VB编程,如果一个三位整数等于其各位数字的立方和,则称这个数为水仙花数.输入一个整数判断其是否为水仙花数.Private Sub Form_Load()Dim x%,a%,b%,c%,y%x = InputBox(请输入三位数,提示框)If Len(x) = 3 Th VB的if语句的问题Private Sub Command1_Click()If Text1 = 111 ThenForm3.ShowEnd IfElseIf Text1 = ThenMsgBox 错误!6,系统错误End IfEnd Sub怎么改当Text1=111时 Form3.show当Text1不是111时 MsgBox 错误,6,系统错误怎么 VB中a=text1是什么意思?VB中a=text1是取text1中的值还是什么? vb编程:单词分解怎么编?Private Sub Command1_Click() Dim s As String,a() As String,i As Integer s = Text1.Text Call aword(s,a) List1.AddItem p End Sub Private Sub Command2_Click() Text1.Text = List1.Clear Text1.SetFocus End Sub Private Sub vb中比较3数的大小的编程,要用IF语句. IIf(),Left(),Abs()的问题...Text1 = IIf(Len(Text1) > 1,Left(Text1,Abs(Len(Text1) - 1)),)只想问里面的abs().我知道是绝对值的意思...想知道的是:如果文本是空的话..那abs()它是什么意思. VB中, text1=1和text1.text=1有没有区别? VB里求三个数的最大值编程我用了三个文本框text1 text2 text3根据客户输入的值在text4里显示最大值请问代码该怎么写?请不要轻视小问题我求教还不行吗