Question

VB6.0里checkbox控件怎么用

Answer 1

if check1.value=1 then

'选中

else
'未选中

end if

Answer 2

你想实现什么功能呢？

追问

按命令按钮 能把checkbox勾选的command控件改名字

追答

可以做啊

你把界面做出来 我给你写代码

追问

重启程序名字要能保存住，  谢谢大神

追答

不知道这个界面是什么意思
完成什么功能
重启程序名字要能保存住是可以做到的

使用文件保存即可

追问

那怎么用文件保存文字 改名字我就改文件名字好啦

要TXT文档的 谢谢☺

追答

读文件

Dim s As String
Dim filename As String
filename = shuxiang & xingzuo & ".txt"
Open filename For Input As #1
Do While Not EOF(1)
Line Input #1, s
Print s
Loop
Close #1

追加写文件

Dim i As Integer, n As Integer, a(6) As Integer
n = 6
Open "D:\1122.txt" For Append As #1
Randomize
For i = 1 To n
a(i) = Int(Rnd * 1000 + 1)
Print #1, a(i)
Next i
Close #1

覆盖写文件
Dim i As Integer, n As Integer, a(6) As Integer
n = 6
Open "D:\1122.txt" For output As #1
Randomize
For i = 1 To n
a(i) = Int(Rnd * 1000 + 1)
Print #1, a(i)
Next i
Close #1