vb的一个小问题 - VC/MFC / 基础类
Private Sub Command1_Click()
mytext.Text = Str(taozi(1))
End Sub
Private Sub Form_load()
Dim begin As CommandButton
Dim mytext As TextBox
Set begin = Command1
Set mytext = Text1
mytext.Text = ""
begin.Caption = "确定"
End Sub
Public Function taozi(nihao As Integer) As Integer
taozi = nihao
For i = 1 To 7 Step 1
taozi = (taozi + 1) * 2
Next i
End Function
为什么mytext.text错了，如果原来窗体上没有command1和text1
而我想自己用set建立该如何写。我用set+new发现有错误!!
友情帮顶，友情帮顶
{{
相关问答：
在vb中如何读取Word内容(包含表格，图片，等）
竟然不是zero。
不知道怎么实现的不要说话
这个只能读文本,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......
我想把word另存为xml之后，用vb读取这个xml的内容，请问如何实现？
dim f as integer
dim b() as byte
dim s as string
dim L as long
f=freefile()
open "abc.xml" for binary access read as #f
......
Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' 打开刚创建的文件。
ReDim MyString(LOF(1) - 1)
Put #1, , MyRecord ' 读入所有字符到变量中 ......
dim a as string,b as string，c as string
a="工程编号,单位工程名称,分部工程编号"
b="单位工程名称"
c="单位"
怎么才能判断出a字符串中存在b字符串，而不存在c字符串
看看i ......
各位高手，小弟最近碰到一个问题：原先写的程序大概的思路是：首先webbrowser打开网址，网址显示后，点击网址上的某一个连接，当webbrowser检测到网址已经连接到想要的地址时候就开始下载文件，当用IE6的时候下� ......
