我出离愤怒了!!

xsm8023 2010-01-27 04:07:41
TMD到现在最简单的VB里一个小学生程序都搞不定

Sub 按钮1_Click()
For i = 0 To 10
For j = 0 To 10

'Range(Cells(i, j)) = i * j
Cells(i, j) = i * j
Next j
Next i
End Sub


总之就是搞不定

还有for i=1 to 10 do range("A"&i)可以这样写
那么如果我是横过来的行要循环,怎么写呢?
...全文
24 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
鸭梨山大帝 2010-01-27
  • 打赏
  • 举报
回复

Private Sub CommandButton1_Click()
Dim i As Integer
Dim j As Integer
For i = 1 To 10
For j = 1 To 10
ThisWorkbook.Sheets(1).Cells(i, j).Value2 = i * j
Next j
Next i
End Sub


我也出离愤怒了... ...

16,554

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧